錦子老師

在自訂頁首/頁尾的功能裡有一項是加入日期，我想請問的是如何將他改成民國格式呢??

例如：2018/9/24變成107/09/24呢??我試過用地區及語言選項選擇中華民國曆，但是在自訂頁尾裡加入的日期&[日期] 還是一樣是西元格式，請問該如何才能改成我要的國曆呢？

謝謝

方法一： 使用「標題列」功能（會固定出現在每一列印頁之工作表內容）

步驟1：點取「常用 > 插入 > 插入工作表列」指令，插入一列空白列。

步驟2：在A1 儲存格中輸入公式「=TODAY()」或「=NOW()」。

步驟3：在A1儲存格上方按滑鼠右鍵，選擇「儲存格格式」指令。

步驟4：在【設定儲存格格式】對話方塊，點取「數值」標籤。

步驟5：點取「自訂」類型，再點取「類型」文字方塊，輸入「"日期："ggge年mm月dd日」

步驟6：點取「確定」鈕。

步驟7：框選A1:F1儲存格範圍，點取「常用 > 跨欄置中」圖示。

您可以視自已需求，再設定要靠左、靠右對齊，目前是置中。

步驟8：點取「版面配置 > 列印標題」圖示。

步驟9：點取「工作表」標籤頁，再點取「標題列」文字方塊，輸入「1:2」。

1:2 中的1為第一列即我們要顯示的民國日期，而2為第二列為欄位標題。

步驟10：點取「預覽列印」鈕，即會看到每頁都顯示民國日期及欄位標題。

第一頁

第二頁

■ 方法二：使用 VBA（巨集）

步驟1：在工作表中，按下Alt + F11鍵，開啟VBA視窗。

步驟2：點取「插入 > 模組」指令，開啟一個空白模組工作表。

步驟3：將以下程式碼貼至右側「程式碼視窗」中

Private Sub Workbook_BeforePrint(Cancel As Boolean)

Dim myDate$

myDate = Format(Date, "ggge年mm月dd日")

ActiveSheet.PageSetup.LeftHeader = myDate

End Sub

步驟：按Alt + F11回到工作表，執行「列印」即可看見成果。