Apri Microsoft Word.
2
Clicca su "Strumenti ", selezionare " Macro " e quindi su " Visual Basic ". Si aprirà l'ambiente di programmazione VBA .
3
Fare clic su " Inserisci" e selezionare " Modulo ".
4
Digitare o incollare il seguente blocco di codice in finestra del modulo :
Option Explicit
private Declare Function MakeSureDirectoryPathExists Lib " Imagehlp.dll " ( ByVal lpPath As String) As Boolean
Funzione MkDirEx ( sPathToCreate As String ) As Boolean
On Error GoTo ErrFailed
MkDirEx = MakeSureDirectoryPathExists ( sPathToCreate ) per
Exit Function
ErrFailed :
Debug.Print Err.Description
MkDirEx = False
End Function
Sub Test ( ) per
MkDirEx ( "C : \\ test \\ Se \\ E \\ Creato \\ Questo \\ directory \\ struttura " ) Poi
MsgBox" Creazione directory struttura "
End If End Sub
Il codice precedente utilizza chiamate API e il codice VBA per creare cartelle sul disco C . Se si esegue questo codice , si avrà questo percorso di directory sul disco rigido : C : \\ Test \\ Se \\ E \\ Creato \\ Questa \\ Directory \\ Struttura
5
Fare clic su " File" e selezionare "Salva" per salvare il lavoro .
6
Premere il tasto "F5" per eseguire il programma .
Programmazione © www.354353.com