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

[µo°Ý] VBA¥i¥H°µ¨ì³]­p¼u¥X¦¡µ¡Åý¨Ï¥ÎªÌÂI¿ïÀÉ®×¥H¶×¤Jªº¥\¯à¶Ü?

Dim Fname As String
Fname = Application.GetOpenFilename("¤å¦r¤å¥ó,*.txt")
If len(Fname)>0  Then

TOP

        ÀR«ä¦Û¦b : ¤â¤ß¦V¤U¬O§U¤H¡A¤â¤ß¦V¤W¬O¨D¤H¡F§U¤H§Ö¼Ö¡A¨D¤Hµh­W¡C
ªð¦^¦Cªí ¤W¤@¥DÃD