Como generar código qr en Excel

Рет қаралды 307,077

4 жыл бұрын

Aprende a crear un código QR en Excel fácil y rápido. genera códigos Qr en Excel 2021.
#CódigoQR #QR #ExcelQR
✅ Descarga el código:
eltiotech.com/codigos-qr-en-e...
📢 Suscríbete a mi otro canal:
bit.ly/MiguelVela
💌 Únete a nuestro canal de Telegram:
t.me/eltiotech (chat, noticias y más)
🤗 Visita nuestras redes sociales:
Sitio web: www.tiotech.net
www.eltiotech.com
Facebook: / eltiotechoficial
Instagram: / luismiguelvelavela
🟩 Grupo de ayuda Excel:
/ excelayudas
🟦 Grupo de ayuda Word:
/ 2954410744838915

Пікірлер: 714

@joseeduardo4076 4 жыл бұрын

La semana que viene empezaremos hacer trabajos en Excel. Gracias por tus videos, tus tips y consejos que compartes con nosotros

@almerbricenogarcia9882 4 жыл бұрын

TE HAZ GANADO MIS RESPETOS POR TU TRABAJO Y PACIENCIA AL EXPLICAR... Y GANASTE UN SUSCRIPTOR MAS.. GRACIAS POR LA INFORMACIÓN

@jersi2566 4 жыл бұрын

Hola Miguel Me suscribí ahorita, pero llevo tiempo viendo los vídeos, fundamentalmente sobre Excel, siempre lo he usado, pero desde hace unos meses que llevo viendo los tutoriales, es que realmente estoy comenzando a aprender Excel. En un vídeo que mostraba como hacer un formulario para llenar una base de datos, con Macros y VBA. Me gustaría, además de esos datos, saber el código para fechas y para poner el Tiempo, ejemplo: el Tiempo que realiza un deportista en sus diferentes eventos y la fecha en que lo realizó. Muchas Gracias por tus excelentes vídeos

@johnporras7840 4 жыл бұрын

Que buen video algo más que aprendo gracias tío tech

@lasaventurasdel1036 3 жыл бұрын

Felicidades me sirvió mucho si viene con error pero será por mi compu viejita con otros usuarios pude resolverlo muchas gracias y sigue así explicas muy bien éxito

@yalvarezd 3 жыл бұрын

gracias!, funcionó perfecto!

@jairantonioariasbecerra5930 4 жыл бұрын

gracias por tus concejos y recomendaciones

@joshuayt649 4 жыл бұрын

Gracias por el video justo este estava buscando

@milordargentina Жыл бұрын

Formidable tio. me va a ser muy util para un inventario. gracias

@augustomaximo4891 2 жыл бұрын

siempre innovando, gracias....

@LuisAlvarez-zq3nd 4 жыл бұрын

Tio tech usted es un crack

@AiniKoudelka 3 жыл бұрын

Me funciono, muchas gracias

@armandotuviaje7188 Жыл бұрын

Impresionante, muchas Gracias!

@thebroki6684 2 жыл бұрын

MUCHAS GRACIAS MASTER!!!!!!

@MolitaliaHuanuco Жыл бұрын

Tio Tech eres un capo.

@elkineduardorojaspena3993 4 жыл бұрын

No mas con este vídeo te conozco y eres muy bueno para excel gracias por compartir el conocimiento

@eduardorafaeltrujillocoron9596 Жыл бұрын

Muy bueno muchas gracias

@marcoantoniovelazquez742 Жыл бұрын

excelente video y el complemento donde hacen referencia a como solucionar los errores estuvo genial... ya lo probe y funciona bastante bien. solo tengo una duda, hasta cuantos caracteres soporta el QR? me pueden comentar por favor

@hpplottersplotter5927 4 жыл бұрын

Hola, Tio ya corregi el codigo y esta trabajando sin problemas, gracias por tu aporte y estoy en espera del siguiente video, saludos.......

@user-us8bw5qu6b 3 ай бұрын

Pasame porfa el codigo corregido no puedo generar los Qr con el codfigo de la descripcion porq ne sale un error

@cristinabolanos6636 2 ай бұрын

Si por favor, apóyanos, a mi me sale error en : Set QR = ActiveSheet.Pictures(Ruta)

@u.e.m.juandediosguanche 4 жыл бұрын

