Problème affichage dans combobox

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

wachoo31

XLDnaute Occasionnel
Bonsoir a toute et tous

J'ai une combobox dans un USF mais je n'arrive pas a fixer l'affichage

Les valeurs sont prise dans une feuille sous le format JJ / MM / AAAA
Mais pas dans la combobox
Si joint le code que j'essaye

Private Sub Ini()
Dim L As Integer
Dim Plage As String
L = Sheets("Info").Range("A65536").End(xlUp).Row
Plage = Sheets("Info").Range("A3:A" & L).Address
ComboBox1.RowSource = "Info!" & Plage
ComboBox1.Value = Format(ComboBox1.Value, "dd / mm / yyyy")
End Sub


comment faire
 
Re : Problème affichage dans combobox

Bonsoir,

Ce n'était qu'un exemple!
La procédure "ComboBox1_Change" existe déjà dans ton projet (nom ambigu), rajoute simplement "ComboBox1.Value = Format(ComboBox1.Value, "dd / mm / yyyy")" dans la procedure "ComboBox1_Change"
 
Re : Problème affichage dans combobox

Bonjour,

Une solution éventuelle pour charger le Combo avec le texte qui apparaît dans la cellule, texte qui peut différer de la valeur selon la mise en forme.

Code:
Private Sub UserForm_Initialize()
Dim L As Integer, Plage As Range, cel As Range

L = Sheets("Info").Range("A65536").End(xlUp).Row
Set Plage = Sheets("Info").Range("A3:A" & L)

For Each cel In Plage
    ComboBox1.AddItem cel.Text
Next

End Sub
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
3
Affichages
195
Réponses
5
Affichages
244
Réponses
5
Affichages
183
  • Question Question
Microsoft 365 Problème macro
Réponses
4
Affichages
246
  • Question Question
Microsoft 365 Code VBA
Réponses
10
Affichages
861
Réponses
8
Affichages
493
Réponses
3
Affichages
665
Retour