Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel combobox et format

combobox et format

10 réponses
Avatar
PHIL
bonjour, je récupere dans ma combobox les valeurs que j'ai dans Feuille1.
c'est a dire 00001.
00002.
00003.
le problème est que, quand je selectionne dans ma combobox 00001, il affiche
1.

je souhaite qu'il m'affiche les 4 zeros devant.

comment
faire .

merci
Signaler un problème avec ce contenu

10 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
FxM
bonjour, je récupere dans ma combobox les valeurs que j'ai dans Feuille1.
c'est a dire 00001.
00002.
00003.
le problème est que, quand je selectionne dans ma combobox 00001, il affiche
1.

je souhaite qu'il m'affiche les 4 zeros devant.

comment
faire .

merci



Bonsoir,

en VBA
... = format(comboboxblabla,"00000")

sur la feuille:
format | cellule | personnalisé | 00000

@+
FxM

Avatar
PHIL
oui mais ou l'ecrire, afin que mon combobox prennent ce format la

.... = format(comboboxblabla,"00000")?



ou je doit l'ecrire?

merci



bonjour, je récupere dans ma combobox les valeurs que j'ai dans Feuille1.
c'est a dire 00001.
00002.
00003.
le problème est que, quand je selectionne dans ma combobox 00001, il affiche
1.

je souhaite qu'il m'affiche les 4 zeros devant.

comment
faire .

merci



Bonsoir,

en VBA
.... = format(comboboxblabla,"00000")

sur la feuille:
format | cellule | personnalisé | 00000

@+
FxM




Avatar
FxM
Quelle instruction(s) utilises-tu pour remplir ton combobox ?

@+
FxM


oui mais ou l'ecrire, afin que mon combobox prennent ce format la

..... = format(comboboxblabla,"00000")?



ou je doit l'ecrire?

merci





bonjour, je récupere dans ma combobox les valeurs que j'ai dans Feuille1.
c'est a dire 00001.
00002.
00003.
le problème est que, quand je selectionne dans ma combobox 00001, il affiche
1.

je souhaite qu'il m'affiche les 4 zeros devant.

comment
faire .

merci



Bonsoir,

en VBA
.... = format(comboboxblabla,"00000")

sur la feuille:
format | cellule | personnalisé | 00000

@+
FxM






Avatar
PHIL
j'utilise ce code:

Me.ComboBox2.RowSource = "Feuil1!A200:B343"


Quelle instruction(s) utilises-tu pour remplir ton combobox ?

@+
FxM


oui mais ou l'ecrire, afin que mon combobox prennent ce format la

..... = format(comboboxblabla,"00000")?



ou je doit l'ecrire?

merci





bonjour, je récupere dans ma combobox les valeurs que j'ai dans Feuille1.
c'est a dire 00001.
00002.
00003.
le problème est que, quand je selectionne dans ma combobox 00001, il affiche
1.

je souhaite qu'il m'affiche les 4 zeros devant.

comment
faire .

merci



Bonsoir,

en VBA
.... = format(comboboxblabla,"00000")

sur la feuille:
format | cellule | personnalisé | 00000

@+
FxM









Avatar
LSteph
Bonsoir Phil,

cet exemple peut être:

Private Sub UserForm_Initialize()
Dim c
Me.ComboBox2.Clear
For Each c In Worksheets("Feuil1").Range("a200:b343").Cells
Me.ComboBox2.AddItem Format(c, "00000")
Next

End Sub

'lSteph


"PHIL" a écrit dans le message de news:

j'utilise ce code:

Me.ComboBox2.RowSource = "Feuil1!A200:B343"


Quelle instruction(s) utilises-tu pour remplir ton combobox ?

@+
FxM


oui mais ou l'ecrire, afin que mon combobox prennent ce format la

..... = format(comboboxblabla,"00000")?



ou je doit l'ecrire?

merci





bonjour, je récupere dans ma combobox les valeurs que j'ai dans
Feuille1.
c'est a dire 00001.
00002.
00003.
le problème est que, quand je selectionne dans ma combobox 00001, il
affiche
1.

je souhaite qu'il m'affiche les 4 zeros devant.

comment
faire .

merci



Bonsoir,

en VBA
.... = format(comboboxblabla,"00000")

sur la feuille:
format | cellule | personnalisé | 00000

@+
FxM











Avatar
PHIL
sur mon combobox j'ai bien 00001, 00002,00003...
mais ce ci ne resout pas mon probleme, car quand je selectionne 00001 dans
mon combobox, il se met à 1 automatiquement,il me met pas les 0 devant,il me
les met seulement dans la liste.
je voudrai quand il est selectionne avoir aussi "00001" et PAS "1"

merci

"LSteph" wrote:

Bonsoir Phil,

