1

これはおそらく非常に簡単ですが、私には理解できないようです。

シートの任意のセルをクリックすると (シングルクリック)、そのセルにカーソルを点滅させたい (セルをダブルクリックしたかのように)

Application.SendKeys "{F2}" を使用してこれを達成しようとしています

Application.SendKeys "{F2}" を使用するために、選択した/アクティブなセルを識別する何かを実際にコーディングする方法がわかりません...それが可能であるか、最も効率的な方法である場合。

または、セルのシングルクリックに応答するためにダブルクリックイベントを呼び出すだけの方法はありますか?

いつものように、ご意見をお待ちしております。

4

1 に答える 1

2

イベントを使用する場合がありますWorksheet_SelectionChange。以下のコードを任意のシートに配置します。以下のコードは、ナビゲーションでアクティブなセルを黄色で強調表示します。

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    Application.EnableEvents = False
    On Error Resume Next

    Cells.Interior.Pattern = xlNone
    ActiveCell.Interior.Color = vbYellow

    Application.EnableEvents = True

End Sub

または、以下を検討することもできます

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
        Application.EnableEvents = False
    On Error Resume Next


    Cells.Interior.Pattern = xlNone
    ActiveCell.Interior.Color = vbYellow

    Application.EnableEvents = True

End Sub
于 2013-05-22T00:28:33.447 に答える