Buenos días Miguel Excelente tus vídeos en el caso de que queramos tomar datos de varias celdas por Ejemplo en una columna esta los nombres en otras los apellidos en otra el grado se puede configurar en el archivo que dejaste en el link tendríamos que colocar la cadena de donde están los datos o hay una manera mas sencilla de hacer gracias.

@RosmeryLizArotaipeQuispe 3 ай бұрын

Gracias tio tech, me ayudo C:

@jjcadette Жыл бұрын

te felicito

@iankarlosarosemena5071 10 ай бұрын

Hola , me gusto mucho el video de generar QR, y me gustaria saber como se puede habilitar para una base de datos mas grandes, ya sea lotes, fechas de expiración, entre otros.

@luisalbertorodriguez7321 3 жыл бұрын

Hola tío, muchas gracias funciona genial Solo tengo una duda , puedo hacer que el código QR , tenga contraseña o que ciertos usuarios lo tengan ?

@martinboari5345 3 жыл бұрын

Muy bueno. Muchas gracias. Consulta, el código vence en algún momento ?

@maguuui123 2 жыл бұрын

Muy buen video!!! Como podría hacer para que el codigo QR contenga una imagen?

@michelrojas1609 4 жыл бұрын

Genial;

@alejandrosaborido8188 3 жыл бұрын

Buenas noches, tengo dos consultas, se pueden generar QR uno por hoja? y la otra es si se actualizan cuando hacemos cambios en las hojas? desde ya muchas gracias

@eusse1000 Жыл бұрын

Gracias, excelentísimo video. Quisiera preguntar, si se puede exportar el código QR generado y en que formato seria?. la exportación seria para Photoshop. Agradecería la respuesta. Saludos

@Momo-dl6dx 2 жыл бұрын

Gracias por el video, me ayuda monton. Dos preguntas, necesito usar mas de dos celdas de informacion para generar mi QR code, donde agrego esta informacion. Y deseo anadir un tamano especifico al QR code. (1*1 cm) como hago esto? Mil gracias!

@Pachon0812 2 жыл бұрын

Excelente video! Pudiera usar la macro para una URL de one drive y que descargue un documento pdf?

@Jaimadas Жыл бұрын

Muchas gracias por el video, necesitaria un generador de QR como este... pero me interesaria que.... una vez entro en el QR que pudiese pinchar sobre un enlace que me lleve a google drive y poder seleccionar un archivo en concreto. Eso seria muy interesante. ¿Como podria hacerlo?

@storkperu1731 Жыл бұрын

Tio Tech. de verdad sos lo maximo con tus conocimiento, una duda, como podríamos hacer para COPIAR ese código qr a una hoja nueva talvez con la función buscarv pero la idea es que quiero generar una tarjeta de idetntificación. y que aparezca el codigo QR

@hectorsandoval9873 2 жыл бұрын

Hola buenas tardes me gusto mucho tu video solo tengo una duda si quisiera seleccionar varias columnas para un solo codigo qr, se podria?????

4 жыл бұрын

Veo que todos han tenido el mismo problema y yo no soy la excepción, pero gracias por el aporte!!

@eddiekaka1452 4 жыл бұрын

Excelente.. Si imprimo el codigo *qr* generado ¿Como puedo hacer para leerlo con la web cam y q genere un caracter especial ejemplo *✅* junto a la celda q contiene el texto relacionado al *qr* ? Gracias

@enriqueeescorpion 7 ай бұрын

HOLA si aun estas viendo este video tuyo esta genial parece simple pero e tenido un detalle espero me puedas ayudar en la macro sale este error en este codigo ___"Set QR = ActiveSheet.Pictures.Insert(Ruta)"

@jmmolero2 4 ай бұрын

Tengo el mismo problema

@INVENTRONICA 3 ай бұрын

Amigo modifica la URL asi: Link = "chart.apis.google.com/chart?cht=qr&chs=300x300&chl=" con esto solucionas

@INVENTRONICA 3 ай бұрын

@@jmmolero2 Amigo modifica la URL asi: Link = "chart.apis.google.com/chart?cht=qr&chs=300x300&chl=" con esto solucionas

@hectormontes123 3 ай бұрын

