Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

Offset con valor de celda

12/11/2007 - 14:57 por ponxeda | Informe spam
Ayuda Hacer una pregunta
Buenos Días,

Por favor me podrían ayudar con esta macro, quiero que el offset para
que baje filas sea el valor de una celda, alguien que me ayude con
esto por favor,

Adjunto la macro

Sub Macro13()
Range("A6:L6").Select
Selection.Copy
Sheets("TE").Select
Range("A5").Offset(a6,0)
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:=False, Transpose:=False
Sheets("Mo_E").Select
Range("A6").Select
Application.CutCopyMode = False
End Sub
email Siga el debateRespuesta 5 respuestasRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 David
12/11/2007 - 16:27 | Informe spam
Así, a un primer vistazo, prueba cambiar la línea del Offset por:

Range("A5").Offset(Range("a6").value,0)

y comentas...



"" escribió:

Buenos Días,

Por favor me podrían ayudar con esta macro, quiero que el offset para
que baje filas sea el valor de una celda, alguien que me ayude con
esto por favor,

Adjunto la macro

Sub Macro13()
Range("A6:L6").Select
Selection.Copy
Sheets("TE").Select
Range("A5").Offset(a6,0)
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:=False, Transpose:=False
Sheets("Mo_E").Select
Range("A6").Select
Application.CutCopyMode = False
End Sub


Preguntas similares

 

Busqueda sugerida :