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

[¤À¨É] Excel ¤º«Øªº¹w³]"¸ô®|"¨ç¼Æ¾ã²z

[¤À¨É] Excel ¤º«Øªº¹w³]"¸ô®|"¨ç¼Æ¾ã²z

Sub EnvironHelp()
    Debug.Print Application.AltStartupPath        '¶Ç¦^¨ú¥N±Ò°Ê¸ê®Æ§¨ªº¦WºÙ
    Debug.Print ActiveWorkbook.Path               '¶Ç¦^¥Ø«e¤u§@諸¸ô®|(ÀÉ®×¥¼¦sÀɮɶǦ^ªÅ¦r¦ê)
    Debug.Print ActiveWorkbook.FullName           '²{¥Î¥Ø«e¤u§@諸¸ô®|¤ÎÀɮצWºÙ(ÀÉ®×¥¼¦sÀɮɥu¶Ç¦^¼È¦sÀɦW)
    Debug.Print Application.NetworkTemplatesPath  '¶Ç¦^Àx¦s½d¥»©Ò¦bªººô¸ô¸ô®|¡A¦pªG«ü©wªººô¸ô¸ô®|¤£¦s¦b¡A¥»ÄݩʱN¶Ç¦^¤@ªÅ¦r¦ê
    Debug.Print Application.TemplatesPath         '¶Ç¦^Àx¦s½d¥»©Ò¦bªº°Ï°ì¸ô®|
    Debug.Print Application.Path                  '¶Ç¦^Excelµ{¦¡§¹¾ã¸ô®|
    Debug.Print Application.DefaultFilePath       '¶Ç¦^©ÎªÌ³]©w Microsoft Excel ¶}±ÒÀɮ׮ɨϥΪº¹w³]¸ô®|
    Debug.Print Application.StartupPath           '¶Ç¦^±Ò°Ê¸ê®Æ§¨ªº§¹¾ã¸ô®|
    Debug.Print Application.LibraryPath           '¶Ç¦^µ{¦¡®w¸ê®Æ§¨ªº¸ô®|
    Debug.Print Application.UserLibraryPath       '¶Ç¦^¨Ï¥ÎªÌ¹q¸£¤W COM ¼W¯q¶°¦w¸Ë¦ì¸mªº¸ô®|(2000¥H¤W)
    Debug.Print Application.PathSeparator         '¶Ç¦^¸ô®|¤À¹j²Å¸¹
    Debug.Print CurDir                            '¶Ç¦^¥Ø«eªº¸ô®|(¶}±ÒÂÂÀɮɽu¥«ªº¸ô®|)
End Sub

        ÀR«ä¦Û¦b : ¦³Ä@©ñ¦b¤ß¸Ì¡A¨S¦³¨­Åé¤O¦æ¡A¥¿¦p¯Ñ¥Ð¤£¼½ºØ¡A¬Ò¬OªÅ¹L¦]½t¡C
ªð¦^¦Cªí ¤W¤@¥DÃD