Enrique Bernal

Lo de los 5 segundos no es practico, ya que te come memoria de tu computador, ya que cada vez que estés procesando algo, así no quieras o no haga nada la macro, igual correrá los códigos y disminuirá el tiempo de ejecución. Lo que te recomiendo es un...

Pues de que el archivo tiene problemas lo tiene, ya que puede ser que el explorador lo abra pero recuerda que vba lo abre de una manera más directa, en todo caso si es un archivo que tiene mucha info lo dable es que lo respaldes, en fin, si quieres...

Lo que pides considero quie lo puedes hacer con un if if t = "XES13" then go to Aportaciones: else if t = "XET13" then Go to Impuestos: Y así, pero no veo la funcionalidad porque de lo que yo veo aunque no entiendo bien la última parte hacer eso va a...

Lo que estas pidiendo son dos macros, una que cree y guarde el libro y otra que abra y aguarde. La primera es la siguiente: Sub Crea_Guarda() a = inputvox("Indicque el nombre del archivo") Workbooks.Add ChDir "C:\" ActiveWorkbook.SaveAs...

Con sumar. Si() te funcionaría, te expongo el siguiente ejemplo y tu lo adpatas a tus necesidades Pensemos que tus ventas están en la hoja 2 y tu matriz actualizada esta en la hoja 1, y tanto la hoja 1 como la 2 tienen el orden que tu indicaste: En...

Pues primero debes llenar una variable con el nombre del archivo, este puede estar en una celda a=Range("A1").value o se lo puedes dar a travez de un input a = inputbox("Ingrese el nombre del archivo") Luego modificas una parte de tu código, pero...

Cierra esta pregunta ya que esta repetida

Pues de cajón te podría decir que lo que necesitas es un for al inicio de la macro para que la misma se repita 12 veces, que es numero de meses. Luego debderías tener un listado con el nombre de los archivos, es decir, enero2010.xlsx, y por último...

Sub elimina() ActiveSheet.Next.Select ActiveWindow.SelectedSheets.Delete End sub Si le pones un for a esta macro lo repiete cuantas veces lo necesites.

Disculpa la demora, como no sabía si necesitabas o no reemplazar el archivo lo que hice fue colocar el valor a un lado. Cualquier duda me avisas Sub cambia() a = InputBox("Ingrese la primera fila a revisar") b = InputBox("Ingrese el número de filas a...