Bonjour le forum
dans mon userform un combobox va me chercher une liste de pourcentage
1%,2%,3% etc
mais quand je valide pour mettre dans une cellule le format devient
0.01(alors que je veux marquer 1%)
actuellement j'ai ceci ' ActiveCell.Offset(0, 6).Value = Me.Pourcentage
Comment puis je faire ?
Merci de votre aide
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
Philippe.R
Bonjour, essaie : ActiveCell.Offset(0, 6).Value = Format(Me.Pourcentage,"#0%") -- http://www.excelabo.net/mpfe/connexion.php http://dj.joss.free.fr/trombine.htm Avec plaisir Philippe.R "croky23" a écrit dans le message de news:
Bonjour le forum dans mon userform un combobox va me chercher une liste de pourcentage 1%,2%,3% etc mais quand je valide pour mettre dans une cellule le format devient 0.01(alors que je veux marquer 1%) actuellement j'ai ceci ' ActiveCell.Offset(0, 6).Value = Me.Pourcentage Comment puis je faire ? Merci de votre aide
Bonjour,
essaie :
ActiveCell.Offset(0, 6).Value = Format(Me.Pourcentage,"#0%")
--
http://www.excelabo.net/mpfe/connexion.php
http://dj.joss.free.fr/trombine.htm
Avec plaisir
Philippe.R
"croky23" <croky23@discussions.microsoft.com> a écrit dans le message de
news:5A9629D1-B06A-4561-A578-D40FC6584A20@microsoft.com...
Bonjour le forum
dans mon userform un combobox va me chercher une liste de pourcentage
1%,2%,3% etc
mais quand je valide pour mettre dans une cellule le format devient
0.01(alors que je veux marquer 1%)
actuellement j'ai ceci ' ActiveCell.Offset(0, 6).Value = Me.Pourcentage
Comment puis je faire ?
Merci de votre aide
Bonjour, essaie : ActiveCell.Offset(0, 6).Value = Format(Me.Pourcentage,"#0%") -- http://www.excelabo.net/mpfe/connexion.php http://dj.joss.free.fr/trombine.htm Avec plaisir Philippe.R "croky23" a écrit dans le message de news:
Bonjour le forum dans mon userform un combobox va me chercher une liste de pourcentage 1%,2%,3% etc mais quand je valide pour mettre dans une cellule le format devient 0.01(alors que je veux marquer 1%) actuellement j'ai ceci ' ActiveCell.Offset(0, 6).Value = Me.Pourcentage Comment puis je faire ? Merci de votre aide
croky23
merci cela marche pour l'ecriture dans la cellule mais pour le combobox c'est tjrs 0.01
Bonjour, essaie : ActiveCell.Offset(0, 6).Value = Format(Me.Pourcentage,"#0%") -- http://www.excelabo.net/mpfe/connexion.php http://dj.joss.free.fr/trombine.htm Avec plaisir Philippe.R "croky23" a écrit dans le message de news:
Bonjour le forum dans mon userform un combobox va me chercher une liste de pourcentage 1%,2%,3% etc mais quand je valide pour mettre dans une cellule le format devient 0.01(alors que je veux marquer 1%) actuellement j'ai ceci ' ActiveCell.Offset(0, 6).Value = Me.Pourcentage Comment puis je faire ? Merci de votre aide
merci
cela marche pour l'ecriture dans la cellule
mais pour le combobox c'est tjrs 0.01
Bonjour,
essaie :
ActiveCell.Offset(0, 6).Value = Format(Me.Pourcentage,"#0%")
--
http://www.excelabo.net/mpfe/connexion.php
http://dj.joss.free.fr/trombine.htm
Avec plaisir
Philippe.R
"croky23" <croky23@discussions.microsoft.com> a écrit dans le message de
news:5A9629D1-B06A-4561-A578-D40FC6584A20@microsoft.com...
Bonjour le forum
dans mon userform un combobox va me chercher une liste de pourcentage
1%,2%,3% etc
mais quand je valide pour mettre dans une cellule le format devient
0.01(alors que je veux marquer 1%)
actuellement j'ai ceci ' ActiveCell.Offset(0, 6).Value = Me.Pourcentage
Comment puis je faire ?
Merci de votre aide
merci cela marche pour l'ecriture dans la cellule mais pour le combobox c'est tjrs 0.01
Bonjour, essaie : ActiveCell.Offset(0, 6).Value = Format(Me.Pourcentage,"#0%") -- http://www.excelabo.net/mpfe/connexion.php http://dj.joss.free.fr/trombine.htm Avec plaisir Philippe.R "croky23" a écrit dans le message de news:
Bonjour le forum dans mon userform un combobox va me chercher une liste de pourcentage 1%,2%,3% etc mais quand je valide pour mettre dans une cellule le format devient 0.01(alors que je veux marquer 1%) actuellement j'ai ceci ' ActiveCell.Offset(0, 6).Value = Me.Pourcentage Comment puis je faire ? Merci de votre aide
croky23
j'ai trouve une solution
Private Sub Pourcentage_Change() Me.Pourcentage = Format(Me.Pourcentage, "#0%") End Sub
merci beaucoup bonne soirée
merci cela marche pour l'ecriture dans la cellule mais pour le combobox c'est tjrs 0.01
Bonjour, essaie : ActiveCell.Offset(0, 6).Value = Format(Me.Pourcentage,"#0%") -- http://www.excelabo.net/mpfe/connexion.php http://dj.joss.free.fr/trombine.htm Avec plaisir Philippe.R "croky23" a écrit dans le message de news:
Bonjour le forum dans mon userform un combobox va me chercher une liste de pourcentage 1%,2%,3% etc mais quand je valide pour mettre dans une cellule le format devient 0.01(alors que je veux marquer 1%) actuellement j'ai ceci ' ActiveCell.Offset(0, 6).Value = Me.Pourcentage Comment puis je faire ? Merci de votre aide
j'ai trouve une solution
Private Sub Pourcentage_Change()
Me.Pourcentage = Format(Me.Pourcentage, "#0%")
End Sub
merci beaucoup bonne soirée
merci
cela marche pour l'ecriture dans la cellule
mais pour le combobox c'est tjrs 0.01
Bonjour,
essaie :
ActiveCell.Offset(0, 6).Value = Format(Me.Pourcentage,"#0%")
--
http://www.excelabo.net/mpfe/connexion.php
http://dj.joss.free.fr/trombine.htm
Avec plaisir
Philippe.R
"croky23" <croky23@discussions.microsoft.com> a écrit dans le message de
news:5A9629D1-B06A-4561-A578-D40FC6584A20@microsoft.com...
Bonjour le forum
dans mon userform un combobox va me chercher une liste de pourcentage
1%,2%,3% etc
mais quand je valide pour mettre dans une cellule le format devient
0.01(alors que je veux marquer 1%)
actuellement j'ai ceci ' ActiveCell.Offset(0, 6).Value = Me.Pourcentage
Comment puis je faire ?
Merci de votre aide
Private Sub Pourcentage_Change() Me.Pourcentage = Format(Me.Pourcentage, "#0%") End Sub
merci beaucoup bonne soirée
merci cela marche pour l'ecriture dans la cellule mais pour le combobox c'est tjrs 0.01
Bonjour, essaie : ActiveCell.Offset(0, 6).Value = Format(Me.Pourcentage,"#0%") -- http://www.excelabo.net/mpfe/connexion.php http://dj.joss.free.fr/trombine.htm Avec plaisir Philippe.R "croky23" a écrit dans le message de news:
Bonjour le forum dans mon userform un combobox va me chercher une liste de pourcentage 1%,2%,3% etc mais quand je valide pour mettre dans une cellule le format devient 0.01(alors que je veux marquer 1%) actuellement j'ai ceci ' ActiveCell.Offset(0, 6).Value = Me.Pourcentage Comment puis je faire ? Merci de votre aide
MichDenis
Pour initialer le contenu de ton combobox dans ton formulaire :
'----------------------- Private Sub UserForm_Initialize()
With Worksheets("Feuil1") For Each c In .Range("A1:A5") With Me.ComboBox1 .AddItem Format(c, "0.0%") End With Next End With End Sub '-----------------------
"croky23" a écrit dans le message de news:
Bonjour le forum dans mon userform un combobox va me chercher une liste de pourcentage 1%,2%,3% etc mais quand je valide pour mettre dans une cellule le format devient 0.01(alors que je veux marquer 1%) actuellement j'ai ceci ' ActiveCell.Offset(0, 6).Value = Me.Pourcentage Comment puis je faire ? Merci de votre aide
Pour initialer le contenu de ton combobox dans ton formulaire :
'-----------------------
Private Sub UserForm_Initialize()
With Worksheets("Feuil1")
For Each c In .Range("A1:A5")
With Me.ComboBox1
.AddItem Format(c, "0.0%")
End With
Next
End With
End Sub
'-----------------------
"croky23" <croky23@discussions.microsoft.com> a écrit dans le message de news:
5A9629D1-B06A-4561-A578-D40FC6584A20@microsoft.com...
Bonjour le forum
dans mon userform un combobox va me chercher une liste de pourcentage
1%,2%,3% etc
mais quand je valide pour mettre dans une cellule le format devient
0.01(alors que je veux marquer 1%)
actuellement j'ai ceci ' ActiveCell.Offset(0, 6).Value = Me.Pourcentage
Comment puis je faire ?
Merci de votre aide
Pour initialer le contenu de ton combobox dans ton formulaire :
'----------------------- Private Sub UserForm_Initialize()
With Worksheets("Feuil1") For Each c In .Range("A1:A5") With Me.ComboBox1 .AddItem Format(c, "0.0%") End With Next End With End Sub '-----------------------
"croky23" a écrit dans le message de news:
Bonjour le forum dans mon userform un combobox va me chercher une liste de pourcentage 1%,2%,3% etc mais quand je valide pour mettre dans une cellule le format devient 0.01(alors que je veux marquer 1%) actuellement j'ai ceci ' ActiveCell.Offset(0, 6).Value = Me.Pourcentage Comment puis je faire ? Merci de votre aide