Visual Basic para Aplicaciones - poner fila seleccionada

Life is soft - evento anual de software empresarial
 
Vista:
sin imagen de perfil
Val: 177
Bronce
Ha mantenido su posición en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

poner fila seleccionada

Publicado por Albert (204 intervenciones) el 01/04/2021 20:16:30
Buenas tardes foreros, necesito poner los datos de la columna "A" en el textbox1 de un formulario lo que pasa es que es la lista de nombres de clientes con lo que la fila va cambiando según necesidad, por lo que intento que sea la fila seleccionada y así también poder poner los datos de las columnas "B" y "E" en otros dos textbox, os adjunto el codigo con el que lo estoy intentando pero me da error 91 "bloque With no establecido"

1
2
3
4
5
6
Private Sub UserForm_Initialize()
Dim x As Range
With x = Rows.Select
Me.TextBox1.Text = Sheets("cumple").Range("x:1")
End With
End Sub

como no me funciona no se si el código es correcto.
Gracias
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
sin imagen de perfil
Val: 177
Bronce
Ha mantenido su posición en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

poner fila seleccionada

Publicado por Albert (204 intervenciones) el 01/04/2021 22:08:59
en otra aplicación que hace tiempo he encontrado esto "target.row" que indica el numero de la fila de la celda seleccionado lo he puesto primero
1
2
X= target.row
Me.TextBox1.Text = Sheets("cumple").Range("x;1")
y no funciona ahora lo pongo asi y me da error 1004 "error definido por la aplicación

1
2
Me.TextBox1.Text = Empty
Me.TextBox1.Text = Sheets("cumple").Range("Target.Row;1")

Gracias por vuestro interes
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
sin imagen de perfil
Val: 177
Bronce
Ha mantenido su posición en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

poner fila seleccionada

Publicado por Albert (204 intervenciones) el 02/04/2021 14:50:56
tema resuelto ... este código ya funciona

Me.TextBox1.Text = Sheets("cumple").Cells(final, 3)

gracias por vuestro tiempo
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar