Excelの名前付き範囲からvbaの行と列の数を数えようとしています。行と列の数は、2D配列で他の計算を実行するために使用されます。名前付き範囲は、 "Price_Volumes_Inputs"というワークシートのA2：Z60からの "CF_Inputs"です。私は名前付き範囲を使用して行番号&の列を得ることができないので、行と列を数えるためにオフセットメソッドで以下のコードを使用しました。実際の名前付き範囲を使用してこれを行う方法はありますか？私はプログラミング全体に慣れていないので、簡単な質問をお詫び申し上げます。vbaの名前付き範囲の行と列を数えよう
Dim Inputs As Variant
Sheets("Price_Volumes_Input").Activate
Inputs = Range("A2", Range("Z2").End(xlDown).End(xlToRight))
VBAプログラミングの世界へようこそ。あなたがExcel VBAプログラミングをやっているなら、チップピアソンのウェブサイトをブックマークする必要があります。私はそれが非常に便利だとわかった。リンクはhttp://www.cpearson.com/Excel/MainPage.aspx
です。これを行う方法はたくさんあります。例えば、1つの簡単な方法は、非常に有用なフィードバックのための
Dim dataRows As Long
Dim dataCols As Long
Dim workArray as Variant
With ActiveWorkbook.Sheets("Price_Volumes_Input").Range("CF_Inputs")
dataRows = .Rows.Count
dataCols = .Columns.Count
End With
Dim workArray() As Variant
Redim workArray(dataRows, dataCols) as Variant
Dim i as Long, j as Long
For i = 0 to dataRows - 1
For j = 0 to dataCols - 1
'do the calculations
Next j
Next i
'ワークシート（ "Price_Volumes_Inputs"）。レンジ（ "CF_Inputs"）。Rows.Count' –
感謝です。私は変更された行と列数のコードを使用することができ、また動的配列を設定することができました。 （ "入力"）を有効にします。 Dim Row_Count As Long Dim Column_Count As Long Row_Count =ワークシート（ "入力"）範囲（ "CF_Inputs"）Rows.Count Column_Count =ワークシート（入力） "CF_Inputs"）Columns.Count 入力=ワークシート（ "Input"）範囲（ "CF_Inputs"、Range（ "CF_Inputs"）。End（xlDown）.End（xlToRight）） –