Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Boostez vos compétences Excel avec notre communauté !
Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force.
Apprenez, échangez, progressez – et tout ça gratuitement !
👉 Inscrivez-vous maintenant !
Bonjour maval,
Tu fais peu d'effort pour réussir toi même.
Dans la discution d'hier Philippe a donné une solution, moi je t'ai seulement donné une ligne de code pour t'aiguiller.
Retourne voir et remplace numero=Max.... par TextBox1=Max....
Bruno
Essaie comme ça (code à l'initialisation de l'UserForm) :
Code:
Private Sub UserForm_Initialize()
Dim max As Double
max = Application.WorksheetFunction.max(Columns(1))
Me.Label1.Caption = max
Me.TextBox1.Value = max
End Sub
[Édition]
Oooops, bonjour Youky on s'est croisé et je n'avais pas vu cette discussion...
- Navigue sans publicité - Accède à Cléa, notre assistante IA experte Excel... et pas que... - Profite de fonctionnalités exclusives Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel. Je deviens Supporter XLD