Sujet Précédent Sujet Suivant

Multicolonne excel

tourete -  
 boritu -
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
 
pas di'idée ?

je suis bloqué
0
Réponse 2 / 3
boritu
 
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
 
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