Ayuudddaaaa
Tengo una macro que realice con la grabadora de macros:
Sub Macro1()
'
' Macro1 Macro
'
'
Sheets("ALEATORIOS").Select
Range("B4:V43").Select
Selection.Copy
Sheets("POB INI").Select
Range("B3").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub
Pero siempre me ha gustado trabajar con botones Actiex...
Cree el boton y le pegue el codigo:
Private Sub CommandButton1_Click()
'
' Macro1 Macro
'
'
Sheets("ALEATORIOS").Select
Range("B4:V43").Select
Selection.Copy
Sheets("POB INI").Select
Range("B3").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub
Cuando corro la macro1 no hay problema, pero cuando ejecuto el botón, me genera error en Range("B4:V43"). Select
¿Por qué sucede esto?
Sub Macro1()
'
' Macro1 Macro
'
'
Sheets("ALEATORIOS").Select
Range("B4:V43").Select
Selection.Copy
Sheets("POB INI").Select
Range("B3").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub
Pero siempre me ha gustado trabajar con botones Actiex...
Cree el boton y le pegue el codigo:
Private Sub CommandButton1_Click()
'
' Macro1 Macro
'
'
Sheets("ALEATORIOS").Select
Range("B4:V43").Select
Selection.Copy
Sheets("POB INI").Select
Range("B3").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub
Cuando corro la macro1 no hay problema, pero cuando ejecuto el botón, me genera error en Range("B4:V43"). Select
¿Por qué sucede esto?
1 respuesta
Respuesta de caranbis
1