2011-08-16から1日間の記事一覧
秀丸で頑張るのもなんなので、VBAで考えてみた。 Const ForAppending = 8 Dim myFileSystem As New Scripting.FileSystemObject Dim mytextFileIn As Scripting.TextStream Dim mytextFileOut As Scripting.TextStream Dim buf As String buf = "" Set mytex…
秀丸で頑張るのもなんなので、VBAで考えてみた。 Const ForAppending = 8 Dim myFileSystem As New Scripting.FileSystemObject Dim mytextFileIn As Scripting.TextStream Dim mytextFileOut As Scripting.TextStream Dim buf As String buf = "" Set mytex…