¤j®a¦¦w
¤p§Ì·Q¦bEXCEL¤¤³]¥ß¤@Ó«ö¶s,·í§Ú«ö¤U®É,¥L·|¶}±Ò¦P¥Ø¿ý¤UªºDMÀɮפ¤ªº123.PDFÀÉ
µ{¦¡½X¦p¤U:
Private Sub CommandButton18_Click()
fname = ThisWorkbook.Path & "\DM\123.pdf"
ActiveWorkbook.FollowHyperlink fname, , True
End Sub
¤W±ªºµ{¦¡¦bWINDOWSª©ªºEXCEL¤¤¥i¥H¶¶§Q¶}±Ò,¨S¦³°ÝÃD
¦ý¦bMACª©¤¤ªºOFFICE 2016«h¨S¦³¤ÏÀ³,¤£¯à¶}±ÒÀÉ®×123.PDF
½Ð°Ý§Ú¸Ó§@«ç¼Ëªº×¥¿Åý¥L¥i¥H¦bMACªºOFFICE¤¤¶}±ÒPDFÀÉ
·P®¦~~~~
PS:MACª©¤¤¸ô®|¦³×¦¨fname =ThisWorkbook.Path & "/DM/123.pdf" |