2016-2022 All Rights Reserved.平安財經(jīng)網(wǎng).復(fù)制必究 聯(lián)系QQ280 715 8082 備案號:閩ICP備19027007號-6
本站除標(biāo)明“本站原創(chuàng)”外所有信息均轉(zhuǎn)載自互聯(lián)網(wǎng) 版權(quán)歸原作者所有。
近日有關(guān)于Excel如何設(shè)置打印一次單元格內(nèi)容變一次的問題受到了很多網(wǎng)友們的關(guān)注,大多數(shù)網(wǎng)友都想要知道Excel如何設(shè)置打印一次單元格內(nèi)容變一次的具體情況,那么關(guān)于到Excel如何設(shè)置打印一次單元格內(nèi)容變一次的相關(guān)信息,小編也是在網(wǎng)上進行了一系列的信息,那么接下來就由小編來給大家分享下小編所收集到與Excel如何設(shè)置打印一次單元格內(nèi)容變一次相關(guān)的信息吧(以下內(nèi)容來自于網(wǎng)絡(luò)非小編所寫,如有侵權(quán)請與站長聯(lián)系刪除)
Excel設(shè)置打印一次單元格內(nèi)容變一次的步驟:
sheet1中,已經(jīng)設(shè)置好了打印區(qū)域。要求每打印一次,單元格B2中的日期就增加一天。
Alt+F11,打開VBE,雙擊sheet1工作表,以確認(rèn)后續(xù)的代碼是在sheet1中執(zhí)行。
步驟閱讀
復(fù)制如下代碼到右側(cè)的空白區(qū)域,然后按F5執(zhí)行代碼即可實現(xiàn)每打印一張,B2的日期增加一天。
Sub m()
For i = 1 To 100
ActiveSheet.PrintOut copies:=1
Cells(2, 2) = Cells(2, 2) + i
Next
End Sub
代碼詳解:
1.Sub m()——這是宏名,無需理會;
2.For i = 1 To 100——這是控制打印次數(shù),后面的100就是打印的頁數(shù),可以通過更改這個數(shù)值,來控制打印多少頁;
3.ActiveSheet.PrintOut copies:=1——這是打印當(dāng)前頁的代碼,無需理會;
4.Cells(2, 2) = Cells(2, 2) + i——這里的Cells(2,2)就是單元格B2,其中第一個2是行數(shù),第二個2是列數(shù),更改這兩個數(shù)值,就可以控制讓哪個單元格的數(shù)值變動;
5.Next——繼續(xù)循環(huán),無需理會;
6.End Sub——結(jié)束宏,無需理會。
2016-2022 All Rights Reserved.平安財經(jīng)網(wǎng).復(fù)制必究 聯(lián)系QQ280 715 8082 備案號:閩ICP備19027007號-6
本站除標(biāo)明“本站原創(chuàng)”外所有信息均轉(zhuǎn)載自互聯(lián)網(wǎng) 版權(quán)歸原作者所有。