myAdBanner

2014年10月7日 星期二

EXCEL擷取欄位中的超連結

Excel 中並沒有擷取超連結的函數
所以必須自訂函數

方法如下:
  1. 按 Alt + F11 打開Visual Basic Editor。
  2. 在工具列選擇「插入」/「模組」。
  3. 貼上以面自訂函式碼。
  4. 按 Alt + Q 離開並回到Excel。

Function 
GetAddress(HyperlinkCell As Range)
    On Error Resume Next
    GetAddress = Replace(HyperlinkCell.Hyperlinks(1).Address, "mailto:", "")
End Function

word合併列印後 插入頁碼都是1

 word合併列印後 想說插入頁碼這樣比較之到是第幾頁
結果插入後頁碼都是1
看了一下才知道原來每頁後面都是插入分節符號
所以才都是第一頁

解決方法:
把分節符號改成分頁符號
Ctrl + H (取代)
尋找目標: ^b
取代為: ^m
就ok了