Llenar Userform con Datos de FILA ACTIVA, Excel

Tengo un boton encima de la Hoja que al hacer click manda llamar a un Userform en el que quiero copiar los datos de la fila activa,
con la condicion de que estemos situados en alguna fila del rango D16:D1048576.
El UserForm debería abrirse con los datos de la fila en que estemos situados.
He intentado de la sig forma:
= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = =
If Intersect(ActiveCell, Range("D16:D1048576")) Is Nothing Then
ActiveCell = Label1        'COPIA EL CONTENIDO EN LABEL 1
ActiveCell.Offset(0, -3).Select         'NOS MOVEMOS 3 COLUMNAS A LA IZQUIERDA
ActiveCell = Label2        'COPIA EL CONTENIDO DE LA NUEVA CELDA ACTIVA EN LABEL2
ActiveCell.Offset(0,1).Select          'NOS MOVEMOS 1 COLUMNA A LA DERECHA
ActiveCell = Label3        'COPIA EL CONTENIDO DE LA NUEVA CELDA ACTIVA EN LABEL3
..
..
.. '(y asi seguir copiando el contenido de las demas celdas de la Fila en los demas Labels
..
UserForm1.Show    <-----Al terminar manda llamar el userfom con los Labels que llenamos
Else
MsgBox "seleccione un numero de parte de la COLUMNA D y presione el boton de nuevo."
End If
End Sub
= = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = = 
El error esque no copia el contenido de la celda al label.
Ojala me ayuden, Gracias.

Añade tu respuesta

Haz clic para o
El autor de la pregunta ya no la sigue por lo que es posible que no reciba tu respuesta.