EXCEL ダブルクリックして他のセルの値を表示させる方法

質問

エクセルで、空白のセルをダブルクリックすると、そのセルの４つ左のセルの値が入るようにしたいのですが教えて下さい。

VBAはできてるものを貼り付ける程度しかわからないので、宜しくお願いします。

回答No.1

J_LO

ワークシートのダブルクリックイベントに書きます。
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Value = "" Then
Target.Value = Target.Offset(0, -4).Value
Cancel = True
End If
End Sub

言うまでもなくA～D列ではエラーになります。

何気に目についたので気まぐれで回答してみましたが参考書の１冊も読んでみれば？
と言いたくなるような内容でしたので、あえてエラートラップはしてません。