Sujet Précédent Sujet Suivant

Multicolonne excel

Fermé
tourete - 3 août 2010 à 10:24
 boritu - 3 août 2010 à 13:40
Bonjour,



Voila j'ai un problème sur vb excel ,

j ai un combobox reprennant des nom d'entreprise en colonne A feuille 1 et me le réecri en colonne A mais en feuille 2 sa sa marche

Ce que je voudrai c'est juste afficher a droite des nom d'entreprise dans ma combobox le code postal qui se trouve dans la colonne B feuille 1 à coté des nom d 'entreprise

Merci beaucoup de votre aide je débute
A voir également:

3 réponses

Réponse 1 / 3
tourete
3 août 2010 à 11:09
pas di'idée ?

je suis bloqué
0
Réponse 2 / 3
boritu
3 août 2010 à 13:40
etant donnée que le probleme citée au dessus est simplifié pouvez vous m'expliquer les ligne du programme cousinhub


merci
0
Réponse 3 / 3
cousinhub
3 août 2010 à 11:38
Bonjour,

essaie ces codes : 

Private Sub CommandButton1_Click()
Dim DerLig As Long
If Me.ComboBox1 = "" Then Exit Sub
With Sheets("Feuil2")
    DerLig = .[A65000].End(xlUp).Row + 1
    .Cells(DerLig, 1).Value = Me.ComboBox1.List(Me.ComboBox1.ListIndex, 0)
    .Cells(DerLig, 2).Value = Me.ComboBox1.List(Me.ComboBox1.ListIndex, 1)
End With
End Sub


Private Sub UserForm_Initialize()
  Me.ComboBox1.ColumnCount = 2
  Me.ComboBox1.ColumnWidths = Me.ComboBox1.ColumnWidths & ";" & 0
  Me.ComboBox1.RowSource = "Feuil1!A1:B" & Feuil1.[A65000].End(xlUp).Row
End Sub


Bonne journée
-1