Lære å automatisk sette en IP-adresse for å rotere ved hjelp av Visual Basic for Applications er ikke så vanskelig som du kanskje tror. Netsh.exe er et verktøy som kan brukes til å konfigurere datamaskiner som bruker Windows ledeteksten. Netsh.exe kan brukes til å endre en IP-adresse ved rotasjon er nødvendig. Den " Shell " -funksjonen brukes i VBA til å kjøre et kjørbart program, for eksempel ledeteksten til å utføre Netsh.exe . Du trenger
Microsoft Office Excel
Vis flere instruksjoner
en
Launch Microsoft Office Excel , klikker du på " Developer " og klikk " Visual Basic " for å åpne VBA Editor .
2
Klikk på " Insert"-menyen og klikk " module" for å sette inn en ny kode modul .
3
Legg til følgende kode opprette en ny sub prosedyre : en
Private Sub rotateIPAddress ( )
4
Definer to strengvariabler :
Dim dosCommand Som StringDim ipadresse As String
5
Still inn IP-adressen du ønsker å bruke ved å legge til følgende kodelinje : en
ipAddress = " 192.168.0.200 "
6
Definer -kommandoen til endre IP-adressen : en
dosCommand = " netsh interface ip set dns " & Chr ( 34 ) & " NIC Name " & Chr ( 34 ) & " statisk" & ipAddress
7
Utfør kommandoen ved hjelp av " Shell "-kommandoen : en
Shell ( " cmd.exe /c " & dosCommand )
8 < p > type "End sub " å avslutte delprosedyre og trykk " F5 " tasten for å kjøre den .