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

[µo°Ý] ¦p¦óÅýµ{¦¡¿ï¾ÜÀɮתº®É­Ô¤´¯à°Ê§@?

[µo°Ý] ¦p¦óÅýµ{¦¡¿ï¾ÜÀɮתº®É­Ô¤´¯à°Ê§@?

·í¤U¤èµ{¦¡¹B¦æ¨ìfd.show ªº®É­Ô,´N·|¶}±Ò¤@­Ó¹ï¸Üµøµ¡
Åý±z¿ï¾ÜÀÉ®×
¦ý­Yµøµ¡¨S¦³¤â°ÊÃö³¬¤§«e,µ{¦¡§¹¥þµLªkÄ~Äò¶i¦æ
§Úªº¥Øªº¬O·íºô­¶ÂI¿ï¸Ó«ö¶sªº®É­Ô,·|¸õ¥X§¹¥þ¬Û¦Pªºµøµ¡
·QÅýµ{¦¡¥i¥HÄ~Äò°Ê§@,§¹¦¨¦Û°Ê¿ï¾ÜÀɮתº°Ê§@
¥i¬O¤@¦ý¨ì¤F³o­Óµøµ¡´NµLªk°Ê§@¤F,¦³¤j¤j¦³¬Æ»ò¸Ñ¨Mªº¤èªk¶Ü?
  1. Set FD = Excel.Application.FileDialog(msoFileDialogFilePicker)  '³]©w¿ï¨úÀÉ®×¥\¯à
  2. FD.Filters.Add "Excel File", "*.xls*" '³]©wÅã¥Üªº°ÆÀɦW
  3. If FD.Show = -1 Then
  4.      Path = FD.SelectedItems(1)
  5. Else
  6.     End
  7. End If
½Æ»s¥N½X
PKKO

        ÀR«ä¦Û¦b : ºÉ¦h¤Ö¥»¥÷¡A´N±o¦h¤Ö¥»¨Æ¡C
ªð¦^¦Cªí ¤W¤@¥DÃD