作者:乔山办公网日期:
返回目录:excel表格制作
1、打开一个表,选中zd序列,点击工具-宏,开始录制。
2、录制完成后按alt+f11 切换到代码编辑窗口,设置变量i为长整形,并且设置一个for循环,循环次数比要添加的工资条标签大,在end sub之前加内next。
3、按alt+f11切换到excel界面,再录制一个删除标题的宏,修改代码,添加for循环按alt+f8调出宏窗口。
4、从视图中调出窗体按钮,拖动容出一个按钮并为其制定生成工资表的宏 。
5、右键点击编辑文字按钮改名,再按相同的方法添加一个删除标题栏的宏,这样就可以逆向操作了。
给你个简单的,代百码可以复制图下边度的。复杂的需要静下问心来好好学习,网上很答多教程。
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If [B1] < 8 Then
[C1] = "小"
Else
If [B1] = 8 Then
[C1] = "中"
Else
[C1] = "大"
End If
End If
End Sub
就这意思:如果B1<8,那么专属C1=小
否则,如果B1=8,那么C1=中
否则C1=大
最简单的来两句,不明白请追问~~~
FOR的用法是这样zhidao的:
FOR I=1 TO N
......语句......
NEXT I
这样的功能是,使里面的 语句 运行N次,每次I的值都不同,分别是1~N,用来完成固定次数的重复。
IF的用法是这样的:
IF 条件 THEN
.......语句1.......
ELSE
......语句2......
END IF
这样的功能是判断条件是否满足,如专果满足就执行 语句1,否则执行 语句2
以上例子中的语句、语句1、语句2都可以是一个或者属多个语句,往往是一段。