2013-11-20から1日間の記事一覧
Option Explicit'フォルダ内のエクセルファイルのシート一覧作る。Private Const BASEDIR As String = "C:\var" Dim fso As New Scripting.FileSystemObjectSub ogehogepon() Dim filelist() As String 'fairuitiran ReDim filelist(0) Call GetFileList(BAS…
Option Explicit'フォルダ内のエクセルファイルのシート一覧作る。Private Const BASEDIR As String = "C:\var" Dim fso As New Scripting.FileSystemObjectSub ogehogepon() Dim filelist() As String 'fairuitiran ReDim filelist(0) Call GetFileList(BAS…
