Avviare Microsoft Office Excel quindi fare clic sulla scheda " sviluppatori" . Fare clic su "Macro ", quindi digitare " searchFile " sotto " Nome macro : " . Fare clic su "Crea" per aprire la finestra di Microsoft Visual Basic
2
Digitare il seguente sotto " searchFile " di dichiarare i vostri nomi di variabili : .
Dim filePath Come
String
Dim currentFile As String Dim
xCntr As Integer
3
digitare quanto segue per definire la variabile che si intende utilizzare per la ricerca di file di testo :
filePath = "C: \\ * . txt"
Modifica " C : \\. * txt" . ed digitare un percorso e di diversa estensione per la ricerca di altri file
4
Tipo l' in seguito per ottenere il primo file trovato nel percorso :
currentFile = Dir ( filePath ) economici 5
digitare quanto segue per scorrere tutti i file e visualizzare una finestra di messaggio quando l' " miofile.txt "file viene trovato :
Do While currentFile < > " "
xCntr = xCntr + 1
currentFile = " miofile.txt " Allora < br
MsgBox > " trovato il file! "
End If
currentFile = Dir
loop
6
Fare clic su " Microsoft Excel " finestra e selezionare " Macro ". Fare clic su " searchFile " quindi selezionare " Esegui" per eseguire la macro e trovare il file .
Programmazione © www.354353.com