1、for要與next連用
　　if的用法
　　if **** then
　　elseif *****
　　else*****
　　endif

2、通過簡單的錄制宏與適當的改寫完成工資條的制作
Sub 工資條() ' ' 宏1 宏 '復制一行，選擇下一行的第一個單元格，進行粘貼。 '同時根據第一個單元格判斷是否為空，若為空則停止'每個兩個插入復制的一行 Dim i As Integer For i = 1 To 1000 Step 2If Range("a" & i) = "" ThenExit ForEnd IfRows("1:1").SelectSelection.CopyRange("A" & i).SelectSelection.Insert Shift:=xlDown NextEnd Sub

?

轉載于:https://www.cnblogs.com/duelfijj/p/10284199.html

總結

以上是生活随笔為你收集整理的day1 工资条的制作的全部內容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯，歡迎將生活随笔推薦給好友。