範囲にVBAポイント変数

Question

VBAの範囲としてセルをポイントしたいと思います。私は使用しようとしました：

  Dim range 
     range = Sheet("sheet").Range("A1") 

しかし、これは範囲の値を返します。私が実際に望むのはレンジオブジェクトなので、私はそれを操作することができます。 range.Value = "Hello"を設定することで

アイデア？

Answer 1

まず、コード内の変数の明示的な宣言を必須にすることを強くお勧めします。 ツール - オプション、エディタタブチェック"変数宣言が必要"、またはすべてのスクリプトの最初の行にOption Explicitを入力してください。

第2に、コードに小さな誤字があると思います。Sheets.("sheet")である必要があります。

質問に答えるには、range = Sheets("sheet").Range("A1")を使用して、オブジェクトではなく値変数を割り当てます。したがって、範囲オブジェクトのデフォルト変数は暗黙的に割り当てられます。valueです。オブジェクトを割り当てるには、Setキーワードを使用します。私の完全なサンプルコードは次のようになります：

Option Explicit 

Public Sub Test() 
    Dim RangeObject As range 
    Set RangeObject = Sheets("Sheet1").range("A1")  
    RangeObject.Value = "MyTestString" 
End Sub 

これは、テキスト "MyTestString"をセルA1に入れるべきです。

編集：名前付き範囲を使用する場合は、RangeObject.Valueの代わりにRangeObject.Value2を試してください。名前付き範囲にはValueプロパティはありません。