·í¤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¶Ü?- Set FD = Excel.Application.FileDialog(msoFileDialogFilePicker) '³]©w¿ï¨úÀÉ®×¥\¯à
- FD.Filters.Add "Excel File", "*.xls*" '³]©wÅã¥Üªº°ÆÀɦW
- If FD.Show = -1 Then
- Path = FD.SelectedItems(1)
- Else
- End
- End If
½Æ»s¥N½X |