#If VBA7 And Win64 Then Private Declare PtrSafe Function URLDownloadToFile Lib "urlmon" _ Alias "URLDownloadToFileA" ( _ ByVal pCaller As LongPtr, _ ByVal szURL As String, _ ByVal szFileName As String, _ ByVal dwReserved As LongPtr, _ ByVal lpfnCB As LongPtr _ ) As Long #Else #End If Sub CrearQRMasivo() Dim n&, i& LimpiarImagenes With wGenerador n = .Range("A" & Rows.Count).End(xlUp).Row For i = 4 To n CrearQRIndividual .Range("A" & i) Next End With End Sub Sub CrearQRIndividual(Valor As Range) Dim Link$, Ruta$, QR As Object Dim lado&, izqui&, nTop& 'Descargo el código QR If Valor.Value = Empty Then Exit Sub End If Link = "quickchart.io/qr?text=" & Valor.Value & "&chld=H|0" Ruta = ThisWorkbook.Path & "\chart.png" URLDownloadToFile 0, Link, Ruta, 0, 0 '----------------- 'Ingreso la imagen Set QR = ActiveSheet.Pictures.Insert(Ruta) Kill Ruta With wGenerador nTop = .Range("B" & Valor.Row).Top lado = .Range("B" & Valor.Row).Width izqui = .Range("B" & Valor.Row).Left With QR .Top = nTop .Width = lado .Left = izqui End With .Range("B" & Valor.Row).RowHeight = lado End With '----------------- End Sub Sub LimpiarImagenes() Dim imagen As Picture For Each imagen In ActiveSheet.Pictures imagen.Delete Next wGenerador.Range("A4", "A" & Rows.Count).RowHeight = wGenerador.Range("A1").RowHeight End Sub

@ricardovelazquez4455 3 жыл бұрын

Genial el video ¿Se puede hacer una lista desplegable para sólo mostrar un QR?

@SoyGeovannyJimenez Жыл бұрын

UTILIZA FILTROS EN LOS NOMBRES ASI TE FILTRA DE MANERA INDIVIDUAL CON TODOS LOS DETALLLES DEL SELECCIONADO

@NOALNOM 3 жыл бұрын

Excelente gracias por compartir! ¿Se podría generar el código QR pero a partir de "sumar" varios campos de texto? Gracias y saludos!

@lupitachaidez7018 3 жыл бұрын

Hola, tal vez te sirva la función CONCATENAR para que puedas unir varias columnas de texto alfanumérico

@javiereperezc 3 жыл бұрын

Para unir varia columnas, colócate en una columna limpia = TOMA COLUMNA (&) TOMA SEGUNDA COLUMNA. SI quieres generar espacios &" "&

@claudiacamagupioc2697 4 жыл бұрын

❤❤❤

@frida959 Жыл бұрын

Si me funciono dude gracias, solo que seguí el procedimiento que estaba en el link donde descargas el código. Mucho ojo en eso. Gracias :)

@franciscobalam5348 Жыл бұрын

disculpa veo que a ti te funcion a mi marca un error en URLDownloadToFile de la fila URLDownloadToFile 0, Enlace, Ruta, 0, 0 como lo solucionaste

@logisticaoperaciones4127 3 жыл бұрын

Buen día, muchas gracias por tu vídeo es de gran ayuda, pero en la creación de mi código QR en la información inclui la fecha pero al leer el código aparece en número, me podrías asesorar que le debo modificar, muchas gracias

@danezaisabelmejia4358 2 жыл бұрын

Muchas gracias por tus videos nos ayudan mucho en el trabajo. Te escribo para que me puedas ayudar, tengo que transcribir muchas facturas de manera manual a excel, ahora me baje una aplicación en mi celular para escanear los códigos QR que tienen las facturas, mi pregunta es como puedo esta información proporcionada por el escaneo Qr convertir a excel? Nose si se puede hacer eso.

@luisaruedav8082 Жыл бұрын

Interesante , alguien ha podido hacer esto posible?

@lalobiker796 3 ай бұрын

@@luisaruedav8082 Sí, yo lo hice

@carloshernandez3906 6 ай бұрын

Hola, me gusto tu video, pero al correrlo me arroja un error al correr macro este es el error 'Ingreso la imagen Set QR = ActiveSheet.Pictures.Insert(Ruta) como puedo solucionarlo estoy usando office 2021

@INVENTRONICA 3 ай бұрын

Amigo modifica la URL asi: Link = "chart.apis.google.com/chart?cht=qr&chs=300x300&chl=" con esto solucionas

@silviavillegas5425 9 күн бұрын

Cómo lo solucionaste?