cet exemple peut être:

Private Sub UserForm_Initialize()
Dim c
Me.ComboBox2.Clear
For Each c In Worksheets("Feuil1").Range("a200:b343").Cells
Me.ComboBox2.AddItem Format(c, "00000")
Next

End Sub

'lSteph


"PHIL" a écrit dans le message de news:

j'utilise ce code:

Me.ComboBox2.RowSource = "Feuil1!A200:B343"


Quelle instruction(s) utilises-tu pour remplir ton combobox ?

@+
FxM


oui mais ou l'ecrire, afin que mon combobox prennent ce format la

..... = format(comboboxblabla,"00000")?



ou je doit l'ecrire?

merci





bonjour, je récupere dans ma combobox les valeurs que j'ai dans
Feuille1.
c'est a dire 00001.
00002.
00003.
le problème est que, quand je selectionne dans ma combobox 00001, il
affiche
1.

je souhaite qu'il m'affiche les 4 zeros devant.

comment
faire .

merci



Bonsoir,

en VBA
.... = format(comboboxblabla,"00000")

sur la feuille:
format | cellule | personnalisé | 00000

@+
FxM
















Avatar
LSteph
Re, bonsoir,
Je crois que c'est parceque tu utilises Rowsource et non la macro que je
t'ai donnée.

Essaie ou dis moi

lSteph
"PHIL" a écrit dans le message de news:

sur mon combobox j'ai bien 00001, 00002,00003...
mais ce ci ne resout pas mon probleme, car quand je selectionne 00001 dans
mon combobox, il se met à 1 automatiquement,il me met pas les 0 devant,il
me
les met seulement dans la liste.
je voudrai quand il est selectionne avoir aussi "00001" et PAS "1"

merci

"LSteph" wrote:

Bonsoir Phil,

cet exemple peut être:

Private Sub UserForm_Initialize()
Dim c
Me.ComboBox2.Clear
For Each c In Worksheets("Feuil1").Range("a200:b343").Cells
Me.ComboBox2.AddItem Format(c, "00000")
Next

End Sub

'lSteph


"PHIL" a écrit dans le message de news:

j'utilise ce code:

Me.ComboBox2.RowSource = "Feuil1!A200:B343"


Quelle instruction(s) utilises-tu pour remplir ton combobox ?

@+
FxM


oui mais ou l'ecrire, afin que mon combobox prennent ce format la

..... = format(comboboxblabla,"00000")?



ou je doit l'ecrire?

merci





bonjour, je récupere dans ma combobox les valeurs que j'ai dans
Feuille1.
c'est a dire 00001.
00002.
00003.
le problème est que, quand je selectionne dans ma combobox 00001,
il
affiche
1.

je souhaite qu'il m'affiche les 4 zeros devant.

comment
faire .

merci



Bonsoir,

en VBA
.... = format(comboboxblabla,"00000")

sur la feuille:
format | cellule | personnalisé | 00000

@+
FxM


















Avatar
FxM
Un exemple sans problème :
http://cjoint.com/?bfaIEF2Hih

N'aurais-tu point quelque code dans combobox_change ?

@+
FxM


sur mon combobox j'ai bien 00001, 00002,00003...
mais ce ci ne resout pas mon probleme, car quand je selectionne 00001 dans
mon combobox, il se met à 1 automatiquement,il me met pas les 0 devant,il me
les met seulement dans la liste.
je voudrai quand il est selectionne avoir aussi "00001" et PAS "1"

merci

"LSteph" wrote:


Bonsoir Phil,

cet exemple peut être:

Private Sub UserForm_Initialize()
Dim c
Me.ComboBox2.Clear
For Each c In Worksheets("Feuil1").Range("a200:b343").Cells
Me.ComboBox2.AddItem Format(c, "00000")
Next

End Sub

'lSteph


"PHIL" a écrit dans le message de news:


j'utilise ce code:

Me.ComboBox2.RowSource = "Feuil1!A200:B343"



Quelle instruction(s) utilises-tu pour remplir ton combobox ?

@+
FxM



oui mais ou l'ecrire, afin que mon combobox prennent ce format la

..... = format(comboboxblabla,"00000")?



ou je doit l'ecrire?

merci







bonjour, je récupere dans ma combobox les valeurs que j'ai dans
Feuille1.
c'est a dire 00001.
00002.
00003.
le problème est que, quand je selectionne dans ma combobox 00001, il
affiche
1.

je souhaite qu'il m'affiche les 4 zeros devant.

comment
faire .

merci



Bonsoir,

en VBA
.... = format(comboboxblabla,"00000")

sur la feuille:
format | cellule | personnalisé | 00000

@+
FxM

















