Modificar código para pegar como imagen no valores

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!
Responder
armasmung1984
Miembro Nuevo
Miembro Nuevo
Mensajes: 1
Registrado: 19 Jul 2019 23:19

Modificar código para pegar como imagen no valores

Mensaje por armasmung1984 » 20 Jul 2019 05:30

Macro para crear etiquetas, requiero su ayuda para pegar cada etiqueta como imagen y no como valores, adjunto archivo para que vean su funcionamiento, lo tome de otro tema que ya existía aquí.


Sub Etiquetas()
Application.ScreenUpdating = False
Hoja2.Cells.Clear
Hoja3.Range("2:1").Copy

For x = 2 To Hoja1.Range("A" & Rows.Count).End(xlUp).Row
fila = (x - 2) * 2 + 1
Hoja2.Range("A" & fila).PasteSpecial xlPasteAll
Hoja2.Range("A" & fila) = Hoja1.Range("N" & x)

Next
Application.CutCopyMode = False
Hoja2.Select
End Sub
No tienes los permisos requeridos para ver los archivos adjuntos a este mensaje.



Avatar de Usuario
Cacho R
Miembro Frecuente
Miembro Frecuente
Mensajes: 11244
Registrado: 23 Jun 2011 17:15
Ubicación: Buenos Aires
Contactar:

Re: Modificar código para pegar como imagen no valores

Mensaje por Cacho R » 20 Jul 2019 17:58

Hola! armasmung
¡No se entendió nada!...

Te sugiero que vuelvas a subir al Foro tu archivo pero -esta vez- trata que queden MUY claramente especificados:

a) Tengo esta información, y
b) Quiero conseguir esto otro (tómate el trabajo de hacerlo "a mano", claro)

Saludos, Cacho R.



Responder