点击文件名下载附件
是
Private Sub 确认_Click()
With Sheet1
.窗口1.Value = TextBox1
.窗口2.Value = TextBox2
End With
Unload Me
End Sub
--------------------------------------------------
lable
是
求一段代码.rar(11.58 KB, 下载次数: 7)
2013-5-16 20:38 上传
点击文件名下载附件
Private Sub 确认_Click()
With Sheet1
.窗口1.Caption = TextBox1
.窗口2.Caption = TextBox2
End With
Unload Me
End Sub