Aprender cómo configurar automáticamente una dirección IP para girar con Visual Basic para aplicaciones no es tan difícil como usted puede pensar. Netsh.exe es una herramienta que se puede utilizar para configurar los ordenadores que utilizan el símbolo del sistema de Windows. Netsh.exe se puede utilizar para cambiar una dirección IP cuando se necesita rotación . La función de "Shell " se utiliza en VBA para ejecutar un programa ejecutable , como el símbolo del sistema para ejecutar Netsh.exe . Cosas que necesitará
Microsoft Office Excel
Ver Más instrucciones
1

lanzamiento de Microsoft Office Excel , haga clic en la pestaña " desarrolladores" y haga clic en "Visual Basic " para abrir el Editor de VBA.

2 Haga clic en el menú " insertar" y haga clic en " módulos" para insertar un nuevo módulo de código .
3

Añada el siguiente código al crear un nuevo procedimiento sub :

rotateIPAddress sub Private ()
4

Definir dos variables de cadena :

Dim dosCommand Como StringDim IPADDRESS Como
secuencia < br > 5

Configure la dirección IP que desea utilizar agregando la siguiente línea de código :

ipAddress = " 192.168.0.200 "
6

definir el comando que cambiar la dirección IP:

dosCommand = " netsh interface ip set dns " & Chr ( 34 ) & " Nombre NIC" & Chr ( 34 ) & " estática " y ipAddress
7

Ejecuta el comando con el comando "Shell ":

Shell ( "cmd.exe /c" y dosCommand )
8 < p > Tipo "End sub ​​" para poner fin a su procedimiento sub y pulse la tecla "F5 " para ejecutarlo .