Collection de combobox

Question

Les données =>
logiciel : Excel
10 comboboxs
2 feuilles de données (worksheets) : "Enquete" et "données"
1 classeur

Mon probleme =>
Je souhaiterais faire une boucle pour la collection de combobox et tous leur affecté la valeur "::Selection::" au démarrage de la feuille.

Ce que j'ai fait =>

'Au worksheet activate
Dim W As ActiveWorkbook.Worksheets ("Enquete")
For Each W In ComboBoxs
    W.Value = ActiveWorkbook.Worksheets("Données").Cells(4, 1)
Next W


Merci de vos conseils.

La connaissance est la pour t'apprendre, accepte la 
;)

cs_Kaizen · Answer

Private Sub Worksheet_Activate()
Dim W As Object
  For Each W In ActiveSheet.OLEObjects
  W.Object.Value = Worksheets("Données").Cells(4, 1)
  Next W
End Sub

cs_nawre · Answer

Bonjour 

je voudrais savoir comment qu'on peut faire pour pouvoir recuperer le contenu d'une colonne, le mettre dans une combobox et que le tout soit modifiable sans passer par le code.

merci d'avance :)

Collection de combobox

2 réponses

Discussions similaires