【解決方法】VBAを使用して動的選択を選択する方法


VBAを使用して動的選択を選択する方法、静的選択の下>

selectRange = "$A$2:$F$51"
    keyRange = "$G$2:$G$51"
    companyRange = "$A$2:$A$51"
    nameRange = "$B$2:$B$51"
    isinRange = "$C$2:$C$51"
    iscRange = "$D$2:$D$51"
    pRange = "$E$2:$E$51"
        
    dateRange = "$F$2:$F$51"
    expandedRange = "$A$2:$F$51"
    
    resultIndex = 54 'header row number for results
   
    resultKeyRange = "$G$55:$G$160"
    resultDataRange = "$A$55:$G$160"

私が試したこと:

Sub vba_named_range()

Dim iRow As Long
Dim iColumn As Long

iRow = ActiveSheet.Range("A1").End(xlDown).Row
iColumn = ActiveSheet.Range("A1").End(xlToRight).Column

ActiveSheet.Range("myRange") _
.Resize(iRow, iColumn).Name = "myRange"

End Sub

解決策 1

これにアプローチするには、いくつかの方法があります。
1. 上記のように選択範囲を使用します。 これは古い技術です。
2. 範囲をテーブルとしてマークします。 行を追加すると、データがキャプチャされます。 その後、テーブルと列を範囲として参照できます。 (好ましい)。

どちらの方法も有効です。

変換したい場合 Range 文字列へのオブジェクトのセル参照、次に使用します Address 財産:

VB
Dim selectRange As String
Dim selRange As Range

' Create a Range Object
 Set selRange = range("$A$2:$C$7")

' get the address from the Range object
selectRange = selRange.Address ' = $A$2:$C$7

コメント

タイトルとURLをコピーしました