Tor Cheer

¿Los datos a buscar están dentro de una cadena de texto o son datos completos que están en cada celda?. Puede subir una imagen de sus datos para buscar una solución más precisa a lo que necesita.

Puede compartir una copia de su archivo para intentar ayudarle para buscar una solución.

¿Ha intentado dejar como comentario la línea que genera el archivo xlsx? Es probable que con esto unicamente, otra es que comparta su archivo para ver si tiene más dependencias para quitarlo.

Con esta macro copia datos en un rango fijo de un libro a otro, cualquier cosa comenta Sub copiarLibro() Dim x As Workbook Dim y As Workbook Set x = Workbooks.Open("C:\Users\Yion\Documents\Libro1.xlsm") Set y =...

¿Qué adaptación le quiere hacer a la hoja?

Ponga una imagen de sus datos, para intentar ayudarle

Intente con esta macro, en este ejemplo copia de la columna H a la columna R. Cualquier cosa comenta. Sub copiarNveces() ufh = Range("H" & Rows.Count).End(xlUp).Row For i = 1 To ufh Ncopia = Cells(i, 10).Value ufr = Range("R" &...

Intente con esta macro, en el ejemplo lo datos de la columna "L" los copia a la columna "P" verificando que no existan, adapte a su archivo de acuerdo en la ubicación de sus datos. Cualquier cosa comenta Sub copiar() uFd = Range("L" &...

Puede mostrar su código cuando envía los datos en excel, ahí podría estar la solución.

Sub extraerNombre() Nhojas = Sheets.Count For i = 2 To Nhojas namehoja = Sheets(i).Name Sheets(namehoja).Select nombre = Cells(3, 7).Value Sheets("Hoja1").Select ufr = Sheets("Hoja1").Range("G" & Rows.Count).End(xlUp).Row + 1...