Excel利用VBA在頁眉頁腳中調用單元格內容

Excel利用VBA在頁眉頁腳中調用單元格內容

有時我們需要在Excel的頁眉頁腳中調用某個單元格內容，例如讓用戶在A1單元格中填入月份，如“一月”，在頁眉處自動生成“一月報表”，可以用VBA代碼來實現，步驟如下：

1.按Alt+F11，打開VBA編輯器。

2.在“工程”窗口中，雙擊“ThisWorkbook”，在右側的代碼窗口中輸入下列代碼：

Private Sub Workbook_BeforePrint(Cancel As Boolean)ActiveSheet.PageSetup.LeftHeader = Range("A1").Value & "報表"End Sub

這樣，每次在打印工作表時，會自動在頁眉左側調用A1單元格中的內容，如A1單元格內容為“一月”，左側頁眉中顯示“一月報表”。

如果要在頁腳中調用單元格內容，將上述代碼改為：

Private Sub Workbook_BeforePrint(Cancel As Boolean)ActiveSheet.PageSetup.LeftFooter = Range("A1").Value & "報表"End Sub

同樣，如果需要在頁眉或頁腳的中部、右側調用單元格內容，只須將“LeftHeader”更換成“CenterHeader”、“CenterFooter”、“RightHeader” 和 “RightFooter”。

版權聲明：本文內容由網絡用戶投稿，版權歸原作者所有，本站不擁有其著作權，亦不承擔相應法律責任。如果您發現本站中有涉嫌抄襲或描述失實的內容，請聯系我們jiasou666@gmail.com 處理，核實后本網站將在24小時內刪除侵權內容。

版權聲明：本文內容由網絡用戶投稿，版權歸原作者所有，本站不擁有其著作權，亦不承擔相應法律責任。如果您發現本站中有涉嫌抄襲或描述失實的內容，請聯系我們jiasou666@gmail.com 處理，核實后本網站將在24小時內刪除侵權內容。