Problema con la copia de unas celdas

Solo consultas sobre macros y código VBA Excel.

Reglas del Foro
1. Antes de hacer tu pregunta intenta con el buscador de este foro (muchas preguntas ya fueron respondidas antes!)
2. Si haces una nueva pregunta, es muy recomendable que adjuntes el ejemplo Excel para poder comprenderla mejor!
3. Realiza tu pregunta de forma clara, explicando bien cada paso de lo que haces y tendrás más probabilidad de respuesta!
Compartir en:
     

Problema con la copia de unas celdas

Notapor pipo11 » 01 Jun 2006 04:15

Quiero realizar una copia de las celdas A1-A3 y A5-A7 a las celdas B1-B3 y B5-B7, el código ya lo tengo pero no sé como expresar esto, mi actual código:
Código: Seleccionar todo
Private Sub OptionButton1_Click()
Application.ScreenUpdating = False

posicion = ActiveCell.Address
If OptionButton1.Value = True Then
Range ("A1:A3" "A5-A7).Select
Selection.Copy
Range("B1:B3""B5:B7").Select
ActiveSheet.Paste
Application.CutCopyMode = False
Range(posicion).Select
End If
Application.ScreenUpdating = True
End Sub

Muchas gracias
* Te recomendamos estos productos Excel: Manual de Macros | Manual de Funciones | Nuevas Funciones | ddTraDa
Avatar de Usuario
pipo11
Miembro Frecuente
Miembro Frecuente
 
Registrado: 26 Ene 2006 06:38

Notapor pipo11 » 01 Jun 2006 04:33

Di con una solución:
Range ("A1:A3").Select
Range("A5:A7").Select

y le digo que me lo copie en
Range ("B1:B3").Select
Range("B5:B7").Select
* Te recomendamos estos productos Excel: Manual de Macros | Manual de Funciones | Nuevas Funciones | ddTraDa
Avatar de Usuario
pipo11
Miembro Frecuente
Miembro Frecuente
 
Registrado: 26 Ene 2006 06:38


Compartir en:
     

  • Anuncio
Manual Excel avanzado

Volver a Macros

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 5 invitados