Avatar
LSteph
Bonsoir FxM,
testé, avec Rowsource j'obtiens la même chose que lui car le cela met au
format 00001 dans la liste
et retranscrit la valeur dans la sélection du combo.
Tandis qu'en bouclant sur les valeurs et en appliquant format(c,"00000"), le
pb ne se pose plus c(est "00001")
Mais je crois que ma proposition n'a pas été testée.
Bonne nuit à tous les deux.

lSteph

"FxM" a écrit dans le message de news:

Un exemple sans problème :
http://cjoint.com/?bfaIEF2Hih

N'aurais-tu point quelque code dans combobox_change ?

@+
FxM


sur mon combobox j'ai bien 00001, 00002,00003...
mais ce ci ne resout pas mon probleme, car quand je selectionne 00001
dans mon combobox, il se met à 1 automatiquement,il me met pas les 0
devant,il me les met seulement dans la liste.
je voudrai quand il est selectionne avoir aussi "00001" et PAS "1"

merci

"LSteph" wrote:


Bonsoir Phil,

cet exemple peut être:

Private Sub UserForm_Initialize()
Dim c
Me.ComboBox2.Clear
For Each c In Worksheets("Feuil1").Range("a200:b343").Cells
Me.ComboBox2.AddItem Format(c, "00000")
Next

End Sub

'lSteph


"PHIL" a écrit dans le message de news:


j'utilise ce code:

Me.ComboBox2.RowSource = "Feuil1!A200:B343"



Quelle instruction(s) utilises-tu pour remplir ton combobox ?

@+
FxM



oui mais ou l'ecrire, afin que mon combobox prennent ce format la

..... = format(comboboxblabla,"00000")?



ou je doit l'ecrire?

merci







bonjour, je récupere dans ma combobox les valeurs que j'ai dans
Feuille1.
c'est a dire 00001.
00002.
00003.
le problème est que, quand je selectionne dans ma combobox 00001, il
affiche
1.

je souhaite qu'il m'affiche les 4 zeros devant.

comment
faire .

merci



Bonsoir,

en VBA
.... = format(comboboxblabla,"00000")

sur la feuille:
format | cellule | personnalisé | 00000

@+
FxM




















Avatar
FxM
Bonsoir,

Pas de nouveau message de (variable) dans la 1/2 heure qui suit.
On en déduit avec logique que tu as tapé dans le mille.

Déjà que je n'ai pas vraiment envie de chercher des solutions, le fait
que l'énoncé ne correspond pas à la réalité ne va surement pas aider à
trouver l'envie d'aller plus loin.
... si je me fais bien comprendre, Phil et consors.

@+
FxM




Bonsoir FxM,
testé, avec Rowsource j'obtiens la même chose que lui car le cela met au
format 00001 dans la liste
et retranscrit la valeur dans la sélection du combo.
Tandis qu'en bouclant sur les valeurs et en appliquant format(c,"00000"), le
pb ne se pose plus c(est "00001")
Mais je crois que ma proposition n'a pas été testée.
Bonne nuit à tous les deux.

lSteph

"FxM" a écrit dans le message de news:


Un exemple sans problème :
http://cjoint.com/?bfaIEF2Hih

N'aurais-tu point quelque code dans combobox_change ?

@+
FxM



sur mon combobox j'ai bien 00001, 00002,00003...
mais ce ci ne resout pas mon probleme, car quand je selectionne 00001
dans mon combobox, il se met à 1 automatiquement,il me met pas les 0
devant,il me les met seulement dans la liste.
je voudrai quand il est selectionne avoir aussi "00001" et PAS "1"

merci

"LSteph" wrote:



Bonsoir Phil,

cet exemple peut être:

Private Sub UserForm_Initialize()
Dim c
Me.ComboBox2.Clear
For Each c In Worksheets("Feuil1").Range("a200:b343").Cells
Me.ComboBox2.AddItem Format(c, "00000")
Next

End Sub

'lSteph


"PHIL" a écrit dans le message de news:



j'utilise ce code:

Me.ComboBox2.RowSource = "Feuil1!A200:B343"




Quelle instruction(s) utilises-tu pour remplir ton combobox ?

@+
FxM




oui mais ou l'ecrire, afin que mon combobox prennent ce format la

..... = format(comboboxblabla,"00000")?



ou je doit l'ecrire?

merci









bonjour, je récupere dans ma combobox les valeurs que j'ai dans
Feuille1.
c'est a dire 00001.
00002.
00003.
le problème est que, quand je selectionne dans ma combobox 00001, il
affiche
1.

je souhaite qu'il m'affiche les 4 zeros devant.

comment
faire .

merci



Bonsoir,

en VBA
.... = format(comboboxblabla,"00000")

sur la feuille:
format | cellule | personnalisé | 00000

@+
FxM