XL 2019 Valeur d'une cellule dans un userform

[tdenis]

Bonjour à tous ,
j'ai un petit soucis sur un formulaire.
je voudrais afficher la valeur de la dernière cellule pleine d'un classeur dans un frame ou textbox
tout cela lorsque je clique sur l'ouverture de mon formulaire..
voici mon code sur mon userform
je vous remercie d'avance

Private Sub Affecter_Les_Temps_Click()
Application.ScreenUpdating = False
Sheets("Reference Dossiers").Activate
Range("A8").Select
Selection.End(xlDown).Select
Me.Valider_Les_Temps.Value = ActiveCell.Offset(0, 1)
End Sub

 

[Eric C]

Bonjour le forum
Bonjour tdenis

Pour inspiration - Ce code t'affiche dans le TextBox1, la dernière valeur trouvée dans la colonne 1 :

Private Sub UserForm_Activate()
Dim DerLig As Long
With Worksheets("Feuil1")
DerLig = .Range("a65536").End(xlUp).Row
Me.TextBox1 = .Range("a" & DerLig)
End With
End Sub

Bonne journée à toutes & à tous et faîtes attention lors de vos rencontres.
@+ Eric c

 

[tdenis]

Merci pour les code,
il ne veut pas du Me. erreur de compilation utilisation incorrecte du mot clé Me
;(

 

[Eric C]

Re.
Cela fonctionne chez moi ???
Voici un fichier - Le "Me" est facultatif.

 

[tdenis]

Voici mon fichier
c est le bouton Affecter les temps
quand il ouvre le formulaire je voudrais qu'il me donne la valeur de la derniere colonne pleine ( 20.001) en reference dossier
si tu m'orienter s'il te plait
Merci d'avance
Tdenis

 

[Eric C]

Re,
Cela n'est plus de ma partie. J'oriente mais ne dépanne pas. Désolé.
Bon courage

 

[tdenis]

Re,
Cela n'est plus de ma partie. J'oriente mais ne dépanne pas. Désolé.
Bon courage

merci
bon courage et belle journée
Denis