ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

[Âà¶K] VBA-±N¦³¶W³sµ²¤§¼ÐÃDªººô§}Åã¥Ü¥X¨Ó

[Âà¶K] VBA-±N¦³¶W³sµ²¤§¼ÐÃDªººô§}Åã¥Ü¥X¨Ó

­ìµoªíªÌ¡Gleonchou (2005-06-11)
  1. Sub aa()
  2. Selection.EndKey wdStory '´å¼Ð²¾¦Ü¤å¥ó§ÀºÝ
  3. Selection.TypeParagraph '´«¦æ
  4. For Each link In ActiveDocument.Hyperlinks
  5. Selection.TypeText "[*][url=" & link.Address & "]" & _
  6. ¡@¡@link.TextToDisplay & "[/url]" & vbLf & vbLf
  7. Next
  8. End Sub
½Æ»s¥N½X
°¶Ôйq¤l®Ñ,Åwªï§K¶O¤U¸ü°Ñ¦Ò
http://www.twbts.com/ebook/?subject=office
http://www.twbts.com/ebook/?subject=soft
°¶ÔÐÂîѮw---https://www.facebook.com/groups/669579416484096/
¦³¤@®a¬a¥J©±---https://www.facebook.com/sadodona

        ÀR«ä¦Û¦b : ºw¤ô¦¨ªe¡C²É¦Ì¦¨ÅÚ¡A¤Å»´¤vÆF¡A¤Å¥Hµ½¤p¦Ó¤£¬°¡C
ªð¦^¦Cªí ¤W¤@¥DÃD