作者lgtenos (我真是猜不透你阿)
看板Office
標題[算表] VBA 頁首抓取固定儲存格文字並且設定格式
時間Wed Dec 8 12:22:33 2021
軟體:EXCEL
版本:365
頁首是固定文字的話,這樣寫可以指定頁首的文字格式
ActiveSheet.PageSetup.CenterHeader = "&18&B&""Microsoft JhengHei""test"
頁首如果是要抓取工作表內某儲存格的文字,要如何設定頁首的文字格式呢?
ActiveSheet.PageSetup.CenterHeader = ActiveSheet.Cells(2, 10)
試了好久都寫不出來
有人能幫幫忙嗎
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 220.133.19.154 (臺灣)
※ 文章網址: https://www.ptt.cc/bbs/Office/M.1638937356.A.B4D.html
推 waiter337: ActiveSheet.Cells(2, 10) 改成 12/08 12:34
→ waiter337: 文字格式喔= = ? 12/08 12:36
→ lgtenos: 是的,想要修改頁首的字型,文字大小,粗體 12/08 12:37
推 gunit01: 可以試試看錄製巨集修改格式,再把你要的條件加入巨集 12/08 12:46
→ soyoso: 二個雙引號改為一個 12/08 12:47
→ soyoso: ...cells(2,10)是可行的 12/08 12:48
→ waiter337: """&18&B&""""Microsoft JhengHei""""" & ActiveSheet. 12/08 13:06
→ waiter337: Cells(2, 10) & """" 12/08 13:06
→ waiter337: 我沒招了 12/08 13:08
→ lgtenos: 謝謝各位 12/08 13:14
→ lgtenos: 最後修改成如下就可以了 12/08 13:14
→ lgtenos: ...header="&""微軟正黑體,粗體""&16" + Act...(2, 10) 12/08 13:15
→ lgtenos: 是不是因為要先塞一個字串讓他設定好格式之後 12/08 13:16
→ lgtenos: 才能抓取儲存格資料 12/08 13:16
→ waiter337: 他的centerHeader 有很煩的機制 12/08 13:49
→ waiter337: 我建議 .centerheader 要做兩次 12/08 13:50
→ waiter337: 第一次 要用.CenterHeader = "" 清空所有資料 12/08 13:50
→ waiter337: 第二次再放入你要的格式跟文字 不然會被前一次卡住 12/08 13:50
→ waiter337: 試到最後還失敗 只能用s大的方法 12/08 14:55
→ waiter337: 我一直遇到 第一次有用 第二次就改不掉的問題 12/08 14:55