Question

excel vba怎样打开一个表格，双击或单击某单元格后可以后这个单元格内容复制到窗体文本框textbox1中？

双击单击都可以

Answer 1

显示窗体时使用参数vbmodeless，可以在窗体显示时还可以操作工作表。
userform1.show vbmodeless

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Cancel = True
UserForm1.TextBox1.Value = ActiveCell.Value
End Sub

Answer 2

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
if target.count=1 then UserForm1.TextBox1.Text = Target.Value
End Sub

Answer 3

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
textbox1.Value = Target.Value
End Sub

追问

还是点不中啊，点不上．还是在窗体上，点不到sheet1上