次の方法で共有

Application.Selection プロパティ (Excel)

  • [アーティクル]

Application オブジェクトの作業中のワークシートで現在選択されているオブジェクトを返します。 オブジェクトが選択されていない場合は Nothing を 返します。 Select メソッドを使用して選択を設定し、TypeName 関数を使用して選択されているオブジェクトの種類を検出します。

構文

式。選択

expressionApplication オブジェクトを 表す変数。

注釈

返されるオブジェクトの種類は、現在の選択内容によって異なります (たとえば、セルが選択されている場合、このプロパティは Range オブジェクトを返します)。 何も選択していないとき、Selection プロパティは Nothing を返します。

このプロパティは、オブジェクト修飾子を指定せず使用した場合でも、Application.Selection と同様の結果になります。

例

次の使用例は、シート 1 の選択範囲を消去します。選択しているのは、セル範囲であるものとします。

Worksheets("Sheet1").Activate 
Selection.Clear

次の使用例は、選択しているオブジェクト型を表示します。

Worksheets("Sheet1").Activate 
MsgBox "The selection object type is " & TypeName(Selection)

次の使用例は、現在の選択範囲に関する情報を表示します。

Sub TestSelection(  )
    Dim str As String
    Select Case TypeName(Selection)
    Case "Nothing"
        str = "No selection made."
    Case "Range"
        str = "You selected the range: " & Selection.Address
    Case "Picture"
        str = "You selected a picture."
    Case Else
        str = "You selected a " & TypeName(Selection) & "."
    End Select
    MsgBox str
End Sub

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。