STXT

Résolu/Fermé

aminesc Messages postés 70 Date d'inscription dimanche 25 octobre 2015 Statut Membre Dernière intervention 3 juillet 2017 - 6 avril 2016 à 00:23
ThauTheme Messages postés 1442 Date d'inscription mardi 21 octobre 2014 Statut Membre Dernière intervention 29 juillet 2022 - 6 avril 2016 à 09:30

Bonjour,

mon probleme et le suivant :
j'ai veux affecter une valeur a un combobox qui s'appel "caisse", on utilisant les donne de la cellule F20 ,sa valeur est: "Alimentation de caisse EL OUED" ou "Alimentation de caisse SKIKDA" , voici se que j'ai essayer mais sa marche pas

For i = Range("B" & .Rows.Count).End(xlUp).Row To 10 Step -1
If Range("I" & i).Value = "R.CAISSE.CHQ" Then

userform3.caisse.FORMULA = "=Mid(range("F" & i).TEXT, 24, 40)"

A voir également:

Stxt en vba
Stxt en anglais - Guide
Incompatibilité de type vba ✓ - Forum Programmation
Vba attendre 1 seconde ✓ - Forum VB / VBA
Vba dernière colonne non vide ✓ - Forum VB / VBA
Vba récupérer valeur cellule ✓ - Forum VB / VBA

1 réponse

Réponse 1 / 1

ThauTheme Messages postés 1442 Date d'inscription mardi 21 octobre 2014 Statut Membre Dernière intervention 29 juillet 2022 160
6 avril 2016 à 09:30

Bonjour Aminesc, bonjour le forum,

Je n'ai pas très bien compris exactement où tu voulais en venir mais la propriété [Formula] ne s'emploie pas pour une ComboBox.
Essaie soit avec la propriété [Value] qui va renvoyer une seule valeur dans la Combobox. Dans ce cas pourquoi une boucle ?

For i = Range("B" & .Rows.Count).End(xlUp).Row To 10 Step -1
    If Range("I" & i).Value = "R.CAISSE.CHQ" Then
        userform3.caisse.Value = Mid(Range("F" & i).Text, 24, 40)
    End If
Next i

Soit la propriété [AddItem] qui va alimenter la Combobox avec une liste de valeurs.

For i = Range("B" & .Rows.Count).End(xlUp).Row To 10 Step -1
    If Range("I" & i).Value = "R.CAISSE.CHQ" Then
        userform3.caisse.AddItem Mid(Range("F" & i).Text, 24, 40)
    End If
Next i

Discussions similaires

"L'indice n'appartient à la sélection" + VBA

VBA : Range avec références variables..

VBA erreur 1004

ouverture d'un fichier excel à partir d'un code VBA

Méthode find dans VBA - Recherche de données sous Excel

Discussions similaires

Newsletters