Ve mi curso PREMIUM de Power Query y accede a mas de 25 cursos más. no te lo puedes perder | www.excelyfinanzas.com/courses/curso-power-query/ref/Victor/
Hola buen día necesito que me ayudes con algo por fa, todo trabaja bien pero al momento de darle al botón de imprimir al poner x ejemplo 10 copias me imprime una cantadidad indefinida de impresiones a lo cual debo desconectar la impresora
@@ludovicoludovis3966 eso es porque le pusiste una cantidad en FOLIO.. VE EL VIDEO BIEN Y CON CALMA.. en FOLIO NO VA NADA... CERO.. siempre inicia en 1, 2, 3, 4, 5 ....
Excelente tutorial, explicado con calma, a detalle y simplificado! excelente aporte amigo, sin duda es el mejor tutorial para imprimir documentos foliados que hay en youtube! gracias!
Siempre habrán detalles que saldrán, por que existen muchas variables, el factor humano, la compatibilidad de software, de sistemas operativos, incluso dentro del mismo microsoft office (como en todos los productos microsoft) de repente se vuelve loco y hace cosas extrañas. Pero son detalles que se pueden ir resolviendo con apoyo en el foro.
Muchas gracias por este tutorial. Te felicito por tu gran aporte. Te cometo que esto me sirvió para hacer marbetes de inventarios físicos. te reitero mi agradecimiento. en hora buena
Para que no les imprima el botón, ya una vez hecho el botón pongan en VISTA>Salto de página y se pone una línea azul, arrastran la línea a su formato de modo que el botón quede afuera . Lo pueden comprobar en la vista previa a la impresión. Para imprimir a partir de cierto folio solo dejen el numero en la celda por ejemplo quiero imprimir del 5 a 10 entonces dejo en la celda del folio el numero 5 en vez de que este vacia
Aquí puedes resolver el problema en este video más actual Adiós a la Impresión Manual: ¡Imprime Folios Consecutivos Automáticamente en Excel! #Excel #Macros ua-cam.com/video/VpnBPBi0MJ4/v-deo.html
hola buenos dias de antemanos muchas gracias por tu grandioso aporte. Cuando el comando no me respeta el numero de copias y las impresiones no se detienen. Y otra pregunta para aprovechar al maximo la hoja tamaño carta, quería imprimir 2 folios en la misma hoja, cual seria el comando para que esto sea posible y me respete el consecutivo de cada hoja?
LOGRO QUE QUE LE RESPETARA EL NUMERO DE COPIAS? YO LA REINICIE, Y BORRE ARCHIVOS TEMPORALES Y NO FUNCIONO, SIGE IMPRIMIENDO MUCHO MAS DEL LIMITE QUE LE PONGO
Hola, oye tengo un problema pude mandar a imprimir algunas hojas, pero cuando quise seguir foliando, el macros empezó a mandar y mandar a imprimir, y tuve que detener mi maquina. Me puedes apoyar a saber que fue lo que paso.
Buenos dias funciona muy bien, solo un pregunta haber si se puede yo cada semana imprimo folio esta semana 1 al 50 y la siguiente semana como le puedo hacer para que empiece desde el 51 al 100? gracias y espero su respuesta
@@danielarmandotesillotarang1301 Public Num As Integer Sub IMPRIMIR() Do Until Num = Range("O4").Value ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True Range("L4").Value = Range("L4").Value + 1 Num = Range("L4").Value Loop MsgBox "Folios impresos correctamente" End Sub
Amigo, ayudame publicando tu duda en el grupo de ayuda de Microsoft Excel a Todo Nivel en donde casi 25000 personas nos reunimos a resolver y compartir todo tipo de contenido en Excel
hola buenos dias gracias por la aportación tengo una duda en cuanto la macro cuando mando a imprimir una cantidad se dispara y manda demasiadas quisiera saber como resolver el problema de antemano gracias saludos
Microsoft Excel a Todo Nivel buenos días mirando el código de la macro y viendo la lógica yo pensaba que el recuadro de no. páginas era la cantidad que se quería imprimir, pero me di cuenta que es hasta dónde quieres imprimir por eso no hay problema cuando imprimes del 1 al 10 o del 1 al 100, el problema se presenta cuando en el folio queremos que salga de un número como del 20 en adelante hasta al 30 y ponemos en número de impresiones 10 para que sean 10 folios y llegue al 30, pero no es asi, debemos ingresar en el folio el 20 por ejemplo y queremos que salga hasta el 25 pondremos 25 en el número de copias y no pasará el problema que se dispara la impresión infinito me funciona y espero le pueda servir a las demás personas está experiencia saludos
Hola, se puede hacer con nombres? o tienes algún tuto sobre eso? tengo que imprimir 500 hojas pero cada una con un nombre distinto, y los nombres están en otra hoja.
Resuelto el problema de la impresión infinita: el problema no radica en la macro ya que la misma está bien y trabaja bien en teoría para falto agregar algo para que la macro realice la función que uno quiere... En el video se explica el cambio de folio con la, cantidad de impresión que se establece x ejemplo (como el folio inicia de 0 y se le coloca 10 para el cual imprima 10 como sale en el video esta bien pero la macro lo ve como que tiene que imprimir hasta el folio 10 no que imprima 10) es por ello que cuando se le da imprimir un ejemplo 10 más estando ya en el folio 10 mandara el mensaje que la impresión fue un éxito pero no imprime nada xq la macro ya imprimió hasta 10 folio. Si se le manda a imprimir 25 imprimirá hasta el folio 25 pero no imprimirá 25 copias si no 15 que es la diferencia de 10 a 25. Si el folio está en 25 y mandas a imprimir 10 copias la macro no lo va a entender y es aquí donde empieza a imprimir infinitamente xq no va encontrar el número 10 de folio xq esta en el 25.. En pocas palabras la cantidad que se pone para imprimir en realidad no es cantidad si no hasta el último folio que uno quiere. Si estas en el folio 25 y quieres 10 copias deberás color 35 así la macro sabrá que tiene que llegar hasta el folio 35. Colocare un video explicando gráficamente mis palabras...
@@METN No me funciono, la primera impresión la hace bien, pero la segunda aun colocando hasta el numero que quiero que imprima, no se detiene imprimiendo mas de la numeración especificada
Muy buena explicación me ha servido mucho esta macro. Como puedo imprimir números consecutivos 1de 100, 2 de 100, 3 de 100 así sucesivamente hasta 100 de 100 en una celda. De antemano gracias por su apoyo.
Podrías poner a lado de la celda (donde cambia el número consecutivo, H3 en el vídeo) el total de las copias. Es decir si sabes que realizarás 100 copias foliadas, podrías poner el 100 a lado así se lograría ver 1 (en H3) de 100 y así cambiaría el número de folio conforme a la impresión y tu total de copias saldría impreso en todas. Espero haberme explicado, saludos
Para imprimir de la 230 (l4) hasta la 254 (o4) use el siguiente código , y la próxima de la 254 a la 318. Public Num As Integer Sub IMPRIMIR() Do Until Num = Range("O4").Value ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True Range("L4").Value = Range("L4").Value + 1 Num = Range("L4").Value Loop MsgBox "Folios impresos correctamente" End Sub
@@camilomayrena3386 sucede porqué el número del folio columna "I" es menor al que está en la columna "O". Si no es eso, prueba con cerrar el excel sin guardar y activa la macro de nuevo. También tuve ese problema, pero realizando lo que te comenté lo solucione sin modificar el código.
Como puedo imprimir un consecutivo con letras? por ejemplo imprimir numero(LCP-001-001) y que los ultimos 3 digitos se cambien en automatico (LCP-001-002)? cada vez que imprime se sume + 1? por medio de una macro
Buen dia, disculpa necesito imprimir los folios en ambas caras de la hoja y los folios deben ser consecutivos en cada pagina, por lo tanto, me pregunto si podrás ayudarme en decirme como hacer el codigo para poder imprimir solo números impares y luego numero pares, saludos y gracias
Una duda a mi me lo hace bien pero me imprime 2 paginas la de la factura y despues otra con el boton del macro y el recuadro del numero de copias. Como puedo solucionar eso porfavor?
tendriamos que checar macro, es algo muy distinto, si puedes ayudanos subiendo tu duda a facebook.com/groups/excel.atodonivel/ Con gusto aqui lo que desees, estamos a sus ordenes. Saludos!
Amigo, ayudame publicando tu duda en el grupo de ayuda de Microsoft Excel a Todo Nivel en donde casi 25000 personas nos reunimos a resolver y compartir todo tipo de contenido en Excel
Gracias! el tema quedó resuelto, tenía un error al hacer referencia en las celdas, pero ya quedó y funciona "bien". El único detalle es que cuando quiero imprimir a partir de un número determinado, mayor a cero, se cicla y comienza a imprimir infinitamente !
necesito foliar del 1 al 2000 en numero y una celda mas abajo escrito el numero en letra se podra pragramar algo? desde ya muchas gracias si me puedes ayudar
Buenas segui los pasos para imprimir foliados le pongo 5 copias y automaticamente enpieza a imprimir pero varias y no para de imprimir. sera que me puedes ayudar cual fue el error
Hola, excelente canal para aprender a fondo excel. Amigo tengo un inconveniente con una hoja de excel y déjeme explicarle lo que quisiera conseguir. Tengo una hoja de excel codificada con macros la cual imprime folios es decir cuando lleno una forma esta se imprime e incluso puedo indicarle cuantas copias quiero IMPRIMIR por folio, luego estos folios se imprimen y se guarda el folio y se genera un nuevo numero de folio consecutivo y así sucesivamente. La cuestión es la siguiente necesito que en cada copia de un mismo numero de folio se imprima lo siguiente ORIGINAL- ALMACÉN- DEPTO SEGURIDAD - DPTO COSTOS preferiblemente en marca de agua en el fondo de la hoja a imprimir. Y MUCHISIMAS GRACIAS ESPERANDO PUEDA AYUDARME MARCOS G. ROJAS DESDE VENEZUELA
Amigo, esta de lujo lo que comentas, te agradeceré que las dudas que comentas las expongas en nuestro foro de ayuda en este link facebook.com/groups/excel.atodonivel/?ref=bookmarks
Hola Marcos, yo intento hacer lo mismo pero no eh tenido exito, podrias ayudarme con el codigo que tu utilizaste. Yo logro aguardar el folio pero no imprimirlo corectamente. Uso el siguiente codigo: Sub Siguiente() [K34] = WorksheetFunction.Sum(Range("K33:K16")) [k6] = [k6] + 1 nbre = Range("K6").Text ruta = "E:\CARPETA PRINCIPAL\Desktop\Pedidos" ActiveWorkbook.SaveCopyAs ruta & "\" & nbre & ".xls" Do Until Range("H3") = Range("K4").Value + 1 ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True Range("H3").FormulaR1C1 = Range("H3").Value + 1 Loop MsgBox "Folios impresos correctamente" End Sub
Hola muy buen video, una consulta, al ingresar 1 copia de igual manera me imprime 2, como puedo ajustar eso?, es decir, darle la indicación de 1 copia y que imprima 1 copia.
Excelente pude con ello... solo una duda.. como imprimo una continuación. Por ejemplo, imprimí hasta el número 50. Como imprimo la continuación. Saludos
una pregunta yo quiero imprimir tres hojas una que diga cliente otra que diga contabilidad y la ultima almacén, pero quiero que sea así automáticamente dándole a imprimir como lo hago
Hola, no entiendo como hizo para que al imprimir le salga que tiene una sola hoja el archivo, cuando lo mando a imprimir me imprime dos hojas!!! la del folio y la del botón imprimir
Te invito a aclarar todas tus dudas en nuestro foro de Ayuda Microsoft Excel a Todo Nivel en la siguiente dirección facebook.com/groups/excel.atodonivel/ Responder ·
El macro funciona muy bien gracias. Solo que inicia imprimiendo la primer hoja en blanco, esto es sin numero. Como hago si quiero iniciar por ejemplo con el folio 200 en adelante. Gracias de antemano.
@@alfredovaladez4460 YA LO averigüe :) LA impresión SE DETIENE HAS QUE EL FOLIO SEA IGUAL AL NUMERO QUE PUSISTE EN LA CELDA DE números DE COPIAS, POR ESO EN LUGAR DE PONER EL NUMERO DE COPIAS QUE QUIERES, DEBES PONER HASTA QUE FOLIO QUIERES QUE SE IMPRIMA, Y LISTO!!!
Y si quiero ese mismo formato pero en tamaño media carta y con consecutivo, porque tengo ese problema y solo puedo imprimir el formato a media carta, cortar la hoja y seguir imprimiendo. Espero haberme explicado bien. Gracias, saludos.
Un saludo, puedes ayudarme con una macro que imprima un folio de tamaño media carta, dos veces en la misma hoja??; me explico tengo los comprobantes de pago de nómina para 100 empleados (ejemplo), y el tamaño del recibo es de media carta, pero deseo que se imprima dos veces en la misma hoja... Gracias
algo pasa, mientras esta abierta la pantalla de visual basic puedo trabajarlo bien como en tu video pero al guardar y cerrar y querer usarlo nuevamente ya no se detiene sin importar si solo mande a imprimir 10 folios, siguen y siguen saliendo, que puedo hacer, espero tu apoyo. saludos!
Hola buen dia. Me sirvió mucho la macro que realizaste, solo tengo una duda. Como se podría imprimir los folios 2 veces el mismo? Un ejemplo, al momento de poner los números de copias que queremos, y después le doy en imprimir, y al momento de hacer imprima 2 folios del mismo numero. Gracias.
CUANDO EJECUTO LA MACRO, TAMBIEN ME IMPRIME LA HOJA DOS QUE ES DONDE ESTA EL BOTON DE IMPRIMIR Y EL NUMERO DE COPIAS QUE DESEO. COMO LE HAGO PARA QUE SOLO ME IMPRIMA LA HOJA 1?
no perdón es que hice lo del vídeo y mando a imprimir 100 copias y salen numeradas en la celda de folio pero a ese numero que se va mandando, quiero agregarle una clave con letra por ejemplo MPM-0001 y que salga el consecutivo MPM.0002, MPM-0003, ETC
no puedo solo tengo el video no la imformacion probe y me quedo un tremendo error me tiro puros folios de 1 puros 1 y se quedo pegado me tiro una lista de espera de 300 impresiones que puedo hacer
+Imprenta Maviro Hola Maviro, he visto que en el video utilizan Do Until, esto quiere decir que hasta que se la celda 1 es igual a la celda 2, se va a ejecutar la macro. Range("H3") = Range("H3") + 1 Verifica que cada que termine un loop, se sume en 1 la cantidad de "H3", en el editor de visual basic, utiliza la tecla F8, para ejecutar de una linea x una linea toda la instrucción, así podrás verificar cuál es el error. Saludos.
Estoy teniendo problemas ya qué me manda a imprimir infinitamente ya, coloque los datos correspondientes según las necesidades qué ocupo tal cual se explica en el video pero nada
Hola, gracias por el video pero no tengo idea de como hacerlo funcionar ya que envie a imprimir 3 copias pero llego hasta 113, lo que deseo es colocar eh h3 un numero donde me quede por ejemplo ya tengo impreso hasta 150 y quiero que ahora me imprima 20 mas, o sea que llegue a 170, como podria hacerlo? porque otro dia necesito colocar a partir de 171 y asi siempre. Saludos
LA IMPRESION SE DETIENE HAS QUE EL FOLIO SEA IGUAL AL NUMERO QUE PUSISTE EN LA CELDA DE NUMEROS DE COPIAS, POR ESO EN LUGAR DE PONER EL NUMERO DE COPIAS QUE QUIERES DEBES PONER HASTA QUE FOLIO QUIERES QUE SE IMPRIMA
Gracias mil pero tengo una pregunta, si le pido 1 me imprime dos, y asi .... siempre uno mas. Otra cosa. Deseo imprimir dos formularios por hoja, como hago? Gracias por su ayuda, realmente me facilito la vida usted
+Javier Villarreal Cualquier duda al respecto puedes publicarla en facebook.com/groups/excel.atodonivel/ cualquiera de los usuarios o yo estamos para apouyarte. Saludos!
Buenas tardes, muy bueno el macro, solo tengo dos comentarios: 1:Imprime la primera en blanco, me gustaría que empezara en el 1... y 2: El boton y donde ingreso el numero de copias lo tengo en otra pagina, y al momento de imprimir me imprime en una hoja separada estas dos cosas. Como puedo resolverlo? Saludos
hola alguien me puede ayudar no se como usar este foro, lo que pasa esque quiero saber como puedo asignar numero de folio a unos recibos pero tengo tres recibos en una misma hoja, es decir cuando mando a imprimir la hoja salen tres porque son recibos pequeños, apenas pude descubrir como foliar el primero de ellos y cada vez que abro la hoja se cambia automáticamente pero los otros dos no encuentro la manera de que se cambien de igual forma uno debería tener asignado el numero 1,2,3 y la próxima vez que abra el libro debería estar 3,4,5
Hola podrias ayudarme? Me ha servido tu codigo... sin embargo necesito que en una misma hoja se generen dos folios (esto ya lo he logrado) y que en la siguiente hoja se continue dicha numeración... es decir... en la primera hoja sea 1 y 2 ... en la segunda 3 y 4. Lo que me sale a mi es que en la segunda hoja me coloca nuevamente el dos... es decir... 1 y2 .... 2 y 3.... Gracias por tu apoyo
Hola, pudieron tener una respuesta a esta pregunta? es que yo necesito lo mismo, estoy haciendo un talonario y en una hoja carta me caben 4 por lo tanto necesito poder hacer un codigo donde vayan avanzando estas celdas
HECTOR ESCOBEDO hola yo lo pude resolver En la tercera línea antes de dónde dice loop tienes que poner Range("h3").formular1c1=range("h3").value+4 Y esta misma repetirla x todas las celdas que quieres que tengan folio el + 4 es porque si en la primera hoja tienes 1, 2, 3 y 4 a cada uno de estos números se les sumará 4 para tener el folio correcto en la siguiente hoja
Muchas gracias Maria Fernanda, ahora tengo otro problema, se me traba el sistema mandando muchas impresiones, a que se debe?? y tambien se imprime la hoja donde puse el boton y la celda con el numero de copias :(
SALUDOS EXELENTE TUTORIAL SOLO QUE ME IMPRIME DOS HOJAS UNA CON LI TABLA Y LA OTRA IMPRIME EL BOTON DE IMPRIMIR Y LA CELDA EN LA QUE PONGO NUMERO DE COPIAS
+Karina Ruiz Hola Karina, lo primero que debes hacer es tener una base de datos con los datos que vas a ingresar, preferentemente en otra hoja, no es necesario. Lo siguiente es poner el siguiente código Sub MacroKarina () dim N as integer N = 2 sheets("Hoja2").select range("A2").select do while activecell empty sheets("Hoja1").range("a" & N) = activecell sheets("Hoja1").range("b" & N) = activecell.offset(0,1) sheets("Hoja1").range("c" & N) = activecell.offset(0,2) sheets("Hoja1").range("d" & N)= activecell.offset(0,3) sheets("Hoja1").range("e" & N) = activecell.offset(0,4) N = N + 1 activecell.offset(1,0).select Loop msgbox "listo" end sub Para que te funcione, solo deberás cambiar el nombre de la hoja y los rangos.
Necesito de su conocimiento. Quiero crear una numeración consecutiva dependiendo de una condición, ejemplo: recorrer un columna A y si encuentra la palabra "manzana" en la columna B me ponga el numero 1, si estuviera lleno de "manzana" no hubiera problema pero en la columna A tengo también ciruelas y peras, entonces recorrería la celda A y si encuentra manzana le pone en la columna B el numero 1, sigue recorriendo, hasta encontrar "manzana" nuevamente y le pone 2 en la columna B Detalle: en la celda A2 estaba "manzana" pero recién en la celda A9 estaba la palabra "manzana", en las celdas anteriores habían nombres de frutas diferentes a "manzana".
Gracias por responder!, necesito hacerlo sin macro, conjugando funciones, la mas cerca es la función fila, pero me devuelve el numero de la fila y no el consecutivo de un producto, en este caso "mazana", el objetivo es numerar productos con sus números consecutivos según el producto, imagina una columna llena de nombres de frutas, pero, entre ellas tengo manzanas, y quiero ponerles un consecutivo cada vez que aparezca esa fruta.
La macro funciona siempre a partir de 1 pero si mi folio es a partir de un número indefinido, ejemplo 25 a 50, y después de 51 a 74 como seria la macro
Asi como yo, algunos hemos tenido problemas con el código.Que sucede?Al momento de mandar a imprimir un folio a partir de uno ya existente, Ejemplo. INICIO EN 200, Y QUIERO 50 FOLIOS NUEVOS, esto causara una indeterminación en los valores y mandara a imprimir infinitamente.Ahora bien, no se absolutamente nada de macros, pero mientras leía el código me pareció que la parte donde dice "Do Until Range ("H3") = (Range ("K4").Value + 1," quiere decir que aplicará la macro hasta que el rango de nuestro folio inicial (200), sea una unidad mas que la del rango que indicamos en el numero de copias (50).Como podrán observar, el problema radica en que esto nunca podrá suceder, y al momento de indicar un valor en "K4", menor al de "H3" estaremos creando una indeterminación.Solución?Lo que a mi me funciono, y dado que yo no se hacer código, es indicar HASTA QUE FOLIO QUIERO LLEGAR, y NO EL NUMERO DE COPIAS, de esta manera decimos:INICIO DE FOLIOS EN "200" ( " H3 = 200 " )FINAL DE FOLIOS IMPRESOS EN "251" ( " K4 = 251 " )Y así tendré 51 folios nuevos e impresos. dejando el numero "252" com folio inicial para la próxima impresión.Espero les funcione y repito, yo no se nada de código ni macros, pero esto me pareció lógico jejejejeje.Saludos !!!
Te invito a aclarar todas tus dudas en nuestro foro de Ayuda Microsoft Excel a Todo Nivel en la siguiente dirección facebook.com/groups/excel.atodonivel/ Responder ·
le agregue una suma k4=h3+k7 para que h3 sea el numero de folio cualquiera y en k7 se lepone el numero de copias 10 por ejemplo y en k4 donde esta agarrando el macro donde hace el trabajo del macro de ser como el limite del folio ya esta gracias
Intento usar el codigo pero no tengo exito, solo quiero imprimir una hoja de folio al seleccionar finalizar. Para guardar e imprimir a la vez el folio... Uso el codigo siguiente, y se aguada pero se imprime muchas veces hasta trabarse. Sub Siguiente() [K34] = WorksheetFunction.Sum(Range("K33:K16")) [k6] = [k6] + 1 nbre = Range("K6").Text ruta = "E:\CARPETA PRINCIPAL\Desktop\Pedidos" ActiveWorkbook.SaveCopyAs ruta & "\" & nbre & ".xls" Do Until Range("H3") = Range("K4").Value + 1 ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True Range("H3").FormulaR1C1 = Range("H3").Value + 1 Loop MsgBox "Folios impresos correctamente" End Sub
Ve mi curso PREMIUM de Power Query y accede a mas de 25 cursos más. no te lo puedes perder | www.excelyfinanzas.com/courses/curso-power-query/ref/Victor/
Hola buen día necesito que me ayudes con algo por fa, todo trabaja bien pero al momento de darle al botón de imprimir al poner x ejemplo 10 copias me imprime una cantadidad indefinida de impresiones a lo cual debo desconectar la impresora
@@ludovicoludovis3966 eso es porque le pusiste una cantidad en FOLIO.. VE EL VIDEO BIEN Y CON CALMA.. en FOLIO NO VA NADA... CERO.. siempre inicia en 1, 2, 3, 4, 5 ....
Excelente tutorial, explicado con calma, a detalle y simplificado! excelente aporte amigo, sin duda es el mejor tutorial para imprimir documentos foliados que hay en youtube! gracias!
+VICTOR DURAN se agradece el halago aunque algunos tienen algunos detalles a resolver. Un fuerte abrazo
Siempre habrán detalles que saldrán, por que existen muchas variables, el factor humano, la compatibilidad de software, de sistemas operativos, incluso dentro del mismo microsoft office (como en todos los productos microsoft) de repente se vuelve loco y hace cosas extrañas. Pero son detalles que se pueden ir resolviendo con apoyo en el foro.
Excelente, me sirvió mucho para otro proyecto que estoy tratando de realizar. Muchas gracias por el aporte
Muchas gracias por este tutorial. Te felicito por tu gran aporte. Te cometo que esto me sirvió para hacer marbetes de inventarios físicos. te reitero mi agradecimiento. en hora buena
Genial, me da un gusto enorme que lo hayan logrado. Saludos.
Buenas noches, excelente, una pregunta se puede iniciar la numeración en 7000? Por ejemplo
Trucazo que me ayudó muchísimo! Ahí te va tu like
Muchas gracias, funciona perfectamente, es sencillo de entender... BENDICIONES
Para que no les imprima el botón, ya una vez hecho el botón pongan en VISTA>Salto de página y se pone una línea azul, arrastran la línea a su formato de modo que el botón quede afuera . Lo pueden comprobar en la vista previa a la impresión.
Para imprimir a partir de cierto folio solo dejen el numero en la celda por ejemplo quiero imprimir del 5 a 10 entonces dejo en la celda del folio el numero 5 en vez de que este vacia
Gracias❤❤❤❤
Como siempre... espectacular. Desde Argentina mil gracias!!!
+Carlos Alberto Benítez que gusto que te haya ayudado muchas gracias por tus comentarios
¡¡¡Mil gracias brother me salvaste la vida!!! ¡Fácil de comprender y de implementar, eres lo máximo!
+Zaren Ortega Genial, gracias por ver nuestros videos y recomendarnos.
Saludos!
EXCELENTE ESPLICACION ME AGRADO, UNA PREGUNTA SI QUIERO IMPRIMIR DE UNA NUMERACION EN ADELANTE EJEMPLO QUIERO IMPRIMIR DE FOLIO 100 EN ADELANE?
Aquí puedes resolver el problema en este video más actual Adiós a la Impresión Manual: ¡Imprime Folios Consecutivos Automáticamente en Excel! #Excel #Macros
ua-cam.com/video/VpnBPBi0MJ4/v-deo.html
Tendrías que colocar 99 como punto de partida nada más
Gracias!!!!!!! Excelente explicacion Simple y Practico
Que agradable sujeto muchas gracias.
hola buenos dias de antemanos muchas gracias por tu grandioso aporte. Cuando el comando no me respeta el numero de copias y las impresiones no se detienen. Y otra pregunta para aprovechar al maximo la hoja tamaño carta, quería imprimir 2 folios en la misma hoja, cual seria el comando para que esto sea posible y me respete el consecutivo de cada hoja?
LOGRO QUE QUE LE RESPETARA EL NUMERO DE COPIAS? YO LA REINICIE, Y BORRE ARCHIVOS TEMPORALES Y NO FUNCIONO, SIGE IMPRIMIENDO MUCHO MAS DEL LIMITE QUE LE PONGO
Deben colocar bien las celdas del número de folio y el número de impresiones, si están mal colocadas no se respeta el número de impresiones
Una consulta.. y si lo que necesito que dia es original, duplicado, triplcado y asi sucesivamente?
Disculpa solo quiero poner la cantidad de copias a imprimir como se podría hacer?
Hola, oye tengo un problema pude mandar a imprimir algunas hojas, pero cuando quise seguir foliando, el macros empezó a mandar y mandar a imprimir, y tuve que detener mi maquina. Me puedes apoyar a saber que fue lo que paso.
Buenos dias funciona muy bien, solo un pregunta haber si se puede yo cada semana imprimo folio esta semana 1 al 50 y la siguiente semana como le puedo hacer para que empiece desde el 51 al 100? gracias y espero su respuesta
@@emmanuelsanchezsilvente8228 no hermano tuve ke dejar ese proyecto
@@danielarmandotesillotarang1301
Public Num As Integer
Sub IMPRIMIR()
Do Until Num = Range("O4").Value
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Range("L4").Value = Range("L4").Value + 1
Num = Range("L4").Value
Loop
MsgBox "Folios impresos correctamente"
End Sub
hola.. consulta debo hacer 6 folios por hoja del 1 al 8000.. que me puedes sugerir
Amigo, ayudame publicando tu duda en el grupo de ayuda de Microsoft Excel a Todo Nivel en donde casi 25000 personas nos reunimos a resolver y compartir todo tipo de contenido en Excel
hola buenos dias gracias por la aportación tengo una duda en cuanto la macro cuando mando a imprimir una cantidad se dispara y manda demasiadas quisiera saber como resolver el problema de antemano gracias saludos
+obed omar palafox paredes checaré el código y. Reenvío el arreglo
Microsoft Excel a Todo Nivel
buenos días mirando el código de la macro y viendo la lógica yo pensaba que el recuadro de no. páginas era la cantidad que se quería imprimir, pero me di cuenta que es hasta dónde quieres imprimir por eso no hay problema cuando imprimes del 1 al 10 o del 1 al 100, el problema se presenta cuando en el folio queremos que salga de un número como del 20 en adelante hasta al 30 y ponemos en número de impresiones 10 para que sean 10 folios y llegue al 30, pero no es asi, debemos ingresar en el folio el 20 por ejemplo y queremos que salga hasta el 25 pondremos 25 en el número de copias y no pasará el problema que se dispara la impresión infinito me funciona y espero le pueda servir a las demás personas está experiencia saludos
A mi me pasa lo mismo y ya edite el codigo, intente de diferentes formas y sigue imprimiendo muchas hojas cuando solo quiero una
muchas gracias, es correcto lo que tu dices en el numero es de colocar el ultimo numero que se necesita, restandole 1.
isaie9 puedes explicar mas claramente, no entiendo.
Si tengo en mi hoja de Excel 2 formatos iguales se puede imprimir en consecutivo?
Habria quie cambiar el código, lo intentare
Gracias
Hola, se puede hacer con nombres? o tienes algún tuto sobre eso? tengo que imprimir 500 hojas pero cada una con un nombre distinto, y los nombres están en otra hoja.
Feliz tarde... y si necesito que en el formato existan varias numeraciónes??? Me podrás ayudar????
Cualquier duda acercate a nuestro foro de ayuda. Saludos!
Resuelto el problema de la impresión infinita: el problema no radica en la macro ya que la misma está bien y trabaja bien en teoría para falto agregar algo para que la macro realice la función que uno quiere... En el video se explica el cambio de folio con la, cantidad de impresión que se establece x ejemplo (como el folio inicia de 0 y se le coloca 10 para el cual imprima 10 como sale en el video esta bien pero la macro lo ve como que tiene que imprimir hasta el folio 10 no que imprima 10) es por ello que cuando se le da imprimir un ejemplo 10 más estando ya en el folio 10 mandara el mensaje que la impresión fue un éxito pero no imprime nada xq la macro ya imprimió hasta 10 folio. Si se le manda a imprimir 25 imprimirá hasta el folio 25 pero no imprimirá 25 copias si no 15 que es la diferencia de 10 a 25.
Si el folio está en 25 y mandas a imprimir 10 copias la macro no lo va a entender y es aquí donde empieza a imprimir infinitamente xq no va encontrar el número 10 de folio xq esta en el 25..
En pocas palabras la cantidad que se pone para imprimir en realidad no es cantidad si no hasta el último folio que uno quiere. Si estas en el folio 25 y quieres 10 copias deberás color 35 así la macro sabrá que tiene que llegar hasta el folio 35.
Colocare un video explicando gráficamente mis palabras...
Vayaaa… alguien que no solo critica, también tiene la iniciativa de colaborar. Excelente tu anotación. Un abrazo
@@METN No me funciono, la primera impresión la hace bien, pero la segunda aun colocando hasta el numero que quiero que imprima, no se detiene imprimiendo mas de la numeración especificada
Muchas Gracias por tu comentario, me sirvió mucho y el video muy bien explicado solo ese detalle de la impresión infinita 😅
ESTIMADO COMO ESTA LE CUENTO QUE AL MOMENTO DE IMPRIMIR SE IMPRIME MUCHAS HOJAS Y LOS NUMEROS SE CAMBIA A FULL SU AYUDA
MI CORREO ES ventascourier@intex.com.ec
BUscare una respuesta a su problema y con gusto. Saludos
COMO LE PUEDO ENVIAR EL ARCHIVO PARA QUE PUEDA VER LO Q PASA
estimado no tengo el soporte a mi duda
Muy buena explicación me ha servido mucho esta macro. Como puedo imprimir números consecutivos 1de 100, 2 de 100, 3 de 100 así sucesivamente hasta 100 de 100 en una celda. De antemano gracias por su apoyo.
Podrías poner a lado de la celda (donde cambia el número consecutivo, H3 en el vídeo) el total de las copias. Es decir si sabes que realizarás 100 copias foliadas, podrías poner el 100 a lado así se lograría ver 1 (en H3) de 100 y así cambiaría el número de folio conforme a la impresión y tu total de copias saldría impreso en todas. Espero haberme explicado, saludos
Buen día si se quiere imprimir por ejemplo que no inicie de 1 que inicie de 50 que podría hacer. ?
Para imprimir de la 230 (l4) hasta la 254 (o4) use el siguiente código , y la próxima de la 254 a la 318.
Public Num As Integer
Sub IMPRIMIR()
Do Until Num = Range("O4").Value
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Range("L4").Value = Range("L4").Value + 1
Num = Range("L4").Value
Loop
MsgBox "Folios impresos correctamente"
End Sub
Garcias por el aporte, una pregunta si coloco un numero en el folio se queda en un loop infinito como hago para evitarlo?
@@camilomayrena3386 sucede porqué el número del folio columna "I" es menor al que está en la columna "O".
Si no es eso, prueba con cerrar el excel sin guardar y activa la macro de nuevo.
También tuve ese problema, pero realizando lo que te comenté lo solucione sin modificar el código.
Estimado el codigo que escribio va con espacios?
es indistinto, solo no juntes los textos. puedes copiarlo y pegarlo tal cual. Saludos!!
Para imprimir esto en doble cara no afecta? o solo las imprime de un solo lado???
Como puedo imprimir un consecutivo con letras? por ejemplo imprimir numero(LCP-001-001) y que los ultimos 3 digitos se cambien en automatico (LCP-001-002)? cada vez que imprime se sume + 1? por medio de una macro
Cualquier duda si preguntas en nuestro foro, te lo agradeceré. Saludos! facebook.com/excel.atodonivel/
como puedo g¿hacerlo pero que inicie en un determinado numero, por ejemplo que imprima 10 hojas pero iniciando a partir del numero 20?
Buen dia, disculpa necesito imprimir los folios en ambas caras de la hoja y los folios deben ser consecutivos en cada pagina, por lo tanto, me pregunto si podrás ayudarme en decirme como hacer el codigo para poder imprimir solo números impares y luego numero pares, saludos y gracias
+Alberto Diaz com gusto analizo el codigo y vemos como lo adaptamos
Muy util la informacion, gracias!!!!!!
Gracias por tus comentarios. Saludos!
Una duda a mi me lo hace bien pero me imprime 2 paginas la de la factura y despues otra con el boton del macro y el recuadro del numero de copias. Como puedo solucionar eso porfavor?
Hola buen dia, te invito a que nos visites en nuestro foro de ayuda y resolvamos juntos todas las dudas. Saludos.
facebook.com/groups/excel.atodonivel
hola!!! como puedo imprimir varias tarjetas con diferente nombre asi como en los folios pero con nombres? De antemano gracias por la atención...
tendriamos que checar macro, es algo muy distinto, si puedes ayudanos subiendo tu duda a
facebook.com/groups/excel.atodonivel/
Con gusto aqui lo que desees, estamos a sus ordenes.
Saludos!
hola buenas, por que a mi me sale error de compilacion , no puedo ejecutarlo ?
Hola. sólo me imprime la última hoja. Si pongo 10 copias, me imprime un número 11. ¿ me puedes decir que estoy haciendo mal por favor?
Amigo, ayudame publicando tu duda en el grupo de ayuda de Microsoft Excel a Todo Nivel en donde casi 25000 personas nos reunimos a resolver y compartir todo tipo de contenido en Excel
Gracias! el tema quedó resuelto, tenía un error al hacer referencia en las celdas, pero ya quedó y funciona "bien". El único detalle es que cuando quiero imprimir a partir de un número determinado, mayor a cero, se cicla y comienza a imprimir infinitamente !
publico esa duda en el foro. muchas gracias por esta información, es de mucha ayuda!
Buenas Tardes Al momento de imprimir tambien me imprime la forma y el recuadro de las copias como se puede evitar?
necesito foliar del 1 al 2000 en numero y una celda mas abajo escrito el numero en
letra se podra pragramar algo? desde ya muchas gracias si me puedes ayudar
Lo checo y te ayudo a la brevedad posible
Buenas segui los pasos para imprimir foliados le pongo 5 copias y automaticamente enpieza a imprimir pero varias y no para de imprimir. sera que me puedes ayudar cual fue el error
Hola, excelente canal para aprender a fondo excel.
Amigo tengo un inconveniente con una hoja de excel y déjeme explicarle lo que quisiera conseguir.
Tengo una hoja de excel codificada con macros la cual imprime folios es decir cuando lleno una forma esta se imprime e incluso puedo indicarle cuantas copias quiero IMPRIMIR por folio, luego estos folios se imprimen y se guarda el folio y se genera un nuevo numero de folio consecutivo y así sucesivamente. La cuestión es la siguiente necesito que en cada copia de un mismo numero de folio se imprima lo siguiente ORIGINAL- ALMACÉN- DEPTO SEGURIDAD - DPTO COSTOS preferiblemente en marca de agua en el fondo de la hoja a imprimir.
Y MUCHISIMAS GRACIAS ESPERANDO PUEDA AYUDARME
MARCOS G. ROJAS DESDE VENEZUELA
Amigo, esta de lujo lo que comentas, te agradeceré que las dudas que comentas las expongas en nuestro foro de ayuda en este link facebook.com/groups/excel.atodonivel/?ref=bookmarks
Hola Marcos, yo intento hacer lo mismo pero no eh tenido exito, podrias ayudarme con el codigo que tu utilizaste. Yo logro aguardar el folio pero no imprimirlo corectamente.
Uso el siguiente codigo:
Sub Siguiente()
[K34] = WorksheetFunction.Sum(Range("K33:K16"))
[k6] = [k6] + 1
nbre = Range("K6").Text
ruta = "E:\CARPETA PRINCIPAL\Desktop\Pedidos"
ActiveWorkbook.SaveCopyAs ruta & "\" & nbre & ".xls"
Do Until Range("H3") = Range("K4").Value + 1
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Range("H3").FormulaR1C1 = Range("H3").Value + 1
Loop
MsgBox "Folios impresos correctamente"
End Sub
Hola!! y si quisiera imprimir estas hojas a doble cara, ¿cómo seria la macro?
Hola muy buen video, una consulta, al ingresar 1 copia de igual manera me imprime 2, como puedo ajustar eso?, es decir, darle la indicación de 1 copia y que imprima 1 copia.
Excelente pude con ello... solo una duda.. como imprimo una continuación.
Por ejemplo, imprimí hasta el número 50. Como imprimo la continuación. Saludos
una pregunta yo quiero imprimir tres hojas una que diga cliente otra que diga contabilidad y la ultima almacén, pero quiero que sea así automáticamente dándole a imprimir como lo hago
Buenos días, se puede hacer el mismo procedimiento pero en vez de mandarlo a imprimir, generar un pdf con determinado número de folios ?
Hola, no entiendo como hizo para que al imprimir le salga que tiene una sola hoja el archivo, cuando lo mando a imprimir me imprime dos hojas!!! la del folio y la del botón imprimir
Te invito a aclarar todas tus dudas en nuestro foro de Ayuda Microsoft Excel a Todo Nivel en la siguiente dirección facebook.com/groups/excel.atodonivel/
Responder ·
buenas noches..me gustaría ver si es posible imprimir solo .. plantillas o cuadro llenos con información 😖.. Muchas gracias !! ayudas mucho
Como le puedo dar un formato en especial, como por ejemplo 00001 al 00100
El macro funciona muy bien gracias.
Solo que inicia imprimiendo la primer hoja en blanco, esto es sin numero.
Como hago si quiero iniciar por ejemplo con el folio 200 en adelante.
Gracias de antemano.
si deseas que inicie en el 200 coloca el numero 199 en el lugar donde se mostrará el folio y listo
yo lo hice, empecé en el número 7 y con 3 impresiones y me mandó imprimir el documento 200 veces hasta que me mandó el error 1004
@@alfredovaladez4460 IGUAL ME PASO A MI... ME MANDO A IMPRIMIR 100 HASTA QUE FINALICE TAREA
@@alfredovaladez4460 YA LO averigüe :) LA impresión SE DETIENE HAS QUE EL FOLIO SEA IGUAL AL NUMERO QUE PUSISTE EN LA CELDA DE números DE COPIAS, POR ESO EN LUGAR DE PONER EL NUMERO DE COPIAS QUE QUIERES, DEBES PONER HASTA QUE FOLIO QUIERES QUE SE IMPRIMA, Y LISTO!!!
y si quiero que ese folio este asignado cuando abra el archivo, y al momento de imprimirle me asigne el numero consecutivo y se guarde de nuevo?
HOLA¡ Buenos días¡ si tengo que replicar el folio dentro del documento 4 veces, ahí como le hago?
Y si quiero ese mismo formato pero en tamaño media carta y con consecutivo, porque tengo ese problema y solo puedo imprimir el formato a media carta, cortar la hoja y seguir imprimiendo. Espero haberme explicado bien. Gracias, saludos.
Y SI LE QUIERO PONER VARIOS CEROS ANTES EL 1 EN EL FOLIO?
Excelente!!, una pregunta, si imprimo hasta el 10, y cierro el programa, al volver a imprimir, como hago para que parta desde 11?
que parotote me hiciste carnal ahi esta tu like con amors jajajaja
Gracias por tan efusivo comentario, te agradezco el amors jajaja un abrazo
Hola como puedo hacer que imprima 2 en una paguina
Un saludo, puedes ayudarme con una macro que imprima un folio de tamaño media carta, dos veces en la misma hoja??; me explico tengo los comprobantes de pago de nómina para 100 empleados (ejemplo), y el tamaño del recibo es de media carta, pero deseo que se imprima dos veces en la misma hoja... Gracias
Habra que ver datos específicos, déjame un correo para contactarte
Te agradezco javishalom@gmail.com
Mismo problema Sarioengel@gmail.com
Excelente macro, pero ¿Cómo le hago para que esta misma macro me imprima con el consecutivo según el último número que se imprimió?
consulta como no aparece la celda L5 en la impresion?
debes confiogurar en las propiedades para que no se muestre. Saludos
GRACIAS!!!! Esto está excelente!!!!
Hola Monik gracias por comentar y espero que te haya servido mas dudas las podemos resolver en facebook.com/excel.atodonivel/ saludos
algo pasa, mientras esta abierta la pantalla de visual basic puedo trabajarlo bien como en tu video pero al guardar y cerrar y querer usarlo nuevamente ya no se detiene sin importar si solo mande a imprimir 10 folios, siguen y siguen saliendo, que puedo hacer, espero tu apoyo.
saludos!
Hola buen dia, te invito a que nos visites en nuestro foro de ayuda y resolvamos juntos todas las dudas. Saludos.
facebook.com/groups/excel.atodonivel
Hola buen dia.
Me sirvió mucho la macro que realizaste, solo tengo una duda. Como se podría imprimir los folios 2 veces el mismo?
Un ejemplo, al momento de poner los números de copias que queremos, y después le doy en imprimir, y al momento de hacer imprima 2 folios del mismo numero.
Gracias.
Déjame modificar la macro y la público a la brevedad
Muchisimas gracias amigo, si no es mucha molestia me etiquetas. Gracias.
ola como puedo foliar en numeros inpares o pares
modifica la macro cada dos, si tienes dudas entre todos te podemos ayudar aqui facebook.com/groups/excel.atodonivel/
CUANDO EJECUTO LA MACRO, TAMBIEN ME IMPRIME LA HOJA DOS QUE ES DONDE ESTA EL BOTON DE IMPRIMIR Y EL NUMERO DE COPIAS QUE DESEO. COMO LE HAGO PARA QUE SOLO ME IMPRIMA LA HOJA 1?
Cómo puedo hacer para que sean números que inicien con 00?
Oye si quiero agregarle una clave numerica como le hago
Una clave numérica a donde?
no perdón es que hice lo del vídeo y mando a imprimir 100 copias y salen numeradas en la celda de folio pero a ese numero que se va mandando, quiero agregarle una clave con letra por ejemplo MPM-0001 y que salga el consecutivo MPM.0002, MPM-0003, ETC
no puedo solo tengo el video no la imformacion probe y me quedo un tremendo error me tiro puros folios de 1 puros 1 y se quedo pegado me tiro una lista de espera de 300 impresiones que puedo hacer
verifica como pegaate el codigo. funciona correctamente
+Imprenta Maviro
Hola Maviro, he visto que en el video utilizan Do Until, esto quiere decir que hasta que se la celda 1 es igual a la celda 2, se va a ejecutar la macro.
Range("H3") = Range("H3") + 1
Verifica que cada que termine un loop, se sume en 1 la cantidad de "H3", en el editor de visual basic, utiliza la tecla F8, para ejecutar de una linea x una linea toda la instrucción, así podrás verificar cuál es el error.
Saludos.
SOLO AÑADI UN VALOR EN H3 COMO CERO Y CON ESO ME IMPRIMIO BIEN
Me da gusto que hayas resuelto, un abrazo.
Se ha producido el error '1004' en tiempo de ejecución:
Error en el método 'Range' de objeto '_Global'
Alguna idea?
A mi me imprime en otra hoja el botón y el número de impresiones que se puede hacer
Estoy teniendo problemas ya qué me manda a imprimir infinitamente ya, coloque los datos correspondientes según las necesidades qué ocupo tal cual se explica en el video pero nada
Hola, gracias por el video pero no tengo idea de como hacerlo funcionar ya que envie a imprimir 3 copias pero llego hasta 113, lo que deseo es colocar eh h3 un numero donde me quede por ejemplo ya tengo impreso hasta 150 y quiero que ahora me imprima 20 mas, o sea que llegue a 170, como podria hacerlo? porque otro dia necesito colocar a partir de 171 y asi siempre. Saludos
encontro solucion ?
LA IMPRESION SE DETIENE HAS QUE EL FOLIO SEA IGUAL AL NUMERO QUE PUSISTE EN LA CELDA DE NUMEROS DE COPIAS, POR ESO EN LUGAR DE PONER EL NUMERO DE COPIAS QUE QUIERES DEBES PONER HASTA QUE FOLIO QUIERES QUE SE IMPRIMA
y como foliar un formato multiple dentro de una misma hoja
Gracias mil pero tengo una pregunta, si le pido 1 me imprime dos, y asi .... siempre uno mas. Otra cosa. Deseo imprimir dos formularios por hoja, como hago?
Gracias por su ayuda, realmente me facilito la vida usted
+Javier Villarreal Cualquier duda al respecto puedes publicarla en facebook.com/groups/excel.atodonivel/ cualquiera de los usuarios o yo estamos para apouyarte. Saludos!
Excelente
Saludos abrazo fuerte
Buenas tardes, muy bueno el macro, solo tengo dos comentarios: 1:Imprime la primera en blanco, me gustaría que empezara en el 1... y 2: El boton y donde ingreso el numero de copias lo tengo en otra pagina, y al momento de imprimir me imprime en una hoja separada estas dos cosas. Como puedo resolverlo? Saludos
Imprime una hoja en blanco , como se evita este error
hola alguien me puede ayudar no se como usar este foro, lo que pasa esque quiero saber como puedo asignar numero de folio a unos recibos pero tengo tres recibos en una misma hoja, es decir cuando mando a imprimir la hoja salen tres porque son recibos pequeños, apenas pude descubrir como foliar el primero de ellos y cada vez que abro la hoja se cambia automáticamente pero los otros dos no encuentro la manera de que se cambien de igual forma uno debería tener asignado el numero 1,2,3 y la próxima vez que abra el libro debería estar 3,4,5
Puedes usar el siguiente que si es un foro de ayuda facebook.com/excel.atodonivel/
una donde el folio tenga ceros? 001, 002......010, 011 etc?
Solo decir q hice todo como indica el video y me quedo en un bucle infinito... me ayudan?
Hola!! me gusto mucho el tutorial, pero necesito imprimir desde el numero 40000 hasta el numero 55000 (Ejemplo). Me pueden ayudar?
Tan solo indica las celdas correspondientes entre que folio y que folio deseas. si no lo logras con gusto lo vemos aparte
Lo podemos ver aparte no puedo lograr definir los folios
Hola, espero sus comentarios
Hola podrias ayudarme?
Me ha servido tu codigo... sin embargo necesito que en una misma hoja se generen dos folios (esto ya lo he logrado) y que en la siguiente hoja se continue dicha numeración... es decir... en la primera hoja sea 1 y 2 ... en la segunda 3 y 4.
Lo que me sale a mi es que en la segunda hoja me coloca nuevamente el dos... es decir... 1 y2 .... 2 y 3....
Gracias por tu apoyo
+Christian Juarez Ibarra con gusto. Dejame revisar el tema creamos el código y te comento como me va
Hola, pudieron tener una respuesta a esta pregunta? es que yo necesito lo mismo, estoy haciendo un talonario y en una hoja carta me caben 4 por lo tanto necesito poder hacer un codigo donde vayan avanzando estas celdas
Hola, me interesa este mismo código que menciona maria fernanda, de anteano gracias
HECTOR ESCOBEDO hola yo lo pude resolver
En la tercera línea antes de dónde dice loop tienes que poner
Range("h3").formular1c1=range("h3").value+4
Y esta misma repetirla x todas las celdas que quieres que tengan folio el + 4 es porque si en la primera hoja tienes 1, 2, 3 y 4 a cada uno de estos números se les sumará 4 para tener el folio correcto en la siguiente hoja
Muchas gracias Maria Fernanda, ahora tengo otro problema,
se me traba el sistema mandando muchas impresiones, a que se debe??
y tambien se imprime la hoja donde puse el boton y la celda con el numero de copias :(
SALUDOS EXELENTE TUTORIAL SOLO QUE ME IMPRIME DOS HOJAS UNA CON LI TABLA Y LA OTRA IMPRIME EL BOTON DE IMPRIMIR Y LA CELDA EN LA QUE PONGO NUMERO DE COPIAS
como puedo llenar el formato n-veces y mandarlo a imprimir n-veces, gracias
+Karina Ruiz
Hola Karina, lo primero que debes hacer es tener una base de datos con los datos que vas a ingresar, preferentemente en otra hoja, no es necesario.
Lo siguiente es poner el siguiente código
Sub MacroKarina ()
dim N as integer
N = 2
sheets("Hoja2").select
range("A2").select
do while activecell empty
sheets("Hoja1").range("a" & N) = activecell
sheets("Hoja1").range("b" & N) = activecell.offset(0,1)
sheets("Hoja1").range("c" & N) = activecell.offset(0,2)
sheets("Hoja1").range("d" & N)= activecell.offset(0,3)
sheets("Hoja1").range("e" & N) = activecell.offset(0,4)
N = N + 1
activecell.offset(1,0).select
Loop
msgbox "listo"
end sub
Para que te funcione, solo deberás cambiar el nombre de la hoja y los rangos.
Necesito de su conocimiento. Quiero crear una numeración consecutiva dependiendo de una condición, ejemplo: recorrer un columna A y si encuentra la palabra "manzana" en la columna B me ponga el numero 1, si estuviera lleno de "manzana" no hubiera problema pero en la columna A tengo también ciruelas y peras, entonces recorrería la celda A y si encuentra manzana le pone en la columna B el numero 1, sigue recorriendo, hasta encontrar "manzana" nuevamente y le pone 2 en la columna B
Detalle: en la celda A2 estaba "manzana" pero recién en la celda A9 estaba la palabra "manzana", en las celdas anteriores habían nombres de frutas diferentes a "manzana".
Habra que hacer una macro, si me regalas mas detalles vemos y la hacemos
Gracias por responder!, necesito hacerlo sin macro, conjugando funciones, la mas cerca es la función fila, pero me devuelve el numero de la fila y no el consecutivo de un producto, en este caso "mazana", el objetivo es numerar productos con sus números consecutivos según el producto, imagina una columna llena de nombres de frutas, pero, entre ellas tengo manzanas, y quiero ponerles un consecutivo cada vez que aparezca esa fruta.
Muchas gracias. Excelente.
La macro funciona siempre a partir de 1 pero si mi folio es a partir de un número indefinido, ejemplo 25 a 50, y después de 51 a 74 como seria la macro
Asi como yo, algunos hemos tenido problemas con el código.Que sucede?Al momento de mandar a imprimir un folio a partir de uno ya existente, Ejemplo. INICIO EN 200, Y QUIERO 50 FOLIOS NUEVOS, esto causara una indeterminación en los valores y mandara a imprimir infinitamente.Ahora bien, no se absolutamente nada de macros, pero mientras leía el código me pareció que la parte donde dice "Do Until Range ("H3") = (Range ("K4").Value + 1," quiere decir que aplicará la macro hasta que el rango de nuestro folio inicial (200), sea una unidad mas que la del rango que indicamos en el numero de copias (50).Como podrán observar, el problema radica en que esto nunca podrá suceder, y al momento de indicar un valor en "K4", menor al de "H3" estaremos creando una indeterminación.Solución?Lo que a mi me funciono, y dado que yo no se hacer código, es indicar HASTA QUE FOLIO QUIERO LLEGAR, y NO EL NUMERO DE COPIAS, de esta manera decimos:INICIO DE FOLIOS EN "200" ( " H3 = 200 " )FINAL DE FOLIOS IMPRESOS EN "251" ( " K4 = 251 " )Y así tendré 51 folios nuevos e impresos. dejando el numero "252" com folio inicial para la próxima impresión.Espero les funcione y repito, yo no se nada de código ni macros, pero esto me pareció lógico jejejejeje.Saludos !!!
Te invito a aclarar todas tus dudas en nuestro foro de Ayuda Microsoft Excel a Todo Nivel en la siguiente dirección facebook.com/groups/excel.atodonivel/
Responder ·
Y si el primer número del consecutivo no es 1???
+Monik Morán facebook.com/groups/excel.atodonivel/ cualquier duda puedes postearla aqui
Buena si funciona, pero si lo quiero imprimir a doble cara como le hago????
le agregue una suma k4=h3+k7 para que h3 sea el numero de folio cualquiera y en k7 se lepone el numero de copias 10 por ejemplo y en k4 donde esta agarrando el macro donde hace el trabajo del macro de ser como el limite del folio ya esta gracias
+esteban pedraza me da gusto que hayas comprendioe el video. Saludos
@@METN ME EXPLICA ESO PORFAVOR
DE DONDE SACO LOS CÓDIGOS ME PERDI
EN LA DESCRIPCIÓN DEL VIDEO. SALUDOS!
si quiero que el folio comienze del numero 2818233 po ejemplo? haber voy achecar el codigo
en value com olo cambio de valor empezaria en uno pero quiero que empieze lo declaro como variable cada ves que haga una impresion le hago el cambio
+esteban pedraza Cambialo porel folio que desees y no deberias tener problemas
genial eres grande por eso
si la celda h3 tiene alli escrito Value 2818233 empesaria desde alli y no de 1 verdad
no hice eso y se travo
hola me dice error en sintaxis
Como hago esto pero a doble cara
8Cordial saludo
Deseo crear una carta comercial (texto) y con tablas luego imprimirla todo desde excel y utilizando una macro
+John Wilson Ladino Ladino Si te unes al grupo de ayuda en facebook lo vemos a detalle. Saludos
Gracias
Gracias por comentar, saludos desde la Ciudad de México
Quiero imprimir 2 en una paguina y no puedo
Intento usar el codigo pero no tengo exito, solo quiero imprimir una hoja de folio al seleccionar finalizar. Para guardar e imprimir a la vez el folio... Uso el codigo siguiente, y se aguada pero se imprime muchas veces hasta trabarse.
Sub Siguiente()
[K34] = WorksheetFunction.Sum(Range("K33:K16"))
[k6] = [k6] + 1
nbre = Range("K6").Text
ruta = "E:\CARPETA PRINCIPAL\Desktop\Pedidos"
ActiveWorkbook.SaveCopyAs ruta & "\" & nbre & ".xls"
Do Until Range("H3") = Range("K4").Value + 1
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Range("H3").FormulaR1C1 = Range("H3").Value + 1
Loop
MsgBox "Folios impresos correctamente"
End Sub