经验直达：
- excel宏代码怎么写
- 如何写一个简单的excel宏
- excel宏怎么写代码
一、excel宏代码怎么写
看下图：
代码如下：
Sub 俺要打印()
Sheets("台账录入").Select '选中"台账录入"表
Dim i As Long, r As Long
r = Range("B" & Rows.Count).End(xlUp).Row '获取B列最大行号
If r < 2 Then Exit Sub '最大行号<2时退出sub
For i = 2 To r
Range("O7:P7") = Range("B" & i).Resize(1, 2).Value '将B:C两格的值赋值给"放样"表的O7:P7
Sheets("放样").PrintOut Copies:=1, Collate:=True, IgnorePrintAreas:=False '打印"放样"表
Sheets("监抽").PrintOut Copies:=1, Collate:=True, IgnorePrintAreas:=False '打印"监抽"表
Next
MsgBox "打印完毕", 64 '结束时弹出提示
End Sub
二、如何写一个简单的excel宏
方法/步骤
首先，要写一个宏，我们要把相应的工具栏给显示出来 。打开excel表格，在快速访问工具栏右击鼠标，在弹出的菜单选择“自定义功能区” 。
在右侧的方框，看到“开发工具”选项，将前面的方框打钩，然后单击确定，这样，开发工具就会显示在快速访问工具栏，方便我们使用 。
点击开发工具，然后单击插入，在下拉的菜单的表单控件里面选择“按钮”，如下图所示 。
这个时候，会弹出一个对话框“指定宏”，单击"新建"按钮 。
这样就会进入后台的程序书写界面 ， 进入以后，程序的头和尾已经帮你写好了 。你只需要在中间写入一句程序“ MsgBox("hello world") ” ， 然后，点击保存 。这个时候会有一些警告 ， 全部选是 。然后退出程序界面 。
这个时候，程序已经写好了 ， 你点击excel里面的按钮，屏幕就会弹出一个hello world 的框框，说明我们成功了 。
怎么样，是不是感觉挺好玩的，认真学好excel宏 ， 在实际工作中是很有用的 。希望对你有所帮助，谢谢！
三、excel宏怎么写代码
【如何写一个简单的excel宏 excel宏代码怎么写】Sub AB比较插入空格()
Dim n%, i%, j%, k%, Arr, ArrOut()
n = Cells(Rows.Count, "A").End(xlUp).Row
If Cells(Rows.Count, "B").End(xlUp).Row > n Then n = Cells(Rows.Count, "B").End(xlUp).Row
Arr = Range(Cells(1, 1), Cells(n1, 2))
Arr(n1, 1) = "最": Arr(n1, 2) = "最"'改成最大的字符 。
ReDim ArrOut(1 To 2 * n2, 1 To 2)
i = 1: j = 1: k = 1
Do
If Arr(i, 1) < Arr(j, 2) Then ArrOut(k, 1) = Arr(i, 1): ArrOut(k, 2) = "": i = i1: k = k1: Debug.Print i, j, k
If Arr(i, 1) > Arr(j, 2) Then ArrOut(k, 1) = "": ArrOut(k, 2) = Arr(j, 2): j = j1: k = k1: Debug.Print i, j, k
If Arr(i, 1) = Arr(j, 2) Then ArrOut(k, 1) = Arr(i, 1): ArrOut(k, 2) = Arr(j, 2): i = i1: j = j1: k = k1: Debug.Print i, j, k
Loop Until ((i > n) And (j > n))
[A1].Resize(k - 2, 2) = ArrOut
End Sub