| 
    
     |  | 初めまして。tetsuと申します。 2点質問があるので、どなたか教えていただけないでしょうか。
 
 1.定数の宣言時に、定数の中に変数を入れることは出来ないのでしょうか。
 
 Dim i as Integer
 Const A as String = "変数Iは" & i & "です。"
 
 といったようにして、プロシージャの中で定数Aを使いたいのですがエラーがでます。やはり定数の中に変数を入れることは不可能なのでしょうか。
 
 2.ループでオープンしたファイルをクローズする方法がわかりません。
 
 Dim t_path = Variant
 Dim i as Integer
 
 With Application
 t_path = .GetOpenFilename("CSVファィル(*.csv),*.csv", , , , True)
 End With
 
 上のコードで、複数のファイルを選択した後に、
 
 For i = LBound(t_path) To UBound(t_path)
 
 Workbooks.Open t_path(i)
 
 処理
 
 Workbooks.Close t_path(i)
 
 で、一つずつファイルを開き、処理を終了した後にクローズしたいのですが、"Workbooks.Close t_path(i)"の部分が上手くいきません。他に色々ためしたのですが、だめでした。どなたか教えていただけないでしょうか。よろしくお願いします。
 
 |  |