Hola estimados amigos, de nuevo por aqui para pedirles su colaboracion, si me hacen el favor

Tengo un problema con una tpv que estoy desarrollando, , el problema esta en que cuando pulso el comamburton, necesito que la informacion pase a los textboxes, pero no lo consigo, y otra es que cuandolo paso al ticket, no puedo escribir el texto completo en la misma celda, espero  y agradezco su ayuda

Un saludo

TPV

Buenas,  para pasar los datos a las cajas de texto

Private Sub Botón_Click()

ID = Mid(Botón.Name, 2, Len(Botón.Name))

With TpvListado

.xId = Hoja1.Range(ID)
.xDescripción = Hoja1.Range(ID).Offset(0, 1)
.xReferencia = Hoja1.Range(ID).Offset(0, 2)
.xPrecio = Hoja1.Range(ID).Offset(0, 6)
.xCantidad = 1

End With
End Sub

lo otro , no lo entiendo

 

saludos

 

Hola amigo, gracias por tu ayuda, me ha quedado de cine, es eso lo que necesitaba,  todo lo demas me va bien, pero intentare colocar una imagen del producto, no se si sera posible, gracias de nuevo por tu ayuda

Saludos

En 19/5/2024 at 17:47 , Alfonso5597 dijo:

intentare colocar una imagen del producto, no se si sera posible,

Abre un nuevo tema y lo miramos

Hola amigo, te agradezco la ayuda, intentare solucionarlo, sino lo consigo abrire un nuevo tema, gracias de nuevo

Perfecto