@brunotorresguillen2841 Жыл бұрын

Hola. Gracias por la información. Podrías indicarme por qué al correr la macro se produce el error 1004 en tiempo de ejecución? Indica que no es posible obtener la propiedad Insert de la clase Pictures. "Set QR = ActiveSheet.Pictures.Insert(Ruta)"

@agustinemiliotorresdiaz466 Жыл бұрын

bro pudiste solucionarlo?

@analistait Жыл бұрын

@@agustinemiliotorresdiaz466 Tengo ese mismo problema

@tatianagonzalez3127 Жыл бұрын

@@agustinemiliotorresdiaz466 TENGO EL MISMO PROBLEMA, ALGUIEN SABE COMO SOLUCIONARLO

@agustinemiliotorresdiaz466 Жыл бұрын

@@tatianagonzalez3127 sii

@agustinemiliotorresdiaz466 Жыл бұрын

@@tatianagonzalez3127 en un comentario más abajo alguien puso que edito la macro y le funcionaba, y realmente funciona jajaja

@60l0s0 2 жыл бұрын

Que tal todos! me parece una excelente aportación del Tío solo que igual que muchos tengo el problema del error de compilación indicando que no se ha definido Sub o Function y no he podido resolverlo, ya compare incluso el codigo del video contra el que baje de la liga y no encuentro el error... TIO, ojala y me puedas ayudar. gracias y saludos a Todos!!

@medranoautomotoresyneumati3004 2 жыл бұрын

#If VBA7 And Win64 Then Private Declare PtrSafe Function URLDownloadToFile Lib "urlmon" _ Alias "URLDownloadToFileA" ( _ ByVal pCaller As LongPtr, _ ByVal szURL As String, _ ByVal szFileName As String, _ ByVal dwReserved As LongPtr, _ ByVal lpfnCB As LongPtr _ ) As Long #Else #End If Sub CrearQRMasivo() Dim n&, i& LimpiarImagenes With wGenerador n = .Range("A" & Rows.Count).End(xlUp).Row For i = 4 To n CrearQRIndividual .Range("A" & i) Next End With End Sub Sub CrearQRIndividual(Valor As Range) Dim Link$, Ruta$, QR As Object Dim lado&, izqui&, nTop& 'Descargo el cÃ³digo QR If Valor.Value = Empty Then Exit Sub End If Link = "chart.apis.google.com/chart?cht=qr&chs=300x300&chl" & Valor.Value & "&chld=H|0" Ruta = ThisWorkbook.Path & "\chart.png" URLDownloadToFile 0, Link, Ruta, 0, 0 '----------------- 'Ingreso la imagen Set QR = ActiveSheet.Pictures.Insert(Ruta) Kill Ruta With wGenerador nTop = .Range("B" & Valor.Row).Top lado = .Range("B" & Valor.Row).Width izqui = .Range("B" & Valor.Row).Left With QR .Top = nTop .Width = lado .Left = izqui End With .Range("B" & Valor.Row).RowHeight = lado End With '----------------- End Sub Sub LimpiarImagenes() Dim imagen As Picture For Each imagen In ActiveSheet.Pictures imagen.Delete Next wGenerador.Range("A4", "A" & Rows.Count).RowHeight = wGenerador.Range("A1").RowHeight End Sub

@marcosarenascuaxilotl6960 4 жыл бұрын

Hola Miguel (Tío)... con este código se puede generar los qr en una macbook?

@Pablo-fk5bd 4 жыл бұрын

Hola tío tech generador QR me serviría para poder hacer mi lista de precios de restaurante así en excel ....? Algo virtual si......?

@benitezbenitez 3 жыл бұрын

hola se puede generar un codigo qr con varias columnas? porq alli generar el codigo qr con la columna A, pero me gustaria saber si tengo informacion en B , C , D podria hacer un codigo qr con la informacion que hay en dichas columnas?

@fabiovelez1 3 жыл бұрын

Cómo estás, genial el tutorial, gracias por el aporte, seguí todos los pasos pero al final me sale otro error, ser QR = activesheet.pictures.insert(ruta)

@arturodejesusmaliachibanue2443 3 жыл бұрын

ve el comentario de Pedro Molina aqui en estas preguntas y respuestas, yo lo sigui y me resulto bien

@dr.sandravaliente Жыл бұрын

Gracias. Pregunta cómo generar un control de entradas y salidas de empleados con registro diario?

