August 12
Imparare a impostare automaticamente un indirizzo IP per ruotare utilizzando Visual Basic, Applications Edition non è così difficile come si potrebbe pensare. Netsh.exe è uno strumento che può essere utilizzato per configurare i computer che utilizzano il prompt dei comandi di Windows. Netsh.exe può essere utilizzato per modificare un indirizzo IP quando è necessaria rotazione. La funzione "Shell" viene utilizzato in VBA per eseguire un programma eseguibile, come ad esempio il prompt dei comandi per eseguire Netsh.exe.
1 Avviare Microsoft Office Excel, fare clic sulla scheda "developer" e fare clic su "Visual Basic" per aprire l'editor VBA.
2 Fare clic sul menu "Inserisci" e fare clic su "Modulo" per inserire un nuovo modulo di codice.
3 Aggiungere il seguente codice per creare una nuova routine Sub:
Private Sub rotateIPAddress ()
4 Definire due variabili stringa:
Dim dosCommand As String
Dim ipAddress As String
5 Impostare l'indirizzo IP che si desidera utilizzare aggiungendo la seguente riga di codice:
IPaddress = "192.168.0.200"
6 Definire il comando per modificare l'indirizzo IP:
dosCommand = "set dns netsh interface ip" & Chr (34) & "Nome NIC" & Chr (34) e "statico" e ipAddress
7 Eseguire il comando utilizzando il comando "Shell":
Shell ( "cmd.exe / c" e dosCommand)
8 Tipo "End Sub" per terminare la procedura di sub e premere il tasto "F5" per eseguirlo.