神马品牌网偷偷干别人的老婆小说:excel里面关于宏的代码有谁能帮我解说一下吗？？
来源：百度文库 编辑：神马品牌网 时间：2024/05/09 09:54:43
有谁能帮我解说一下以下代码吗？？
最近在学搞宏的
Sub 收入()
'
' 收入 Macro
' 宏由 杜伟 录制，时间: 2006-2-15
'
'
Sheets("收入明细表").Select
Range("A3:F3").Select
Selection.Insert Shift:=xlDown
Range("A2:F2").Select
Selection.Copy
Range("A3").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("A3").Select
Application.CutCopyMode = False
Sheets("录入").Select
ActiveWindow.SmallScroll Down:=-12
Range("A3:E3").Select
Selection.ClearContents
Range("A3").Select
End Sub
还有宏怎么建成键使用呢？？
最近在学搞宏的
Sub 收入()
'
' 收入 Macro
' 宏由 杜伟 录制，时间: 2006-2-15
'
'
Sheets("收入明细表").Select
Range("A3:F3").Select
Selection.Insert Shift:=xlDown
Range("A2:F2").Select
Selection.Copy
Range("A3").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("A3").Select
Application.CutCopyMode = False
Sheets("录入").Select
ActiveWindow.SmallScroll Down:=-12
Range("A3:E3").Select
Selection.ClearContents
Range("A3").Select
End Sub
还有宏怎么建成键使用呢？？
宏（Macro）实际上是一段程序
"收入"为宏名
Sub 和 End Sub 为子程序的开头和结尾,每个宏都会用到。
Sheets("收入明细表").Select
Range("A3:F3").Select
Selection.Insert Shift:=xlDown
Range("A2:F2").Select
Selection.Copy
Range("A3").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("A3").Select
Application.CutCopyMode = False
这一段是在“收入明细表”中做了一些选定范围等操作，可能你操作有误，复制、粘贴没有成功。
剩下后面几行只是清除了“录入”表中A3:E3范围内的内容。
宏的使用有两种方法：
一是定义快捷键，可在录制宏时定义（如Ctrl+A)；
二是在工具栏添加宏按钮，方法是点击“工具/自定义/命令”，在左边“类别”中选“宏”，再将右边“命令”框中的“自定义按钮”用鼠标左键按住拖到工具栏适当位置，然后将其指定到你的宏即可。