ちょっとだけmod

SCRenameは優秀なスクリプトですが、たまに変なリネームをします。
というか、再放送などでしょぼいカレンダーにデータが入っていない場合、近くにあるデータを引っ張ってくる、という仕様上仕方がないことなのですが。
しょぼいカレンダーにない場合program.txtから何とかする、というスクリプトを使っているため、時としてSCRenameが邪魔になることが・・・。
というわけで、そのものずばりのデータがない場合はあきらめる、というように改ざんしました。
VBAのスクリプトなんていじったことがない(というか言語がわからない)のですが、そこはgoogle先生に聞けば何でも答えてくれます。
結論としては480行目ぐらいにある

                If stdt=0 Or Abs(tgtdt-dt1)<Abs(tgtdt-stdt) Then
                    stdt=dt1
                    eddt=dt2
                    pos=i
                End If

を

                If stdt=0 Or Abs(tgtdt-dt1)<Abs(tgtdt-stdt) Then
                    stdt=dt1
                    eddt=dt2
'                    対象時間を限定 mod
                    If Abs(tgtdt-dt1)<Abs(Cdate("12:00")) Then
                        pos=i
                    End If
                End If

というように一定の範囲内のデータのときだけデータをセットするようにしました。
というか、コード自体は特に問題ないのですが、コメントが少なくて・・・。
気が向けば引数とかにしてもいいかもしれませんね。