Valores de intercambio

Este ejemplo enseña cómo intercambiar dos valores en Excel VBA . A menudo necesitarás esta estructura en programas más complicados como veremos más adelante.

Situación:

Dos valores en tu hoja de trabajo.

Coloca un botón de comando en tu hoja de trabajo y añade las siguientes líneas de código:

1. Primero, declaramos una variable llamada temperatura de tipo Doble.

Temp. tenue como el doble

2. Inicializamos la variable temp con el valor de la celda A1.

temp = Rango(«A1»).Valor

3. Ahora podemos escribir con seguridad el valor de la celda B1 en la celda A1 (hemos guardado el valor de la celda A1 en temp para no perderlo).

Rango(«A1»).Valor = Rango(«B1»).Valor

4. Finalmente, escribimos el valor de la celda A1 (escrito a la temperatura) en la celda B1.

Rango(«B1»).Valor = temp

5. Haga clic en el botón de comando dos veces.

Resultado:

Deja un comentario