@AngelGonzalez-cf9yp 2 жыл бұрын

Muy bueno y facil de usar. Pero como podria generar con tu codigo el sacn para una WIFI? Muchas gracias

@escuadrondeleones9712 4 жыл бұрын

Una consulta si copio el código QR que se genero en un Word va a seguir funcionando?

@kprrut 4 жыл бұрын

Buenos días si quiero que me haga el código de varias columnas, es decir de un listado, el código de producto y la descripción del mismo. ¿Cómo pongo más de 1 rango a tomar datos? GRacias de antemano

@victordiaz2199 4 жыл бұрын

Hola, genial video pero me surge una duda, si quisiera tomar los valores desde B3 a K3 y en J3 generar el codigo QR pero que este este en otra hoja como lo podria hacer?

@miicelltechnosv7395 Жыл бұрын

Saludos, no se si logró hacerlo. Pero entiendo el mismo problema que necesito para generar el QR. Creo lo ideal es cambiar el codigo y el desplazamiento por lectura en las columnas como lo hace con las filas. Eso seria ir sumando los datos al generador de QR. Ya que si leemos más y vemos mas ejemplos de otros que hacen generador de QR's para excel, se basan más en recolectar el registro completo o en partes de la BD's creada en la hoja de trabajo, igualmente puede ser combinada de otros datos de otras hojas, como lo menciona.

@kameka255 Жыл бұрын

Buenas noches, presenta errores, nos ayudaría mucho uno actualizado donde no tengas observaciones. Gracias por tu aporte!

@diegogamerjuega 3 жыл бұрын

hola me marca error aqui Set QR = ActiveSheet.Pictures.Insert(Ruta)

@carlosalbertomenaflores4758 Күн бұрын

IGUALMENTE

@brunoferreya8704 28 күн бұрын

Hola, ¡gracias por este material! ¿Cómo hago para que los QR no se actualicen todos, cada vez que agrego una nueva celda de nombre?

@gilbertgonzalez3088 11 ай бұрын

Hola, tengo la siguiente pregunta. Es posible generar el codigo QR con diferentes campos? En el video solo muestra un dato que seria el Nombre pero que pasa si deseo generarlo con Nombre y fecha de nacimiento. DEbo tener todos esos campos o datos en una misma celda? Gracias

@dflorian 4 жыл бұрын

Man, por favor deja Link para donaciones. Paypal por ejemplo.

@natalyromerodeantonio479 Жыл бұрын

Hola quisiera que esté qr me sirviera para un inventario de un negocio de calzado en vez de usar el código de barras que recomendación me das para que la pistola de código de barras los lea.... Y los facture ....

@hugoamatitla1832 2 жыл бұрын

Hola, Al generar el codigo me aparece lo siguiente: Error de compilación: Se esperaba: fin de la instrucción; que tengo que realizar para que se corrija este error?

@joseantoniobelando2537 2 жыл бұрын

Hola, me pasa lo mismo y destaca la palabra (DIGOS), me vendria muy bien poder solucionarlo.

@beatrizvargas8069 2 жыл бұрын

Hugo, me llegó a pasar igual pero era tema de un espacio que sobraba ne la propia línea o entre renglones, ojalá sea tu caso y lo puedas resolver.

@guillermogrosso3858 3 жыл бұрын

Se puede usar en office 2010?

@adelamora4746 3 жыл бұрын

Hola Miguel.Quisiera saber si se puede configurar para que al momento de escanearlo me dirija a una página de internet en específico.???

@navavictor1429 3 жыл бұрын

Creo que puedes colocar el URL de la pagina en la celda donde iría el código y en automático se generaría el QR para esa pagina en especifico.

@azut3031 2 жыл бұрын

Hola me aparece al final se esperaba: fin de la instrucción. Cómo lo puedo corregir. Gracias muy interesante

@millaextra5433 2 жыл бұрын

Estoy igual.

@franciscojaviergarciabanos3130 4 жыл бұрын

Deberías poner en tu video los errores que te reclaman y el código fuente en descarga así como en la narración. gracias.

@joshuayt649 4 жыл бұрын

Hola primer comentario

@franciscogarcia5212 9 ай бұрын

Buenos dias, excelentes videos, soy un seguidor fiel, trabajando los QR desde excel me sale el siguiente error " Set QR = ActiveSheet.Pictures.Insert(Ruta)l, por favor agradezco tu ayuda, mil gracias, felicitaciones.

