-
Estadísticas de usuarios
31998
Usuarios totales12075
Máx. usuarios conectados
-
Plantillas gratuitas
-
Top descargas
-
-
Resumen de reglas y valores del foro
- Quien más aporta, más recibe.
- Lee con atención, pregunta con intención.
- Todos podemos aportar.
- No incites ni participes en debates estériles
- Trata a los demás como te gustaría que te trataran a ti.
- La brevedad mola.
- Enlaza siempre que puedas.
- Si dices "no", plantea alternativas.
- Lee e infórmate primero.
- No se permite la publicación de enlaces a servicios de almacenamiento de archivos.
- No se permite ofrecer ni solicitar servicios servicios de pago sin autorización de los administradores.
-
Quién está conectado (Ver lista completa)
-
Últimos mensajes
-
Por Abraham Valencia · publicado
Te respondí en el otro lado. Saludos. -
-
Function InsertQRCode(celda As Range) As String Dim QRCodeURL As String On Error Resume Next ActiveSheet.Shapes("QR").Delete QRCodeURL = "https://quickchart.io/qr?text=" & celda.Value With ActiveSheet.Pictures.Insert(QRCodeURL) .Name = "QR" .Left = 500 .Top = 25 .Width = 300 .Height = 300 End With InsertQRCode = "" End Function Adáptalo a tus necesidades. -
Mil gracias @Abraham Valencia El código que genero es dependiendo de unos datos, así que es variable. Entonces observo que cada vez el qr tiene el nombre de una imagen diferente, así que como podría borrar el anterior, teniendo en cuenta que tengo otra imagen fija y un botón de macro en la misma hoja. Y por defecto sale muy chico el qr, se podria poner a una resolución fija de 3,00x3,00 y una posición fija?
-
Por Fernando Reyes Chavarria · publicado
Excelente. Gracias por el apoyo.
-
-
Últimas insignias
-
-
Estadísticas de descargas
-
Archivos186
-
Comentarios96
-
Revisiones28
-
-
Estadísticas de la comunidad
-
Temas totales44.7k
-
Mensajes totales260.3k
-
