Afficher un . au lieu de la ,

  • Initiateur de la discussion Initiateur de la discussion trashouille
  • Date de début Date de début

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 !

T

trashouille

Guest
Bonjour,
j'aimerais savoir si quelqu'un sait comment afficher un . comme séparateur de décimal sans modifier les "options régionales" de windows?
J'ai essayé dans "Données"->"Convertir" mais j'ai pas tout compris et/ou ça marche pas.
J'ai aussi essayé "Edition"->"Remplacer" , en . : ca marche mais ca ne marche pas quand je l'exécute via VBA

Merci
 
finalement j'ai trouvé une API qui le fait :

Attribute VB_Name = "LocaleInfo"

Declare Function SetLocaleInfo Lib "kernel32" Alias "SetLocaleInfoA" _
(ByVal Locale As Long, ByVal LCType As Long, ByVal lpLCData As String) As Boolean

Declare Function GetLocaleInfo Lib "kernel32" Alias "GetLocaleInfoA" _
(ByVal Locale As Long, ByVal LCType As Long, _
ByVal lpLCData As String, ByVal cchData As Long) As Long

'renvoie le séparateur décimal du système
Function SysSepDec() As String
Dim Sep As String * 2
GetLocaleInfo 0, &H16, Sep, 2
SysSepDec = Left$(Sep, 1)
End Function

'change le séparateur décimal pour "Nouveau"
Sub ChangeSepDec(Nouveau As String)
'séparateur décimal
SetLocaleInfo 0, &HE, Nouveau
'séparateur décimal monétaire
SetLocaleInfo 0, &H16, Nouveau
'le séparateur du système a bien été changé mais Excel n'est pas mis à jour...
If MsgBox("Le changement de séparateur décimal du système nécessite" & vbLf & _
"qu'Excel soit fermé puis relancé pour être pris en compte." & _
vbLf & "Fermer maintenant ?", vbYesNo) = vbYes Then Application.Quit
End Sub

Sub test()
ChangeSepDec ","
End Sub

sinon pour récupérer les infos, il faut utiliser GetLocaleInfo
 
Salut,

Il ya aussi la Correction automatique (sous Outils) qui peut te remplacer les , (virgules) par des . (points).
Mais cela ne fonctionne qu'au moment de la frappe.
Ni le correcteur d'orthographe, ni un copier/coller ne modifie les , en .

Ou bien par Edition / Remplacer.

Ândré.
 
- 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
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
4
Affichages
159
Réponses
10
Affichages
543
Réponses
4
Affichages
481
Retour