发布网友 发布时间:2022-09-11 02:39
共2个回答
热心网友 时间:2024-04-19 12:54
帖子的程序是两个动作,一是把F8的数值粘贴到H14,二是把用户选中的单元格数值粘贴到I19,可以用下面的代码来实现:
Sub 宏2()
Dim r As Range
Range("h14").Value = Range("f8").Value
Set r = Application.InputBox("选中数据源单元格", , , , , , , 8)
Range("i19").Value = r.Value
End Sub
追问很好,非常契合我的需求。
热心网友 时间:2024-04-19 12:54
代码意思是复制F8到h14