Atajo de teclas para pegado especial: tranponer

Martin:
Entiendo que son dos libros distintos si es así entonces la
macro tiene que estar en el libro destino y pegara en la celda donde estas
posicionado


para correr esta macro
Public Sub Macro1()

Windows("Book1").Activate 'se mueve al Libro
Book1 donde bas a copiar colocale el nombre de tu libro
Range("A4:B15").Select 'Rango de
celdas a copiar
Selection.Copy

Windows("Book2").Activate 'Se mueve al libro
destino a donde quieres copiar
Selection.PasteSpecial Paste:=xlPasteAll, _
Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True
End Sub

me comentas si te funciono




"Martin Zimmermann" escribió en el mensaje
news:

Gracias Ronald:

La cosa es asi:
Yo tengo que llevar lo que copio en unas filas de otra planilla, a una en
donde estoy trabajando, pero que el pegado sea vertical (columnas). Cuando
grabé la macro, por lo que veo, me puso el rango ("E52"), y lo q yo quiero
es pegarlo donde yo quiera, me explico?

Saludos

Martín
pd. abajo va el codigo de la macro

Sub Transponer()
'
' Transponer Macro
' Macro grabada el 28/11/2003 por Martin Zimmermann
'
' Acceso directo: CTRL+w
'
Range("E52").Select
Selection.PasteSpecial Paste:=xlAll, Operation:=xlNone,
SkipBlanks:=False _
, Transpose:=True
End Sub



Martin:
Si mandaras el codigo que tienes y el rango a donde quieres ir
pegando talvez te podamos ayudar con la macro
explicanos un poco mas, pues yo que la macro es la unica solución



Ronald E. Sánchez
El Salvador-San Salvador

"Martin Zimmermann" escribió en el

mensaje

news:
> Lo hice, lo que pasa es que la macro me coloca los datos, justo donde la
> grabe, y yo quiero que los coloque en las celdas donde tengo que pegar

los

> nuevos datos
> A ver otra ayuda?
> Gracias
> Martín
>
>
>
> Créate una macro (con la grabadora de macros) que te
> automatice esas operaciones, bájate un icono
> personalizado, asígnale esa macro, y harás todo ese
> trabajo con un simple click.
>
> :-)
>
>
> >Hola gente!
> >
> >La pregunta es la siguiente:
> >
> >Tengo que hacer un montón de pegados especiales con la
> opción transponer, y
> >estoy perdiendo mucho tiempo en realizar la tarea con la
> operación habitual:
> >botón derecho > pegado especial > transponer >
> aceptar
> >Hay alguna manera de crearme un atajo en el teclado para
> solucionar esto?
> >
> >Desde ya muy agradecido.
> >
> >Martín
> >
> >
> >.
> >
>
>

Miles de gracias por las ayudas prestadas.
Que bueno que existe el news y gente como ustedes...
Cordiales saludos

Martín





Martin:
Entiendo que son dos libros distintos si es así entonces la
macro tiene que estar en el libro destino y pegara en la celda donde estas
posicionado


para correr esta macro
Public Sub Macro1()

Windows("Book1").Activate 'se mueve al Libro
Book1 donde bas a copiar colocale el nombre de tu libro
Range("A4:B15").Select 'Rango de
celdas a copiar
Selection.Copy

Windows("Book2").Activate 'Se mueve al libro
destino a donde quieres copiar
Selection.PasteSpecial Paste:=xlPasteAll, _
Operation:=xlNone, SkipBlanks:= _
False, Transpose:=True
End Sub

me comentas si te funciono




"Martin Zimmermann" escribió en el mensaje
news:

Gracias Ronald:

La cosa es asi:
Yo tengo que llevar lo que copio en unas filas de otra planilla, a una en
donde estoy trabajando, pero que el pegado sea vertical (columnas). Cuando
grabé la macro, por lo que veo, me puso el rango ("E52"), y lo q yo quiero
es pegarlo donde yo quiera, me explico?

Saludos

Martín
pd. abajo va el codigo de la macro

Sub Transponer()
'
' Transponer Macro
' Macro grabada el 28/11/2003 por Martin Zimmermann
'
' Acceso directo: CTRL+w
'
Range("E52").Select
Selection.PasteSpecial Paste:=xlAll, Operation:=xlNone,
SkipBlanks:=False _
, Transpose:=True
End Sub



Martin:
Si mandaras el codigo que tienes y el rango a donde quieres ir
pegando talvez te podamos ayudar con la macro
explicanos un poco mas, pues yo que la macro es la unica solución



Ronald E. Sánchez
El Salvador-San Salvador

"Martin Zimmermann" escribió en el

mensaje

news:
> Lo hice, lo que pasa es que la macro me coloca los datos, justo donde la
> grabe, y yo quiero que los coloque en las celdas donde tengo que pegar

los

> nuevos datos
> A ver otra ayuda?
> Gracias
> Martín
>
>
>
> Créate una macro (con la grabadora de macros) que te
> automatice esas operaciones, bájate un icono
> personalizado, asígnale esa macro, y harás todo ese
> trabajo con un simple click.
>
> :-)
>
>
> >Hola gente!
> >
> >La pregunta es la siguiente:
> >
> >Tengo que hacer un montón de pegados especiales con la
> opción transponer, y
> >estoy perdiendo mucho tiempo en realizar la tarea con la
> operación habitual:
> >botón derecho > pegado especial > transponer >
> aceptar
> >Hay alguna manera de crearme un atajo en el teclado para
> solucionar esto?
> >
> >Desde ya muy agradecido.
> >
> >Martín
> >
> >
> >.
> >
>
>