USF...besoin de votre aide pour l'écriture du code.

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 !

Christian0258

XLDnaute Accro
Bonsoir à tout le forum,

Je souhaiterais votre aide afin d'écrire le code de validation sur mon USF.
voir fichier...

Je vous remercie pour le temps que vous voudrez bien m'accorder.

Bien amicalement,
Christian
 

Pièces jointes

Dernière édition:
Re : USF...besoin de votre aide pour l'écriture du code.

Bonjour Christian,

à tester :

Code:
Private Sub CommandButton2_Click() 'Bouton Valider
Dim Ligne As Long
    If Application.CountIf(Sheets("Paramètres").Range("T1:T65536"), Me.ComboBox1.Text) > 0 Then
        Ligne = Application.Match(Me.ComboBox1.Text, Sheets("Paramètres").Range("T1:T65536"), 0)
        Sheets("Paramètres").Range("U" & Ligne).Value = CDbl(Me.TextBox1)
    Else
        MsgBox "Service non trouvé"
    End If
    Me.Hide
End Sub
 
- 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

Discussions similaires

Réponses
8
Affichages
240
Réponses
3
Affichages
135
Réponses
15
Affichages
1 K
Réponses
7
Affichages
143
Réponses
5
Affichages
106
Réponses
4
Affichages
231
Réponses
10
Affichages
150
Réponses
32
Affichages
981
Réponses
32
Affichages
1 K
Retour