½Ð±Ð½Ñ¦ì¤j¤j:
Filt = "Excel Files (*.xls),*.xls"
FilterIndex = 5
Title = "Select a File to Import"
FileName = Application.GetOpenFilename _
(FileFilter:=Filt, _
FilterIndex:=FilterIndex, _
Title:=Title)
If FileName = False Then
MsgBox "No file was selected."
Exit Sub
End If
¥i§_ÅýÄÝ©ÊÁôÂä§ÀÉ¥ç¦b³Q¦C¥X¿ï¾Ü½d³ò¤º
»yªk¬O??
ÁÂÁÂ |