Crear una carpeta con VBA en Excel - Primera parte

[@excelymasoficial]

Me parece EXCELente tu aporte, ya que en lo personal, lo utilizaré para generar mis backups cuando estoy trabajando con mis proyectos. Por lo general cuando realizo un proyecto, hago copias de manera manual para llevar un histórico. Con esta rutina, me facilitas esa tarea, ya que lo pondré como complemento a mi aplicación para que me funcione en cualquier proyecto que yo realice. Gracias Andrés. Mi consejo para todos nuestros seguidores: Por favor, vean el vídeo completico, para que comprendan a detalle, la explicación técnica; ya que cuando hacen preguntas que ya están respondidas en el recurso audiovisual, pues asumimos que no se han tomado la molestia de verlo... Ya me comporté como profesor regañón. Pero la verdad, que nuestra satisfacción y mejor paga, es saber, que ustedes consumen el material completo. Saludos y un fuerte abrazo mi estimado Andrés. Como decimos aquí en mi país "Carga pa'mi matata"... o para que se comprenda mejor... "Material agregado a mis favoritos"

[@ExcelHechoFacil]

Don Otto muchas gracias por tu valoración, me place mucho contar con ella... Tus apreciaciones siempre serán muy importantes en mi trabajo con Excel... En cuanto a la apreciación de ver el material completo, estoy totalmente de acuerdo con vos, la mejor satisfacción es saber que las personas consumen todo el recurso audiovisual, ya que al fabricarlos tenemos en cuenta los tiempos, la metodología y demás aspectos concernientes para ofrecer un recurso audiovisual con calidad. Mejor dicho, a titulo personal y me imagino que hablo por vos también, hacemos una muy buena y correcta planificación para llevar la calidad a la pantalla y no improvisar. Por otro lado, me agrada que esto les sirva a todos, y más a vos Don Otto... Que bien!!! Un abrazo querido amigo, un saludo a tu esposa y los hijos... Nos estamos conversando...

[@Antonio8688]

Bien, Andrés. Ahora, espero con impaciencia la segunda parte que promete ser interesante. Gracias.

[@ExcelHechoFacil]

Muchas gracias por comentar mi estimado, que bueno contar con tu apoyo... Y sí, te anticipo que está muy interesante... Un abrazo desde Colombia. Saludos.

[@rogeliotorres1045]

Muy interesante. Gracias por sus enseñanzas Profesor Andrés

[@hilariodiazmartinez5333]

Gracias. Carpeta creada y nombre definido Consiguiendo objetivos

[@Origendelascosas]

Excelente ...!! cada vez pierdo la capacidad de asombro con lo que ejecutas.

[@ExcelHechoFacil]

Mi estimado muchas gracias por valorar el material de una excelente manera, que bueno contar con tu apoyo... Saludos desde Colombia. Un fuerte abrazo.

[@matiasromero438]

buenas tardes querido amigo, con tus tutoriales he aprendido mucho de VBA te lo agradezco, tenes la segunda parte del tuto sino para cuando calculas tenerlo y subirlo. saludos

[@ExcelHechoFacil]

Muchas gracias, lo analizo y te comento.

[@hectoreugeniohoyosduque506]

Andrés muy interesante tu ejercicio. Recuerda mi inquietud planteada en días pasados de como importar un dato especifico de un libro a una celda especifica de otro libro. Reiterados reconocimientos y felicitaciones

[@ExcelHechoFacil]

Si estimado, aún me falta para llegar a tu inquietud, yo lo tengo pendiente en mi libreta, pero estás en la cola de pendientes por orden... Espero me comprendas... Un abrazo y muchas gracias por tu apoyo.

[@Claudio_Rengifo]

Excelente, consulta como haroa para craer carpeta de clientes y a su vez copiar un archivo .xlsx en cada carpeta creada?

[@yamigtt]

Amigo Andres, primero quiero date las gracias por compartir tu conocimiento para que personas que no lo tenemos como yo, podamos instruirnos, quisiera saber si vas a realizar la segunda parte de este tutorial, para poder guiarme. Lo que quiero hacer es en una hoja tengo un formato de remision, ya lo estoy guardando en un PDF en una ruta especifica que yo cree, necesito crear automáticamente en un directorio creado por mi, una carpeta con el nombre del mes y todos los archivos PDF generados guardarlos ahí, pero que cuando cambie el mes me cree otra carpeta con el nombre del nuevo mes y que empiece a guardar los nuevos pdf ahi, y asi sucesivamente. Gracias por tu ayuda y espero con ansias la segunda parte de este video. Un Fuerte abrazo

