Error 1004 en tiempo de ejecución

Os adjunto el código que me da este error y por más que he probado no doy con la solución

Private Sub UserForm_Initialize()

Dim final As Integer

Dim NroFila As Integer

NroFila = ActiveCell.Row
final = NroFila

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

La columna siempre es la "C" pero la fila no, por eso quiero hacerlo así

1 Respuesta

Respuesta
2

Tema resuelto cambiar range por cells a base de probar

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

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas