2 cellule dans la combobox avec une macro

[SSIAP2]

Bonsoir

j'utilise ce code trouver ici même

ComboBox48.Value = Sheets("Base").Range("b2").Value & " " & Sheets("Base").Range("c2").Value

le problème c'est que je veut l'utilisé dans une combobox et quand je lance la macro seul la ligne2 apparais pas les autres

quelqu'un saurait il comment faire merci

 

[suistrop]

Re : 2 cellule dans la combobox avec une macro

Salut,

Je n'ai pas tres bien saisie on probleme, tu peux tester ceci.

Feuil1.ComboBox1.AddItem Sheets("Feuil1").Range("b2").Value & " " & Sheets("Feuil1").Range("c2").Value

 

[SSIAP2]

Re : 2 cellule dans la combobox avec une macro

Bonjour suitrop et merci à toi de ton aide j'ai adapter ce que tu ma proposé comme ceci

Feuil4.ComboBox48.AddItem Sheets("Feuil4").Range("b2").Value & " " & Sheets("Feuil4").Range("c2").Value

cela ne fonctionne pas j'ai tenter comme ceci

ComboBox48.AddItem Sheets("Feuil4").Range("b2").Value & " " & Sheets("Feuil4").Range("c2").Value

mais la avec mon buttons sa m'ajoute la même item à chaque fois dans ma combobox

pour essayer d'être plus clair j'essaie d'alimenté ma combobox avec le Nom présent en colonne B et le prénom en colonne C mon soucis est que j'ai trouver cette macro
ComboBox48.Value = Sheets("Base").Range("b2").Value & " " & Sheets("Base").Range("c2").Value

mais elle ne me prend qu'une ligne à ajouter à mon item de ma combobox

pour etre simple je souhaite simplement alimenté ma combobox en associant la colonne B et C dans la même combobox pour faire en sorte que quand je sélectionne le Nom et Prénom apparaisse dans cette dernière

petite précision la pour les teste je les est intégré à un button mais au final il seras dans initialize de mon USF

merci de votre aide d'avance

 

[JNP]

Re : 2 cellule dans la combobox avec une macro

Bonjour le fil 🙂,
Peut-être comme ceci

Dim I As Integer
With Sheets("Feuil4")
For I = 2 To [COLOR=red][B]30[/B][/COLOR]
ComboBox48.AddItem .Range("b" & I).Value & " " & .Range("c" & I).Value
Next I
End With

Le 30 est à adapter suivant ton nombre de ligne, ou peut être remplacé par un

.Range("b2:b65536").End(xlUp).Row

Bonne journée 😎

 

[SSIAP2]

Re : 2 cellule dans la combobox avec une macro

Re bonjour JPN et merci pour ton intervention malheureusement sans résultat

le code se lance mais rien ne se passe je pense j'ai dût louper quelque chose mais mon jeune expérience me permet pas de le résoudre j'ai mis un essais de fichier

merci pour vos lumières

 

[tototiti2008]

Re : 2 cellule dans la combobox avec une macro

Bonjour à tous,

remplace

For H = 2 To Range("b2:b65536").End(xlUp).Row

par

For H = 2 To .Range("b65536").End(xlUp).Row

 

[cpeens]

Re : 2 cellule dans la combobox avec une macro

Bonjour tototiti2008 merci pour ta correction cela fonctionne correctement un grand merci à toi et à JPN ainsi que suis trop

merci et à bientot
à bientot

 

[SSIAP2]

Re : 2 cellule dans la combobox avec une macro

RE BONJOUR


j'ai soucis avec le code sa à bien fonctionner un moment et la tous es en désordre je comprend plus rien

aurais vous une idée de la raison

 

[SSIAP2]

Re : 2 cellule dans la combobox avec une macro

j'ai remarquer qu'i me met tous les prénom un à la suite de l'autre et pas le Nom prénom...

 

[suistrop]

Re : 2 cellule dans la combobox avec une macro

Bonjour,

Peux tu mettre a disposition le fichier que l'on voit ce que ca fait.

 

[SSIAP2]

Re : 2 cellule dans la combobox avec une macro

Re bonjour finalement c'est regler le fichier etant vraiment gros si d'aventure cela se reproduisais j'essairais de recreé les même condition merci à vous tous