双击时将单元格值复制到另一个单元格

Question

我需要Excel中的VBA代码。如果我双击E-or-F-or-G列中的单元格，则应将显示值复制到相应的H单元格中。请告知，我是新用户。

       E       F       G      H
1   1.00    0.50    0.00     
2   1.00    0.50    0.00     
3   1.00    0.50    0.00    

Answer 1

未经测试：

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

if Target.Column>=5 and Target.Column<=7 then
 Cells(Target.Row,8)=Target.Value
endif

End Sub