Jaime Carrillo

Dante Amor respondió: No pusiste la macro, pero con esta instrucción creas la carpeta ruta = thisworkbook.path & "\" mkdir ruta & range("A1") & range("A2") Saludos. Dante Amor Si es lo que necesitas.

Dante Amor respondió: La macro está bien. Hay que revisar qué tiene en la celda T1 y qué tienes en la celda T2 También revisa si en tu excel tienes la opción para guardar archivos como PDF. Cómo vas a envirar el correo, ¿por outlook?

Daniel MP respondió: No es lo que preguntas, pero me parece que si que es lo que necesitas. Prueba "COMBINAR CORRESPONDENCIA" en Word. https://www.google.es/#q=%22COMBINAR+CORRESPONDENCIA%22+en+Word. Si no te sirve, dímelo y te propongo algo en excel

alvan .. respondió: Por mi parte sólo me es posible pasarte la información que he visto, suerte. http://tecnologiahabitual.blogspot.com.es/2013/01/crear-cartones-de-bingo-en-pdf-para.html...

Dante Amor respondió: Sigue las Instrucciones para un botón y ejecutar la macro 1. Abre tu libro de Excel 2. Para abrir Vba-macros y poder pegar la macro, Presiona Alt + F11 3. En el menú elige Insertar / Módulo 4. En el panel del lado derecho copia la macro 5. Ahora para...

Dante Amor respondió: La macro está bien. No veo la imagen con el error. Dime qué te dice el error y en qué línea se detiene o qué línea se marca de otro color. Te explico algunas líneas de la macro: En esta línea tienes que poner tu cuenta de gmail correo =...

Dante Amor respondió: H o l a: Esta es una opción, para que en una pestaña de excel, se carguen todas tus hojas y puedas seleccionar la hoja a la que quieres ir: Para crear la pestaña y se carguen las hojas, ejecuta la siguiente macro. Pon la macro en un módulo: Sub...

Dante Amor respondió: Te anexo la macro Sub SepararStep() 'Por.Dante Amor For i = Range("A" & Rows.Count).End(xlUp).Row To 3 Step -1 If InStr(1, UCase(Cells(i, "A")), "STEP") > 0 Then Rows("1:1").Copy Rows(i).Insert Shift:=xlDown Rows(i).Insert Shift:=xlDown,...

Si entiendo lo que necesitas, lo que haría es ir a Archivo, Opciones, Revisión, autocorreción y colocas lo que quieres escribir y con que reemplazar Por ejemplo, en"reemplazar" colocas ss y en "con" solución rápida, das aceptar y en la hoja de...

Dante Amor respondió: H o l a : Pon la siguiente macro en un botón Sub ImprimirHoja() 'Por.Dante Amor num = InputBox("Número de copias", "Imprimir") If num = "" Or Not IsNumeric(num) Or num < 1 Then Exit Sub ' For i = 1 To num Range("F3") = "'" & i & "/" & num...