EXCEL 里，如何把指定单元格改成任意单元格

yuany8813 · 发表于 2020-8-27 17:00

各位老师
下午好

我想写个VB，双击D列任意单元格，都会复制C列对应行的内容粘贴到指定单元格

微信图片_20200827164946.png

3190496160 · 发表于 2020-8-28 09:41

粘贴到指定单元格
指定的位置是那个位置？？？

3190496160 · 发表于 2020-8-28 09:46

Private Sub Worksheet_BeforeDoubleClick(ByVal T As Range, Cancel As Boolean)
If T.Row > 1 And T.Column = 4 Then
If T.Count > 1 Then Exit Sub
[h1] = T.Offset(, -1)
Cancel = True
End If
End Sub

3190496160 · 发表于 2020-8-28 09:47

1/代码放到总表页面代码区域
2.目前代码是拷贝到[H1]单元格，可以自己修改位置

yuany8813 · 发表于 2020-8-28 10:29

收到，非常感谢

		自动登录	找回密码
密码			免费注册