XL 2019 Valeur d'une cellule dans un userform

tdenis

XLDnaute Nouveau
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 :)
VB:
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

XLDnaute Barbatruc
Bonjour le forum
Bonjour tdenis

Pour inspiration - Ce code t'affiche dans le TextBox1, la dernière valeur trouvée dans la colonne 1 :
VB:
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

XLDnaute Nouveau
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
 

Pièces jointes

  • RECAP DOSSIER.xlsm
    616.1 KB · Affichages: 8

Discussions similaires

  • Question
Microsoft 365 Code VBA
Réponses
2
Affichages
296
Réponses
18
Affichages
506
Réponses
21
Affichages
888