[@NicolasT85]

Gracias! muy útil para generar Backup's

[@MrPerrokalato]

Buenazo .... creo es lo q estaba buscando

[@adriangarcia9777]

Hola buena tarde, cuando subes la parte dos??

[@WilliamMendez_cw]

gracias Andres, muy bueno

[@ExcelHechoFacil]

Muchas gracias a ti por comentar, la verdad me place mucho contar con tu apoyo... Saludos desde Colombia.

[@oscarcarrasquel274]

Buena el link para descargar el ejemplo está caído no funciona dónde consigo el programa para yo practicar

[@DJJLA]

Buenas excelente tuto, con relacion a la declaración de variables, por que tienes dos variables String de seguido en la misma linea de código (sRuta y sNombreCarpeta), no se podría colocar una debajo de la otra ?

[@ExcelHechoFacil]

Si, se pueden crear las variables en lineas independientes, sin embargo, también se pueden crear tantas variables como se desee en una misma línea, sólo debes respetar de separarlas con comas para que no se dé un error de compilación. Saludos.

[@micronegocioygestionperson5426]

hola andres, un placer seguir tus tutoriales, me gustaria un tutorial de como crear nombres definidos con ambito en todo el libro, y no unicamente en hoja, debido a que utilizo mucho los nombres definidos para realizar mis reportes de forma automatizadas, por ejemplo, cuando realizo conciliaciones entre documentos, cada formato cambia constanttemente del nombre de encabezado de las columnas, por ello utilizo una macro para reasignar los nombres derangos de en base al de las columnas. mucho te agradeceré tu aporte saludos

[@MagnusAnand]

Muy bueno!

[@ExcelHechoFacil]

Muchas gracias por la valoración, espero te sirva en tu trabajo con Excel... Un abrazo.

[@carlosjose93]

LA VERDAD QUE ME SIRVE ESTE CODIGO

[@ExcelHechoFacil]

genial.

[@cesarparra5862]

HOLA chevere me parece que manejas bien el asunto ;)

[@ExcelHechoFacil]

Gracias.

[@cristhiantuerosr.7761]

Buen tutorial mi pregunta seria como hago para que a medida q de click me vaya apareciendo la ruta donde yo desee guardar y no automaticamente . en una carpeta especifica

[@ExcelHechoFacil]

Compa en la segunda parte cubrimos ese detalle, acá solo explique el método... En el video lo comenté... Saludos.

[@Diegorodriguez-hr3uk]

Muchas gracias por esto tan maravilloso! Me queda una duda muy básica que no se como hacer (soy 100% amateur pero algo entiendo) Quiero al final agregar una ventana de texto que diga que se creo para registro para (nombre de carpeta) y atención (nombre de archivo) con (hora y fecha de hoy) ... Agradecería su ayuda para crear el cuadro de texto final. Saludos

[@edgarorozco6979]

SALUDOS ANDRES gracias por el vídeo siempre me son de gran utilidad dicho esto lo molesto para ver si me puede ayudar como le hago para guardar un libro de excel con nombre de usuario, turno, y posición de trabajo. gracias que dios lo siga bendiciendo.

[@ExcelHechoFacil]

Perfecto, lo reviso y le comento. Saludos.

[@CerebroRoa]

Dim NombreArchivo as string Dim Nombre as String Dim Turno as String Dim Posicion as String Nombre = wshoja.range("C3").value Turno = wshoja.range("C4").value Posicion = wshoja.range("C5").value NombreArchivo = Nombre & " - " & Turno & " - " & Posicion ActiveWorkbook.SaveAs Filename:= DirArch & "\Reporte de " & NombreArchivo & ".xlsx", _ FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False

[@frankayhllon2870]

Uso excel con sistema OS X al agregar el código me señala error 68 en tiempo de ejecución : Dispositivo no disponible. Señalando en amarillo esta linea del código: If Dir(sRuta & sSeparadorRuta & sNombreCarpeta, vbDirectory) = Empty Then

[@UlisesChavarryAliaga]

gracias por los tutoriales, son lo maximo..... quisiera una ayuda, en vez de crear una carpeta, quisiera que el codigo hiciera lo siguiente Abrir una el Explorer para yo poder seleccionar la carpeta donde deseo guardar, obviamente pudiendo escoger el nombre con el que deseo guardar la copia y... segundo que la hoja actual sea exportada en PDF, es decir la hoja actual se grabe pero en formato pdf. gracias anticipadamente por su ayuda.

