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

Situación:

Dos valores en su hoja de trabajo.

Coloque un botón de comando en su hoja de trabajo y agregue las siguientes líneas de código:

1. Primero, declaramos una variable llamada temp de tipo Double.

Dim temp As Double

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

temp = Range("A1").Value

3. Ahora podemos escribir con seguridad el valor de la celda B1 en la celda A1 (hemos almacenado el valor de la celda A1 en la temperatura para que no lo perdamos).

Range("A1").Value = Range("B1").Value

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

Range("B1").Value = temp

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

Resultado:

2/9 ¡Completado! Obtenga más información sobre la creación de macros>
Siguiente capítulo: MsgBox