@ivancillo2386 9 ай бұрын

ayudaa a mi igual me sale ese error

@elaventureroperuano8455 Ай бұрын

Puedes hacer de Apis actualizadas al 2024?

@luiseduardocedillo4953 Жыл бұрын

Buenas tardes, como puedo generar QR masivos con mas de una celda de informacion? en columna A nombre y comluna B Apellido? Saludos y gracias!

@adnalmo 3 жыл бұрын

una pregunta, despues de generar el qr, ¿como se pasaría a word? yo ya tengo una plantilla pero tengo que copiarlo y pegarlo manual

@sertint 2 жыл бұрын

Hola buenas tardes...a partir de aqui se puede generar una base de datos??..para un servicio tecnico??

@briancristhianaponte1742 2 жыл бұрын

hola.... el mismo pero con boton dentro de un form para creacion de forma masiva?

@milordargentina Жыл бұрын

una consulta, si tengo 6 o mas columnas que deseo generar el QR, donde modifico la macro? Ej columna A nombre, Columna B direccion, columna C mail, etc, etc. Gracias

@omarherrera3321 3 жыл бұрын

Saludos. como se podría agregar más datos o más columnas al código. En la corrida, el código qr generado solo tiene datos de una sola celda, como se puede agregar más datos?

@lamobeco4627 4 жыл бұрын

Hagan Un proyecto real de manejo de inventarios o lo que quieras pero que sea completo y profesional

@AiniKoudelka 3 жыл бұрын

Tendrás de códigos de barras normales?

@raulcastrojimenez3581 Жыл бұрын

buenas tardes me podrían ayudar me aprese un error Ingreso de la Imagen y Kill Ruta me aparece en amarillo que puedo hacer para ya poder generar mis QR

@marxcossiopariona3895 2 жыл бұрын

GRACIAS . SI PUDERA PONER 1O LIKES LO HARIA

@juliocesargavanchobarrient4772 Жыл бұрын

Estimado tio TECH deberias ayudar a tu comunidad con el error en el codigo que NO FUNCIONA, la ruta es para buscar la imagen CHART.PNG Ud. la tiene o en todo caso que imagen es??. Gracias por responder TIO TECH

@Pedro-ij4bu 11 ай бұрын

Solucionaste el inconveniente? A mi también me aparece

@ciudadquetzal2737 4 жыл бұрын

fijate que el mismo error que a otros amigos me aparece, ya sustituí la línea que escribes y mi ordenador si está conectada a INTERNET pero sigue apareciendo el mismo error, nos podrías colaborar muy amable, saludos,

@danyderie6236 2 жыл бұрын

Buen día, esta macro sirve para Office 2007?

@cristhianmartinez2860 3 жыл бұрын

Hay alguna manera de crear un archivo en el cual se recolecte por medio de codigo qr firmas para un archivo en exel en el cual registre la hora en la que se recolecto la firma?

@unpocodemigaleria.licy.04 Жыл бұрын

recordatorio para mi y el que quiera ir defrente a la información 2:06

@wooferwavesonidoyluces4957 3 жыл бұрын

ME SALE EN DEPURAR ESTO: 'Ingreso la imagen Set QR = ActiveSheet.Pictures.Insert(Ruta)

@iansalazar22 2 жыл бұрын

pausa el video en esa parte donde aparece el codigo arriba hay un link fijate que este igual que en el video, escribelo tal cual del video en el codigo descargado esta incompleto. cuando lo escribas completo te jalara el codigo qr

@PonyLatino 2 жыл бұрын

Hay forma de que los QR se guarden en el pc de forma automática ?con el nombre tomado de una celda ?

@heberalanis6190 2 жыл бұрын

Miguel Vela, ayudame a generar los archivos png o jpg para que al cerrar y abrir la aplicacion no borre el chart.png que se genera para el codigo QR, en este punto de tu macro se borra la ruta: 'Ingreso la imagen Set QR = ActiveSheet.Pictures.Insert(Ruta) Kill Ruta With wGenerator Necesito guardar todos los archivos de los codigos QR generados: Ruta = ThisWorkbook.Path & "\chart.JPG" Se que se tiene que usar un FOR, que agregue un subindice al archivo chart.jpg De antemano gracias por el aporte y tu ayuda.

@MOSTACHIOBOY Жыл бұрын

