Foros de daboweb
GENERAL, ayuda informatica, trucos, problemas, internet, messenger, software, programas, solidaridad, P2P => Foro general - Internet - Trucos - Redes - Ayuda informatica - Software - Programas => Mensaje iniciado por: dic en 08 de Septiembre de 2008, 12:27:23 am
-
hola a qué puede deberse que en un libro de Excel donde tengo una macro que copia un rango y luego lo pega con pegado especial:valores, ahora de pronto no haga el pegado sino que enla barra de estado me aparezca el mensaje: "Seleccione el destino y presione entrar"?
Gracias
-
Se te olvidó poner el código de la macro...
-
Ese es un mensaje tipico cuando llevas un archivo con macros a otra maquina en la que el mapeo de discos es diferente
Copia la macro para poder analizarlo
-
Aquí está:
Sub COPIARVALORPRECIO()
' COPIARVALORPRECIO Macro
' Macro grabada el 02-08-2008 para Cambio de Precios
Sheets("DBase").Select
'Application.Goto Reference:="Sheets("DBase").R3C86"
Range("CR3:CR2000").Select
Selection.Copy
'Application.Goto Reference:="R3C18"
'ActiveWindow.SmallScroll Down:=-6
Range("O3:O2000").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
'Sheets("Formulario PRECIO").Select
End Sub
-
Segun las formulas editadas por ti haces referencia a una hoja Formulario Precio que no esta activa y estas trabajando en una hoja DBase
No necesitas seleccionar el rango de destino solo la primera celda
Te sugiero trabajar con nombres de rango y no con definición de rangos
Sub COPIARVALORPRECIO()
' COPIARVALORPRECIO Macro
Range("C3:C2000").Select
ActiveWorkbook.Names.Add Name:="precio", RefersToR1C1:= _
"=Sheet1!R3C3:R2000C3"
Selection.Copy
Range("O3").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("A1").Select
Application.CutCopyMode = False
End Sub
Un saludo