victorvp

Señores expertos le presento mi siguiente problema, todos los días tengo que copiar la primera hoja de unos 60 archivos aproximadamente, la carpeta donde tengo estos archivo se llama terminal , mi consulta es la siguiente se podrá crear una macro que...

Señores como puedo modificar esta macro para que busque los archivos en una carpeta especifica Sub juntar() Dim hoja As Object Application.DisplayAlerts = False mio = ActiveWorkbook.Name Str ruta = "C:\perfiluser\desktop\TRABAJO ANGELO.xls" archi =...

Estimados, si me pueden ayudar o guiar se los agradeceré, tengo una carpeta con unos 50 archivos, cada archivo tiene solo una hoja, lo que busco es que la macro busque cada archivo de excel de esta carpeta, copie los datos de la primera hoja de cada...

Todos los días copio unas treinta libros solo la hoja 1 las cuales tienen el mismo formato, y las pego en una hoja nueva, esto puede se automatizar, se refundir el contenido de todos los libros, si esto es posible alguien me puede ayudar.

Estimados, necesito modificar esta macro para que me pueda copiar hasta la columna ap aunque no existan valores en algunas columnas Sub ejemplo() 'por luismondelo Application.DisplayAlerts = False For Each hoja In ActiveWorkbook.Sheets If hoja.Name =...

Encontré la siguiente macro que copia todas las hojas de un archivo en una sola, pero necesito modificarlo para que busque todos los archivo de una carpeta llama flujo en la cual hay mas de 40 archivos los copie y los pegue en un solo archivo, ¿Me...

Expertos como hacer que esta macro copie la hoja 1 la pegue en la hoja y envíe la hoja 2 por correo Public Sub copiahoja() Sheets("hoja2").Copy Dim dia As String Dim tim As String Dim nom As String Dim ext As String Dim Path As String dia =...

Expertos buenos día tengo el siguiente código, pero no puedo lograr que el asusto cambie según el el valor de una celda, agradacere mucho la ayuda de ustedes en este tema aquí les dejo el código: Public Sub copiahoja() Sheets("hoja2").Copy Dim dia As...

Estimados tengo la siguiente macro pero no me funciona del todo bien, necesito que recorra una capeta especifica pero recorre todos los archivos excel de pc como lo puedo solucionar. Sub juntar() Dim hoja As Object Application.DisplayAlerts = False...

Amigos estoy tratando de trabajar con una macro que encontré pero al ejecutarla tengo problemas con la orden chdir ruta, lo que busco es los siguiente en una carpeta llamada control tengo 300 libros cada uno con 4 hojas estoy tratando de juntar la...