"Remplacer le point du clavier num=E9rique par une virgule=20
dans une cellule en excel"
bonjour,=20
je vais poster ce mm message dans la rubrique vb6 car mon=20
porbleme est le suivant.
j'utilise une spreadsheet (feuille excel) que je met dans=20
un useform, mon probleme et que je voudrais que quand mon=20
utilisateur met un point =E0 la place d'une virgule je=20
transforme ce point en virgule avec le keyasccii.
je sais le faire sur un textBox mais pas dans une cellule=20
excel.
pouvez vous m'aider svp=20
merci
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
Benead
Bonjour Msillienne,
Je ne sais pas si cela peux t'aider, mais le remplacement de texte dans une cellule d'Excel peut se faire de cette façon : Private Sub Worksheet_Change(ByVal Target As Excel.Range) If Target.Count = 1 Then Target = WorksheetFunction.Substitute(Target.Text, ".", ",") End If End Sub
A+ Benead XL97
msillienne a écrit:
"Remplacer le point du clavier numérique par une virgule dans une cellule en excel"
bonjour, je vais poster ce mm message dans la rubrique vb6 car mon porbleme est le suivant. j'utilise une spreadsheet (feuille excel) que je met dans un useform, mon probleme et que je voudrais que quand mon utilisateur met un point à la place d'une virgule je transforme ce point en virgule avec le keyasccii. je sais le faire sur un textBox mais pas dans une cellule excel. pouvez vous m'aider svp merci
Bonjour Msillienne,
Je ne sais pas si cela peux t'aider, mais le remplacement de texte dans une cellule d'Excel peut se faire de cette façon :
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Count = 1 Then
Target = WorksheetFunction.Substitute(Target.Text, ".", ",")
End If
End Sub
A+
Benead
XL97
msillienne a écrit:
"Remplacer le point du clavier numérique par une virgule
dans une cellule en excel"
bonjour,
je vais poster ce mm message dans la rubrique vb6 car mon
porbleme est le suivant.
j'utilise une spreadsheet (feuille excel) que je met dans
un useform, mon probleme et que je voudrais que quand mon
utilisateur met un point à la place d'une virgule je
transforme ce point en virgule avec le keyasccii.
je sais le faire sur un textBox mais pas dans une cellule
excel.
pouvez vous m'aider svp
merci
Je ne sais pas si cela peux t'aider, mais le remplacement de texte dans une cellule d'Excel peut se faire de cette façon : Private Sub Worksheet_Change(ByVal Target As Excel.Range) If Target.Count = 1 Then Target = WorksheetFunction.Substitute(Target.Text, ".", ",") End If End Sub
A+ Benead XL97
msillienne a écrit:
"Remplacer le point du clavier numérique par une virgule dans une cellule en excel"
bonjour, je vais poster ce mm message dans la rubrique vb6 car mon porbleme est le suivant. j'utilise une spreadsheet (feuille excel) que je met dans un useform, mon probleme et que je voudrais que quand mon utilisateur met un point à la place d'une virgule je transforme ce point en virgule avec le keyasccii. je sais le faire sur un textBox mais pas dans une cellule excel. pouvez vous m'aider svp merci