第1个回答 2009-11-25
菜单 -视图 -工具栏- 窗体
在出来的工具栏选按纽,然后画一个按钮.
在出来的对话框里点新建
出来的宏
Sub 按钮1_单击()
End Sub
在中间加入代码
Sub 按钮1_单击()
sheet2.range("a1")=sheet1.range("a1")
End Sub
子易空间站 - Excel培训专家本回答被提问者采纳
第2个回答 2009-11-25
sheet2.[a1]=sheet2.[a1]
如何用一个通用的方式,sheet2.cells(x,y)=sheet1.cells(a,b),这当中的x,y,a,b是变量,x是指行数,y是指列数....
第3个回答 2009-11-25
不要VBA 直接在SHEET2的A1里输入=sheet1!A1
录制宏就可以搞定
留下信箱我发给你也行
第4个回答 2009-11-25
Sub 按钮1_Click()
'
' 按钮1_Click Macro
'
'
Range("A1").Select
Selection.Copy
Sheets("Sheet2").Select
Range("A1").Select
ActiveSheet.Paste
Sheets("Sheet1").Select
Range("A1").Select
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = ""
Range("A2").Select
End Sub