Luis Mondelo

Ok, esta es la solución para un ejemplo de analizar la celda A1 Pondríamos esta fórmula en la opción FORMULA dentro del formato condicional para la citada celda =no(eserror(hallar("-v";a1))) recuerda finalizar

En el siguiente enlace te dejo un archivo con la solución http://share.cx.com/KczWCP No olvides finalizar la consulta

Ok, ¿cómo quieras que aparezcan los datos en los txt? ¿Separados por comas? ¿Por un espacio?

Mándame el archivo con un ejemplo de los datos para poder ayudarte mejor [email protected]

Te mando la solución con un ejemplo. Anota uno de esos números en la celda A1 y luego ejecuta esta macro: Sub proceso() Range("a1").Select ActiveCell.Value = "'" & ActiveCell.Value ActiveCell.Characters(Len(ActiveCell), 1).Font.Superscript = True End...

Te muestro el ejemplo con una celda con esta macro: Tenemos un comentario en la celda B4 y con la macro lo sacaremos y lo dejaremos escrito en la celda A1 Sub proceso() texto = Range("b4").Comment.Text Range("a1").Value = texto End Sub recuerda finalizar

Después de la línea sub listfiles() escribe esta: sheets("hoja2").select

Esa macro es correcta y lo único que hace es escribir el nombre del archivo en una celda y continuar escribiendo hacia abajo en la misma columna.

Dime el rango total de la hoja que quieres convertir a imagen

Mándame el archivo con los datos y un ejemplo. De esta manera te ayudaré sobre tus datos [email protected]