Buenas tardes Miguel, estoy comenzando a usar cada dia mas el excel, seguramente me hace mucha practica para dominar algunos conceptos. Estoy tratando de generar codigos QR, y siguiendo al pie de la letra tus tutorial, me manda un error que transcribo Erro de complilacion Una clausula #Elself,#Else o #endlf debe estar precedida de una clausula #If, que significa?

@eoce1977 2 жыл бұрын

Gracias por el video, queria saber por que me da error en el Set QR = ActiveSheet.Pictures.Insert(Ruta), No se Puede Obtener la propiedad Insert de la clase Picture, Gracias de Antemano.

@jesusgodinez9891 2 жыл бұрын

Tengo el mismo error. Supiste solucionarlo?

@oswaldogranados4554 2 жыл бұрын

el error te da por que no se bajo ninguna image en la ruta donde se encuentra el libro de excel guardado y el codigo esta incompleto hay una linea que dice Link = "chart.apis.google.com/chart?ch..." & Valor.Value & "&chld=H|0" y tiene que ser sustituido por Link = "chart.apis.google.com/chart?cht=qr&chs=500x500&chl=" & Valor.Value & "&chld=H|0" para que te genere el código con una api de Google y baje una imagen en la misma ruta donde tienes ubicado el libro de excel

@alifabian4444 2 жыл бұрын

Buen dia...obtiviste respuesta a ese error tbm a mi me lo marca

@INVENTRONICA 3 ай бұрын

Amigo modifica la URL asi: Link = "chart.apis.google.com/chart?cht=qr&chs=300x300&chl=" con esto solucionas

@edgarcorona5641 3 ай бұрын

Hola buenas tardes, pudieron resolver este tema?

@apolinarcoria1533 4 жыл бұрын

Buenas tardes, necesito bajar el codigo QR, para macro, para generar codigo QR en excel automatico, serian tan gentiles de indicar como debo proceder. Gracias

@ruiz2487 3 жыл бұрын

Puedo generar un solo código qr para una lista? Ejemplo una lista de códigos de barra

@santiagofuentes724 2 жыл бұрын

consulta: el programa solo sirve para windows?

@joseluischalco1957 2 ай бұрын

Hola queria saber si se puede ralizar en el excel de office 2016, por que la celda me toma como valor

@improvingtelefonica4695 Жыл бұрын

El video esta muy bien explicado, lamentablemente el link al generador del código no funciona ¿hay alguna alternativa?

@nezmultiservicios7773 Жыл бұрын

Muchas gracias por el tuto, lamento informar que me aparecio error y decidi hacerlo por otro medio

@carlosolvera3286 Жыл бұрын

Buenas tardes Miguel, gusto en saludarte, te agradezco mucho el apoyo, me aparece el error "1004", pero te soy sincero y no sé como corregirlo, me podrás ayudar a resolver, de antemano gracias!

@reinaldocasas4362 6 ай бұрын

me pasa lo mismo

@HectorH55 3 жыл бұрын

puedo leer el codigo con un celular y que me muestre la informacion en excel ?? se puede lograr algo asi ?

@magnoum 4 жыл бұрын

Muchas gracias por el tutorial !!! ... tengo una pregunta. ¿sabes cómo exportar los códigos QR a word para invorcarlos en un campo de correspondencia?, supongamos, para elaborar unos fotocheck o ID cards

@nacho86md 4 жыл бұрын

necesito lo mismo, supiste como hacerlo?

@carlosbravo5411 Жыл бұрын

Seria mas facil modificar el macro, cambiando el nombre chart.png a valor.value, quitar la linea kill Ruta, para que se generen los archivos qr y posteriormente combinarlos en word

@juanjoseasturiano755 Жыл бұрын

Ante todo darte las gracias por compartir tus conocimientos y tiempo. He seguido el vídeo con todas sus indicaciones y después de copiar el código en el módulo y hacer las oportunas modificaciones me aparece el siguiente error. #If VBA7 And Win32 Then desde esta línea --> Private Declare PtrSafe Function URLDownloadToFile Lib "urlmon" _ Alias "URLDownloadToFileA" ( _ ByVal pCaller As LongPtr, _ ByVal szURL As String, _ ByVal szFileName As String, _ ByVal dwReserved As LongPtr, _ ByVal lpfnCB As LongPtr _ y hasta esta, todo --> ) As Long está en rojo #Else