Excelで名前付き列を参照する方法VBA

Question

列Aのすべてが "Michael"という名前の範囲であるスプレッドシートがあります。

最後に占有された行の行番号を取得しています。

このコードは動作します： LRow = Worksheets("Head").Range("A" & Rows.Count).End(xlUp).Row

このコードは動作しません： LRow = Worksheets("Head").Range("Michael" & Rows.Count).End(xlUp).Row

私は、これは、列名「マイケル」ではなく、デフォルトのAを使用して私と一緒に仕事を得るにはどうすればよいですか？

Answer 1

あなたは、範囲内のセルの列と行の数を指すことになる（）オブジェクト範囲：

LRow = Cells(Range("micheal").Rows.count, Range("micheal").Column).End(xlUp).Row 

Answer 2

Findを使用することなくxlUpよりも推奨されます。以下の両方の方法が表示されます

Dim rng1 As Range 
Dim lRow As Long 

'Option 1 
lRow = Cells(Rows.Count, Range("Michael").Column).End(xlUp).Row 

'Option 2 
Set rng1 = Range("Michael").Find("*", Range("Michael")(1), , , xlPrevious) 
If Not rng1 Is Nothing Then MsgBox rng1.Row