ユーザーがデータを入力できるようにする

Question

私は、指定された年/月などからファイルを取得し、作業中のファイルにデータを持ち込むことができます。

このため、「年」と「月」のセルにラベルを付けた「パラメータ」シートを作成しました。これらの変数をコードに入れると、エラーが発生します。 私はYとZを間違って宣言していて、それを最後の行に不十分に連結していると思います。私はY/Z変数と実際のファイルの場所を使わないでコードをテストし、それが動作します。

Dim wkb As Workbook 
Dim wks As Worksheet 
Dim Y As String 
Dim Z As String 
Y = ThisWorkbook.Sheets("Parameters").Cells("Year") 
Z = ThisWorkbook.Sheets("Parameters").Cells("Month") 
Set wkb = Workbooks.Open("W:\01-Forecasts\&Y&\Monthly Forecast\&Z&\File.xlsm") 

Answer 1

使用RangeはないCells()

そして、すべてのVBA変数は引用符の外である必要があり、&

Dim wkb As Workbook 
Dim wks As Worksheet 
Dim Y As String 
Dim Z As String 
Y = ThisWorkbook.Sheets("Parameters").Range("Year") 
Z = ThisWorkbook.Sheets("Parameters").Range("Month") 
Set wkb = Workbooks.Open("W:\01-Forecasts\" & Y & " \Monthly Forecast\" & Z & "\File.xlsm")