如何設置頁眉和頁腳圖片頁眉頁腳怎么設置? _如何

文章插圖
在excel表格中，設置頁眉和頁腳圖片是一個很有用的操作，它可以提高文件標志性格式的統一性。
如果增加一些公司LOGO，那就更需要添加一個圖片了。
本文將利用VBA代碼來介紹一下，如何通過編碼實現添加頁眉頁腳圖片的效果。
如下圖所示，添加了一個左上角圖片，那是個頁眉圖片，并不是插入的圖片，可以看到第二頁同樣會自動添加一個頁角，實際上是所有頁都會自動添加。
那就介紹一下，如何實現這樣的效果。
首先我們會用到一個對象，即Graphic對象。
Graphic對象并不是憑空出現的，它需要另一個對象的某個屬性來返回得到。
如下表所示：
PageSetup對象的幾個屬性都將返回一個Graphic對象。
分別指的是頁眉的左中右和頁腳的左中右的圖片對象。
這樣理解就簡單多了。
而PageSetup對象在以前文章里有介紹，具體內容可查看一下。
PageSetup對象是WorkSheet對象的一個屬性返回的。
文字表達有點繞，下面具體看一行代碼：
set xGobj=ActiveSheet.PageSetup.LeftHeaderPicture
這樣就得到一個Graphic對象xGobj，它代表左上角頁眉的圖片。
下面利用Graphic對象的一些屬性來設置一下相關內容，如下圖所示：
通過上圖屬性設置之后，就可以實現對左上角頁眉的圖片格式化。
具體代碼可以在文章后面查看。
這里還需要一行代碼，以確定頁眉顯示圖片。
ActiveSheet.PageSetup.LeftHeader = "&G"
下圖為圖片轉換效果的枚舉類型，也是ColorType屬性的可選值，實際上就是頁眉圖片以什么樣的方式進行顯示，默認為原圖顯示，也有黑白顯示，灰度顯示等等，實際操作中可以設置不同的值逐一調試。
為什么要說這個呢?主要是因為同樣是一張圖片，用不同的顏色轉換可以呈現出不同的效果，就像同樣是一個紅色，每個人的眼里其實并不是一樣的紅色，有些人看到的是深紅，有些人看到是淺紅，還有些人看到的確是黃色，這并不奇怪。
這就是說，這個世界并沒有顏色，只不是你的大腦告訴你世界是五顏六色的。
代碼：
代碼是重點要學習的內容，如果深入理解，這一點并不困難，而且對于利用這樣的方法實現一個自動化的過程，也是一件十分有意義的事情。

Private Sub NewLeftPictrue()Dim xGrObj As ObjectSet xGrObj = ActiveSheet.PageSetup.LeftHeaderPicture'返回Graphic對象With xGrObj.Filename = ThisWorkbook.Path & "pic01.jpg"'默認圖片.Width = 30.Height = 80.LockAspectRatio = True'設置比例不變.Brightness = Me.TextBox1.Value'設置亮度.Contrast = Me.TextBox2.Value'設置對比度.CropLeft = 100'裁剪左邊距離.CropRight = 100'裁剪右邊距離.CropTop = 50'裁剪上邊距離.CropBottom = 50'裁剪下邊距離.ColorType = msoPictureAutomatic'設備顏色轉換類型End WithWith ActiveSheet.PageSetup.LeftHeader = "&G"'設置頁眉圖片.TopMargin = xGrObj.Height + 30'設置頁眉高度End WithEnd Sub

本文內容實際有很大的拓展可能，分別對不同的頁角進行設置，可以很好的體現個性化的文本打印效果，有需要趕快收藏學習吧！
歡迎關注、收藏
---END---
【如何設置頁眉和頁腳圖片頁眉頁腳怎么設置?】

以上關于本文的內容，僅作參考！溫馨提示：如遇健康、疾病相關的問題，請您及時就醫或請專業人士給予相關指導!

「愛刨根生活網」www.malaban59.cn小編還為您精選了以下內容，希望對您有所幫助：

如何設置頁眉和頁腳圖片 頁眉頁腳怎么設置?

如何設置頁眉和頁腳圖片頁眉頁腳怎么設置?