[@CerebroRoa]

Ulises : Para guardar en formato PDF ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _ Filename:="C:\Dirección\Analisis de Datos Excel\Reporte Unico.pdf" y para llamar al cuadro de dialogo Salvar Como... Application.Dialogs(xlDialogSaveAs).Show Con esta ultima llamas seleccionar la ubicación y nombre del Libro de Trabajo.

[@josevaldearcoscontreras4379]

Excelente tutorial. Mi pregunta es, se puede ir guardando el archivo automáticamente cada X minutos? Es decir, en vez de ejecutar el comando, que se vayan creando carpetas cada 10 minutos. Muchas gracias por sus aportaciones.

[@ExcelHechoFacil]

Si mi estimado, es totalmente posible, pero no factible... Te comento, se puede hacer un procedimiento de llamado que invoque cada cierto tiempo al procedimiento que crea la carpeta y almacena el archivo de Excel. No obstante, eso no es una muy buena manera de llevar a cabo tu idea, ya que si estas editando o creando, por ejemplo una fórmula, o algo que deshabilite momentáneamente la Ribbon u otro componente a nivel de aplicación, lo más probable es que te reviente un error en tiempo de ejecución incontrolable... Eso se puede solucionar con un buen manejador de errores, pero la verdad eso no es una muy buena practica de programación... a título personal no te recomiendo que hagas eso... Saludos y muchas gracias por dejar este magnifico comentario para hacer la aclaración... Un abrazo desde Colombia. Saludos...

[@CerebroRoa]

José: Este procedimiento se ejecuta cada vez que Guardas el libro de trabajo. como Comenta Excel Hecho Facil, de forma automatica... operativamente no es funcional. Private Sub Workbook_AfterSave(ByVal Success As Boolean) ' Call CrearCopia End Sub Sub CrearCopia() ' Dim TimeStamp As String Dim DirArch As String ' TimeStamp = Format(Date, "ddmmyyyy") & "_" & Format(Time, "hh-mm") DirArch = wsInicio.Range("D10").Value wsHoja1.Copy ActiveWorkbook.SaveAs Filename:= _ DirArch & "\Reporte " & TimeStamp & ".xlsx", _ FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False ActiveWindow.Close End Sub

[@ErikaJPonce]

y sin en vez de la fecha, quiero ponerle un nombre especifico, y quiero que se guarde en determinada carpeta?

[@ExcelHechoFacil]

En la parte dos trato eso con lujo de detalles estimada, espera, aun no la lanzo... Saludos.

[@ErikaJPonce]

Oo, esta bien jajaja. Porque te comento, lo que intento hacer. He hecho una compilación de varias hojas en una sola GENERAL. Y a esa general le quiero poner un boton de GUARDAR, donde me guarde la labor del día con un nombre que yo quiera en ese momento, creándose una carpeta que diga en el año que estamos "JEFATURA GENERAL & "2016", pero que a su vez dentro de esta carpeta se cree otra mas con el nombre del MES en el que estamos únicamente. Eso es posible?

[@ExcelHechoFacil]

Si es posible... Como te digo, la parte dos te dará ideas para poder realizar lo que necesitas... Un abrazo y saludos.

[@carlosjose93]

DONDE ENCUENTRO EL SEGUNDO VIDEO

[@ExcelHechoFacil]

Mi estimado no está, aún después de mucho tiempo no lo he grabado, cuando tenga un libre, lo saco en video y dejo el archivo para su descarga. Saludos.

[@carlosjose93]

gracias hermano . saludos

[@juanantoniocruzmaliachi9305]

Hola buenas, me parecen excelente tu aportación. Estoy elaborando una macro en un archivo de excel que llamaremos libro1 y quiero que desde ahi tengo un botón para que cuando de click me cree un carpeta en otro lugar diferente de donde esta el libro 1 pero no quiero que me "guardecomo" el mismo archivo del libro1 sino otro libro que llamaremos libro2 que se encuentra en otra carpeta . Es posible realizar esto y si pudieras apoyarme. De antemano te doy las gracias. Saludos

[@ExcelHechoFacil]

Apuntado en mi libreta de pendientes... Saludos y gracias por comentar.

[@luis-alqez]

Y otro video?

[@asistentedeservicios1493]

y la segunda parte nunca la encotre

[@ExcelHechoFacil]

No la he creado, saludos.