😮 Wow!!, me ahorraste 266 inserciones manuales de archivos planos, muy buena explicación!! 👍
@maihuire118 күн бұрын
Hola, me alegra eso. ;)
@carloscorona893315 күн бұрын
Muchas gracias
@carloscorona893315 күн бұрын
Excelente tutorial curiosamente la primera opción no me funcionaba, funcionaba pero dejo de hacerlo cuando la convertir en tabla y le puse nombre lo arregle usando la segunda opción y el rango le puse el nombre de la tabla no se si fue la mejor opción pero si funciono, FILA = Hoja21.Range("TABLAINGREDIENTES").End(xlDown).Row + 1 me podrias ayudar en explicarme por que no funciono de la otra forma 'Hoja21.Range("A" & Rows.Count).End(xlUp).Row + 1
@maihuire1115 күн бұрын
Hola cuando el rango esta como tabla siempre deja una fila vacia para insertar registros, sin embargo el codigo que hace .end(xlUp).row la reconoce como una fila con datos y por ese motivo deja un espacio vacio.
@pauladanielazarateortega453117 күн бұрын
Hola!! Este codigo sirve en google sheets??
@maihuire1116 күн бұрын
@@pauladanielazarateortega4531 Hola, el código es diferente.
@josepsanchezz20 күн бұрын
excelente video muchas gracias 😇😀😀
@lrivera23 күн бұрын
Excelente, pero como seria separado por comas o el palito?
@raulperillaАй бұрын
Muy clara y buena tu explicaci{on. Muchas gracias
@nekrosoulАй бұрын
Excelente aporte. Me gustaria saber como seleccionar solo columnas especificas, y tambien que el nombre del archivo creado tenga cieta nomenclatura. Ojala me puedas apoyar.
@Tanawata17Ай бұрын
Muy bueno el tutorial!!! Como debiera hacer para obtener el numero de la fila a partir de conocer el texto de la misma?
@Capitan-GandalfАй бұрын
he seguido los pasos uno a uno y manejo lo de la programación hasta cierto punto sin embargo en este ejercicio de me da un erro y es que si lo cierro en la X arriba del login se abre el archivo sin necesidad de poner contrase;as ni usuario y me muestra todo
@EldoguiierАй бұрын
brooo, muchas gracias!, pero no me funciono con un excel de mas 100.000 registros
@maihuire11Ай бұрын
Hola, que pasó se colgo tu archivo o te sale algun error?
@EldoguiierАй бұрын
Me salía, error de desbordamiento, pero le cambié el integer a long y corrió perfectamente, muchas gracias!
@sammorgen2 ай бұрын
MUCHÍSIMAS GRACIAAAAAASSSSSS! ME SALVASTE LA VIDAAAAAAA
@sammorgen2 ай бұрын
¡Gracias!
@CesSanti2 ай бұрын
😲 Gracias!
@AndruErazo2 ай бұрын
exlente video bro, para los que quieran que no aparezcan hojas determinadas puede usar For Each hojas In ThisWorkbook.Sheets If hojas.Name <> "Hoja1" And hojas.Name <> "Hoja2" Then cmbProveedoresPrecio.AddItem hojas.Name End If Next
@oswaldorivas49412 ай бұрын
Saludos. El ejercicio está muy bueno. Además su forma de explicarlo está súper bien. Gracias Profesor.
@maihuire112 ай бұрын
@@oswaldorivas4941 Hola, que bueno que te haya servidor.
@kitty.luthier3 ай бұрын
Hola, muchas gracias x toda la data. Como sería para llamar a una hoja específica, desde un botos y no desde una lista desplegable? Gracias
@Capitan-Gandalf3 ай бұрын
Excelente sabes explicar sabes mostrar el paso a paso hay personas que hacen video pero solo muestran coas ya hechas pero no se entiende nada tu si muestras los paso a paso
@Capitan-Gandalf3 ай бұрын
Excelnte 5 estrelal spor favor sube mas videos para hacer programas de plantillas tambien hacer accesos directos hacer applicaciones para telefonos o hacer un axcel como intalador de autorun sin que salga la pagina de excel mas que solo lo que has dise;ado y que no se puedan hacer camnbios
@paulina-dz8gn3 ай бұрын
Explicas super bien, pero solo me funciono una vez, la volvi a ejecutar y no aparece nada de información pero no me sale error. ¿a qué se puede deber?
@ingridmor3 ай бұрын
Excelente tutorial; justo lo que buscaba . Desde ya te sigo ! saludos
@sheily413 ай бұрын
Poder escribir detras de formulario 6:11
@maihuire113 ай бұрын
Así es, gracias por tu comentario.
@germandiaz22713 ай бұрын
me sale el error 9 en tiempo de ejecución , como puedo solucionarlo?
@iamfredd726127 күн бұрын
debes cambiar integer por long
@joelvega2493 ай бұрын
Muy buen video, cada paso bien explicado…
@JoséLuisEgüezLuján4 ай бұрын
Como puedo descargarlo Ya que no me sale el datapicker
@jorgemadariaga29474 ай бұрын
Gran ayuda con este video, tienes un suscriptor más, un duda, cómo hacer para que dentro del mismo código, el archivo creado se grabe en un tipo de condificación personalizada, ej. UTF8, UTF16, ANSI, etc... Estarémos agaradecidos por este tip, saludos!!!
@juandiegovelez23074 ай бұрын
Hola, infinitas gracias por tan maravilloso apoorte, solo que no me deja ver los resultados agrupados por el criterio, no sé qué pueda ser, te agradezco si le echas una revisada a mi código Function DatosUnicos(Rango As Range) As Object Dim celda As Range Set DatosUnicos = New Collection On Error Resume Next For Each celda In Rango.Cells DatosUnicos.Add celda.Value, CStr(celda.Value) Next celda On Error GoTo 0 End Function Sub FiltroMasivo() Dim Lista As Collection Dim item As Variant Dim wsHojaBase As Worksheet Dim uFila As Long Dim RangoDatos As Range Dim uFilaFiltro As Integer Dim wbLibroNuevo As Workbook Dim RutaArchivos As String Application.ScreenUpdating = False Set wsHojaBase = ThisWorkbook.Worksheets("BD") uFila = wsHojaBase.Range("A" & Rows.Count).End(xlUp).Row RutaArchivos = ThisWorkbook.Path & "\Excel Ouput\" Set RangoDatos = wsHojaBase.UsedRange Set Lista = DatosUnicos(wsHojaBase.Range("B2:B" & uFila)) For Each item In Lista RangoDatos.AutoFilter Field:=4, Criteria1:=item uFilaFiltro = wsHojaBase.Range("A" & Rows.Count).End(xlUp).Row wsHojaBase.Range("A1:AF" & uFilaFiltro).Copy Set wbLibroNuevo = Workbooks.Add wbLibroNuevo.Worksheets(1).Paste 'wbLibroNuevo.Worksheets(1) = "Datos" wbLibroNuevo.Close SaveChanges:=True, Filename:=RutaArchivos & item & ".xlsx" Next item RangoDatos.AutoFilter MsgBox "Libros de excel generados con éxito", vbInformation, "Filtros" Application.ScreenUpdating = True End Sub
@jota20024 ай бұрын
Eres el master, gracias
@santiagomera70094 ай бұрын
Tengo bastantes datos y la macro ya no funciona. Cuál podría ser la solución a este problema?
@JoséLuisEgüezLuján4 ай бұрын
No me sale esa opción en mi Excel
@jhaylercarbajal95874 ай бұрын
Muchas gracias me sirvió de mucho tu video
@blacksoul42394 ай бұрын
buenos dias, me podrias ayudar para sacar en este casos los meses y dias actuales, transcurridos sin contar el de los años pasados, no se si me dé a entender, saludos
@maihuire114 ай бұрын
Hola podrias poner un ejemplo.
@slacex4 ай бұрын
que pasa si no esta la carpeta de los archivos a combinar dentro de la otra?
@nilthonrodriguezyupanqui60845 ай бұрын
Hola utilizo excel 2016 y veo que me sigue apareciendo el login segui los pasos que faltaria
@jordimarchmateu66325 ай бұрын
Buenos días. Puedes pasar la macro por aquí?
@kigarkeed5 ай бұрын
Alguien tiene el codigo?
@WelshArma5 ай бұрын
Excelente método, muchas gracias por compartir amigo!
@adrianvale42515 ай бұрын
Mis planillas poseen mas de una hoja ¿Cómo haría en ese caso?
@vanessagarciagonzalez65215 ай бұрын
Hola!! Primero de todo felicitarte por el tutorial, muy bien explicado y muy util. A ver si me puedes ayudar porque me devuelve el error 52 cuando llega a esta parte del código: set tstxtArchivo=fso.createtextfile(rutaarchivo,true). Muchas gracias
@contactoafisca5 ай бұрын
Muchas gracias. Pero tengo un detalle, yo quisiera que el resultado fuera asi 👇🏼 Primera columna|Segunda Columna|Tercer Columnas Fila 2 A|Fila 2 B|Fila 2 C Fila 3 A|Fila 3 B|Fila 3 C Fila 4 A|Fila 4 B|Fila 4 C Fila 5 A|Fila 5 B|Fila 5 C Fila 6 A|Fila 6 B|Fila 6 C Fila 7 A|Fila 7 B|Fila 7 C Fila 8 A|Fila 8 B|Fila 8 C Fila 9 A|Fila 9 B|Fila 9 C
@contactoafisca5 ай бұрын
Primera columna|Segunda Columna|Tercer Columnas Fila 2 A|Fila 2 B|Fila 2 C Fila 3 A|Fila 3 B|Fila 3 C Fila 4 A|Fila 4 B|Fila 4 C Fila 5 A|Fila 5 B|Fila 5 C Fila 6 A|Fila 6 B|Fila 6 C Fila 7 A|Fila 7 B|Fila 7 C Fila 8 A|Fila 8 B|Fila 8 C Fila 9 A|Fila 9 B|Fila 9 C
buenas tardes a esta macro como le podria a gregar a parte de la delimitacion con pipe, que cada celda tuviera en el inicio y fin comillas
@victorhernanibarracastro79325 ай бұрын
y si necesito que copie mas de una hoja del archivo?
@marylandcarvajal99096 ай бұрын
Excelente, me encantó muchas gracias 😊
@novawax6 ай бұрын
Muchas gracias por la clase de hoy.
@CuentitosFelices6 ай бұрын
Muy Bueno es excelente¡¡¡¡¡¡¡¡¡¡¡¡
@David2m116 ай бұрын
Bua muchas gracias❤
@heizlysalas75996 ай бұрын
Excelente tutorial lo felicito por tanto aporte
@andresdavidrodriguezzamero20866 ай бұрын
Sin duda alguna me ha servido al 100%!!! eres un crack!! una pregunta nada mas!! al copiar el segundo archivo, quiero dejar un espacio de 10lineas aprox. en blanco y que después me copie el segundo archivo, se puede hacer??
@juanjoseasturiano7556 ай бұрын
Agradezco el tiempo que nos has dedicado y tus conocimientos. Precisamente sigo usando Excel 2007. Pregunta ¿ no podrías enseñarnos cómo hacer para que seleccionando una fecha se escriba en una celda?. Muchas gracias por tu tiempo 😊
@salva79416 ай бұрын
Y para seleccionar esa ultima fila con datos que hay que hacer?? Por wue no acabo de entender como usar esto
@salva79416 ай бұрын
Es más, como se puede hacer sin necesidad de darle referencia de columna o fila?? Es decir que la columna o fila sea la que corresponde a la celda seleccionada en cada momento??
@DavidLopez-vx6dc6 ай бұрын
Funciona muy bien, solo que siempre me genera una linea al final en blanco, como puedo hacer para evitar que se genere sin tener que ingresar al archivo txt y borrar.