0

ユーザーにセル範囲を入力してもらいたい

Dim FromRang, ToRang As Range

'Ask the user to input the cell Range in which to search for the sub strings
FromRang = Application.InputBox(Prompt:="Enter Search Range From:", Type:=8)
ToRang = Application.InputBox(Prompt:="Enter Search Range To:", Type:=8)

しかし、これは私にエラーを与えています：「オブジェクト変数またはブロック変数がExcel VBAに設定されていません」

4

1 に答える 1

6

などのオブジェクトRangeは、VBA で Set を使用してのみ割り当てることができます。したがって、mehow で述べたように、次を使用する必要があります。

Set FromRang = Application.InputBox(Prompt:="Enter Search Range From:", Type:=8)

さらに、複数の変数をディメンション化するには、すべての変数のタイプを個別に指定する必要があります。

Dim FromRang As Range, ToRang As Range

そうしないと、最初のものは指定されず、デフォルトでは、Variant望ましくない動作につながる可能性のあるタイプになります。

于 2013-05-01T14:40:22.210 に答える