Sur un poste client le séparateur décimal de Visual Basic Editor est une virgule au lieu d'un point

Version imprimable

Voir 40 message(s) de cette discussion en une page

31/08/2016, 14h43
francis60

Sur un poste client le séparateur décimal de Visual Basic Editor est une virgule au lieu d'un point
Bonjour à tous,

J'ai toujours pensé que tous les postes utilisaient le séparateur décimal point (.) pour les valeurs numériques dans l'affichage VBE quels que soient les paramètres locaux de l'affichage Excel ou du système, or sur ce poste c'est la virgule qui est utilisée et cela affecte les traitements VBA.

Sur un poste client le séparateur décimal de Visual Basic Editor à l'affichage est une virgule(,) au lieu d'un point(.)

Dans la fenêtre Immediate Window (CTRL+G)
Code:

1 2 ? 3 / 2 1,5
Alors que j'obtiens 1.5 habituellement.

De même la copie d'une plage de cellules contenant des chiffres décimaux dans un tableau VBA
Code:

1 2 3 4 5 Dim MonRange As Range Dim MaTable Set MonRange = Range("A1:D20") MaTable = MonRange
Ressort les valeurs sous forme de texte sur ce PC particulier à cause de la virgule alors que sur tous les autres postes les données sont bien copiées sous forme de chiffres dans le tableau MaTable.

Comment accède-t-on à cette variable locale qui pourrait s'appeler VBE.DecimalSeparator en lecture et en écriture ?

Remarque: le poste qui présente le problème est plus récent que celui qui a servi a créer le code et faire les tests.
Merci de relire la question de A à Z avant de répondre.
31/08/2016, 15h00
unparia

Bonjour
Ne pas confondre affichage d'un nombre avec nombre en mémoire.
Si une cellule (ou une plage de cellule) est formatée en numérique, c'est (ce sont) un/des numérique() en mémoire qui sont utilisés, et non leur v"représentation" en affichage.
J'en déduis que ton exposé est incomplet et que tes données ne sont pas de Excel à Excel, mais via un fichier texte ou csv. Ou que les cellules concernées ne sont pas formatées en numérique.
31/08/2016, 15h05
Invité
Bonjour,
ce sont les paramètre régionaux de Windows qui font ça.

ceci explique certain conflits entre Excel et VBA!
normalement ça ne devrait pas poser de problème dans Excel ainsi que pour les formules. le séparateur décimal Français est la virgule la belle "affaire"!

ça fonctionne normalement et ça redevient des point sur un Pc Anglais.

dans le cas d'un import CSV ça devient problématique, car les point reste des points au format texte et pour l'export CSV les virgules reste de virgules ce qui pour toute le langues est du texte.

si je saisi 1,1 dans Excel ça reste 1,1 mais en texte alors que 1.1 devient 1,1 au format numérique ,!§??

le mieux est de géré c'est projet VBA comme si il s'agissait toujours d'un fichier Français!
Code:

1 2 Range("A1").Value=1.1 double =val(replace(Range("A1").Value,",","."))
ainsi plus de problème de conversion implicite car pour le coups c'est une conversion explicite!
31/08/2016, 15h07
Theze
Bonjour,

ceci dans la fenêtre d'exécution :
Code:

1 2 ?3/2
me donne bien 1,5 (un virgule cinq) et non 1.5 (un point cinq) ! Mon séparateur décimal système est la virgule.
Pour voir quel est le séparateur décimal :
Code:

1 2 3 4 5 6 Sub Test() MsgBox "Le séparateur décimal est " & IIf(Asc(Format(0, ".")) = 44, "la virgule !", "le point !") End Sub
31/08/2016, 15h10
Jean-Philippe André

Salut,

un peu de lecture :
http://jpcheck.developpez.com/tutori...international/
31/08/2016, 15h17
Marc-L

Bonjour, bonjour !

Effectivement c'est une grossière confusion : ne pas confondre le séparateur décimal du VBA (le point)
avec le séparateur décimal d'Excel (souvent la virgule par défaut avec Windows en version française) ‼

La preuve :

http://perso.numericable.fr/mpl/pic/VBEpoint.gif

Voilà, voilà !

_________________________________________________________________________________________________________
Je suis Paris, Nice, Bruxelles, Charlie, …
31/08/2016, 17h35
francis60

Merci à tous,

J'avais déjà rencontré le problème exposé par unparia entre le séparateur décimal du VBA : [ le point ] et le séparateur décimal d'Excel utilisé dans l'affichage utilisateur : [ Application.International(xlDecimalSeparator) ]

Les cellules de ma feuille de calcul contiennent bien des valeurs décimales comme précisé à l'origine et comme Application.International(xlDecimalSeparator) = "," les chiffres s'affichent ainsi : 3,14

Je réalise qu'au moment où VBA lit la valeur d'un Range, c'est le séparateur décimal système ( dans mon cas ".") qui entre en compte (quelle que soit la valeur de Application.UseSystemSeparators ) et le code considère que ce contenu est une chaîne de caractères dès qu'il contient un ","

Si le séparateur décimal système = "," le problème ne survient pas.

Avant de lire vos réponses, j'avais mis en place le contournement proposé par rdurupt.

Je vais faire faire d'autres essais pour valider ma conclusion concernant le rôle du séparateur décimal système
31/08/2016, 17h40
francis60

Merci Theze pour cette astuce

Citation:

Envoyé par Theze

Code:

MsgBox "Le séparateur décimal est " & IIf(Asc(Format(0, ".")) = 44, "la virgule !", "le point !")

Existe-t-il d'autres manières de connaitre le séparateur décimal système ?

Peut-on le modifier depuis le code ?
31/08/2016, 18h17
Invité
Indépendamment de ta dernière demande!

http://www.developpez.net/forums/d15...u/#post8394195

Édite:

Personnellement je ne trouve pas qu'il y ait un intérêt à modifier le paramètre régionaux de Windows.

Le chemin de l'enfer est pavé de bonnes intentions.

La virgule est sans conséquence dans Excel. Juste en vba. Les incompatibilités de format, de syntaxe ou autre sont multiples.

Il faut donc soigner le code vba. Pour convertir d'Excel vers vba dz la langue natif vers l'international. Sachant qu'Excel acceptera le format international même si dernière il fera une conversation implicite vers le paramètre régionaux de Widwos!

Si dans une cellule tu bien un numérique avec un point comme séparateur décimal dans Windows français, c'est que ta cellule même à été formaté en anglais. Quand tu fais un copier coller le point devient une virgule. Dans ce cas tu fait un copier coller de ta cellule puis un copier coller par format.

Ou un truc du genre
Code:

1 2 range("B1").numberformat =range("A1").numberformat Range("B1").value=Range("A1").value
Note cependant que tu as un service médical d'urgence de pas trop mauvaise facture à ton chevets et en la matière je ne parle pas de moi bien que je n'ai pas habitude de faire preuve de fausses modestie :roll:
31/08/2016, 22h16
clementmarcotte

Bonjour,

Pour ma part, je te dirais de jeter un œil par là et de procéder aux ajustements qui s'imposent dans ton code.
01/09/2016, 09h22
Marc-L

Citation:

Envoyé par francis60

Existe-t-il d'autres manières de connaitre le séparateur décimal système ?

Oui comme précisé dans l'aide VBA interne et aussi dans le tutoriel pourtant indiqué dans le post #5
sans compter dans les discussions des forums comme par exemple les lignes 15 à 17 du code de ce post !
(y lire aussi les posts #5 & 6 …)

Et faut-il encore que les cellules ne soient pas au format texte …
01/09/2016, 11h16
francis60

Marc-L, j'ai bien lu le tuto de A à Z et j'ai bien noté le code

Code:

IIf(.UseSystemSeparators, .International(xlDecimalSeparator), .DecimalSeparator)

J'ai fait quelques tests, la seule façon d'atteindre le séparateur décimal système quelque soit la valeur de 'Application.UseSystemSeparators' c'est avec l'astuce de Clément.

Code:

Format(0, ".")

Si Application.UseSystemSeparators = False Alors Application.International(xlDecimalSeparator) = Application.DecimalSeparator

Si l'on force Application.UseSystemSeparators = True alors seulement on peut accéder au séparateur décimal système via Application.International(xlDecimalSeparator) puis ensuite il faut remettre le Application.UseSystemSeparators au statut d'origine choisi par l'utilisateur.

Citation:

Personnellement je ne trouve pas qu'il y ait un intérêt à modifier le paramètre régionaux de Windows.

Finalement, je vais suivre le conseil de rdurupt et continuer avec la conversion explicite pour fixer le Pb.
Je continue les tests en // car je n'ai pas encore une compréhension complète du bug.
01/09/2016, 18h07
Marc-L

Citation:

Envoyé par francis60

Si Application.UseSystemSeparators = False Alors Application.International(xlDecimalSeparator) = Application.DecimalSeparator

Assertion fausse : tu n'as pas bien lu ou pas bien compris alors !
L'astuce de Theze et Clément est évidemment valable pour connaître le séparateur décimal en cours côté Excel.
Mais ce n'est pas la seule : il suffit juste de bien comprendre ma ligne de code …

Par défaut à l'installation d'Excel, Application.DecimalSeparator est bien égale à Application.International(xlDecimalSeparator)
mais il ne faut surtout pas l'entendre comme une constante, ce serait une erreur bien trop grossière ‼

Sinon une seule propriété suffirait, pourquoi alors y-en-a-t-il deux ?!
Et pourquoi le VBA dispose-t-il aussi de la propriété UseSystemSeparators ?

Tout simplement par exemple dans le cas d'un "import" de données (plutôt un "Coller") avec un séparateur décimal
différent de celui du système, en désactivant cette propriété comme dans l'exemple de l'aide VBA
le séparateur décimal peut être modifié via Application.DecimalSeparator.
(Juste avant cette modification, les deux propriétés peuvent être égales, ton assertion est donc fausse !)
Une fois les données numériques bien importées il suffit de réactiver UseSystemSeparators et là
Application.DecimalSeparator reste différent de Application.International(xlDecimalSeparator),
le séparateur décimal en cours n'étant donc plus celui de cette propriété Application.DecimalSeparator !
D'où ma ligne de code ! Tout ceci étant dans l'aide VBA interne …

Inutile de modifier Windows ! Juste en suivant l'exemple de l'aide VBA de la propriété UseSystemSeparators …

Séparateur décimal et dates, même combat : il suffit de chauffer à peine une paire de neurones !

Citation:

Envoyé par Marc-L

c'est une grossière confusion [...]
Assertion fausse : tu n'as pas bien lu ou pas bien compris [...]
il suffit juste de bien comprendre, ce serait une erreur bien trop grossière ‼ [...]
il suffit de chauffer à peine une paire de neurones !

Application. Use System Separators séparateur décimal système Application. DecimalSeparator Application. International (xlDecimalSeparator)

FALSE , , ,

FALSE , . .

FALSE . , ,

FALSE . . .

TRUE , , ,

TRUE , . ,

TRUE . , .

TRUE . . .

02/09/2016, 15h06
Marc-L

Si pour toi séparateur décimal système correspond au séparateur décimal d'Excel,
j'aimerais bien que tu nous expliques comment tu arrives au résultat des lignes n°2 et 3 de ton tableau ‼

Car encore une fois :

UseSystemSeparators Séparateur décimal utilisé dans Excel

True Application.International(xlDecimalSeparator)

False Application.DecimalSeparator

Cf aide VBA …
02/09/2016, 15h32
francis60

Citation:

Envoyé par Marc-L

séparateur décimal système

Correspond au séparateur décimal du système*.
Le système dont je parle est le système d'exploitation de l’ordinateur, par exemple Windows 7.

* : Control Panel> Region and Language> Format tab> Additional Settings> Decimal symbol
02/09/2016, 20h58
Marc-L

~~Comme pourtant indiqué dans l'aide VBA~~, Application.International(xlDecimalSeparator) est ce séparateur décimal "système" ‼
Sans compter le tutoriel ni les exemples dans les forums ! Ton tableau n'a donc aucun sens …

Francis a raison !
03/09/2016, 07h44
Docmarti

Citation:

Envoyé par rdurupt

si je saisi 1,1 dans Excel ça reste 1,1 mais en texte alors que 1.1 devient 1,1 au format numérique ,!§??

Si tu saisis 1,1 à partir de VBA ou en tapant directement sur la feuille ?
03/09/2016, 07h52
Docmarti
Citation:
Envoyé par francis60

Sur un poste client le séparateur décimal de Visual Basic Editor à l'affichage est une virgule(,) au lieu d'un point(.)

Dans la fenêtre Immediate Window (CTRL+G)

Code:

1 2 ? 3 / 2 1,5

Alors que j'obtiens 1.5 habituellement.
Si tu obtiens 1.5, la langue dans tes paramètres régionaux n'est pas Français(France).

Tu ne serais pas Suisse par hasard?
03/09/2016, 07h57
unparia

Bonjour,
en "tapant" directement sur une cellule la feuille (et sur mon PC) :
- l'utilisation de la touche point du pavé numérique (code 190) transforme ce point en virgule
- l'utilisation de la touche point (shift + ;) (code 110) laisse sous forme de point
Ce distinguo entre les deux touches existe sur tous les PC, en matière de saisie dans une cellule Excel.
Je n'ai pas de clavier de portable sous la main.
03/09/2016, 10h16
Marc-L

Citation:

Envoyé par unparia

Je n'ai pas de clavier de portable sous la main.

Idem pour Excel version Windows sur un portable et peu importe l'ordinateur car c'est Excel interprétant le clavier …
05/09/2016, 09h51
francis60

Citation:

Envoyé par Docmarti

Si tu obtiens 1.5, la langue dans tes paramètres régionaux n'est pas Français

Effectivement, le séparateur décimal utilisé dans les réponses de l'éditeur VBE est celui choisi dans le menu

Control Panel> Region and Language> Format tab> Additional Settings> Decimal symbol = .

En l’occurrence, dans mon cas c'est l'anglais.
05/09/2016, 09h55
Invité

Bonjour,
dans tous les cas le symbole décimale est le point [.] dans vba!

il faut arrêté de ce prendre la tête sur le sujet!

Excel parementer régionaux ou suivant le type de formatage imprégné à la cellule. vba anglet!
05/09/2016, 10h03
francis60

Si Application.UseSystemSeparators == True alors Application.International(xlDecimalSeparator) est égal au séparateur décimal du système*
Si Application.UseSystemSeparators == False alors Application.International(xlDecimalSeparator) est égal à Application.DecimalSeparator**

*: Le séparateur décimal du système est défini ici : Control Panel> Region and Language> Format > Additional Settings> Decimal symbol
**: Application.DecimalSeparator est défini ici dans Excel : File > Options > Advanced > Decimal separator

Pour résumer Application.International(xlDecimalSeparator) est le séparateur qui apparaît dans les cellules contenant des valeurs numériques
05/09/2016, 10h16
Invité

oui j'ai bien compris mais pourquoi vouloir qu'Excel ne respecte ne respecte pas la culture de l'utilisateur?
05/09/2016, 11h29
Marc-L

Assertions toujours fausses ‼ Encore une fois je ne peux laisser passer de telles inepties !
Et c'est pourtant simple, un gamin en CM2 (~10 ans !) a compris rien qu'en lisant l'aide … 8-)
C'est incroyable, tout y est sans compter le tutoriel ni les exemples dans les discussions de ce forum ‼‼
Francis a raison !

Citation:

Envoyé par francis60

Si Application.UseSystemSeparators == True alors Application.International(xlDecimalSeparator) est égal au séparateur décimal du système

La propriété International(xlDecimalSeparator) renvoie toujours le séparateur décimal du système et est
totalement indépendante de la propriété UseSystemSeparators, peu importe donc la valeur de cette dernière ‼
Francis a raison !

Citation:

Envoyé par francis60

Si Application.UseSystemSeparators == False alors Application.International(xlDecimalSeparator) est égal à Application.DecimalSeparator

Aucun rapport, les propriétés étant indépendantes l'une de l'autre et la propriété DecimalSeparator étant modifiable ‼
Du reste à l'installation UseSystemSeparators est égale à True et les deux propriétés sont aussi égales !
Encore une fois, elles sont indépendantes de la propriété UseSystemSeparators …
Francis a raison !

Citation:

Envoyé par francis60

Pour résumer Application.International(xlDecimalSeparator) est le séparateur qui apparaît dans les cellules contenant des valeurs numériques

Uniquement si UseSystemSeparators est égale à True, sinon Excel prend la propriété DecimalSeparator !
Evidemment si ces deux propriétés sont égales … mais comme DecimalSeparator est modifiable !

Le tableau du post #15 est pourtant clair, à la portée de n'importe quel débutant ‼
Et rien qu'en regardant le paramétrage dans les options d'Excel, l'exemple dans l'aide VBA,
le tutoriel et les discussions dans ce forum ‼ Rien qu'en effectuant le test en VBA !
Francis a raison !
05/09/2016, 13h17
francis60

Citation:

Envoyé par Marc-L

La propriété International(xlDecimalSeparator) renvoie toujours le séparateur décimal du système et est totalement indépendante de la propriété UseSystemSeparators, peu importe donc la valeur de cette dernière ‼

Pas sur mon ordi (WIndows 7 et Excel 2010). Chez moi, ma modification de la case à cocher UseSystemSeparators affecte le résultat de Application.International(xlDecimalSeparator) en VBA.
05/09/2016, 13h34
Invité

1 pièce(s) jointe(s)
Citation:

Envoyé par francis60

Pas sur mon ordi (WIndows 7 et Excel 2010). Chez moi, ma modification de la case à cocher UseSystemSeparators affecte le résultat de Application.International(xlDecimalSeparator) en VBA.

pur quoi il en serait autrement? c'est déjà son mode de fonctionnement à vba!

le séparateur décimal international ou anglet même combat!

C'est comme si tu voulais connaitre la provenance de produits mad in Usa!

Office 2013 and later
Renvoie des informations relatives aux paramètres de pays/région et internationaux en cours. Type de données Variant en lecture seule.

https://msdn.microsoft.com/fr-fr/lib.../ff840213.aspx
Code:

1 2 3 4 5 6 Sub test() Dim a As Double a = 1.2 Debug.Print a Debug.Print a * 2.3 End Sub
05/09/2016, 14h05
Marc-L

Citation:

Envoyé par francis60

Pas sur mon ordi (WIndows 7 et Excel 2010). Chez moi, ma modification de la case à cocher UseSystemSeparators affecte le résultat de Application.International(xlDecimalSeparator) en VBA.

Impossible rien qu'en lisant l'aide de cette propriété International, toujours pas lue d'où ta confusion initiale persistante !
Bien lire aussi l'aide de la propriété UseSystemSeparators, et exécuter donc son exemple …
De mon côté différents ordinateurs avec différentes versions d'Excel dont la version 2010 se comportent exactement
comme le tableau du post #15 expliquant clairement le choix d'Excel quant au séparateur décimal …

Je n'ai plus de version anglaise à disposition mais vu le nombre de mes codes y ayant tourné (et y tournant encore !)
j'aurais eu à coup sûr des retours m'informant que mes procédures d'importation ne tenaient pas compte du séparateur décimal !
Et je n'ai jamais constaté de différence avec une version locale d'Excel …

Si vraiment tu es sûr de toi, nous demandons à voir une vidéo dans laquelle apparaîtra le code utilisé
ainsi que son incidence sur une feuille de calculs et des affichages avant / après dans la fenêtre Exécution.
On veut bien te croire mais comme nous ne croyons que ce que nous constatons …
Joindre aussi en .xls ou en .zip le classeur utilisé.

Francis a raison !
05/09/2016, 14h21
Jean-Philippe André

Hello,

le post est marqué comme résolu, est-ce le cas ou on a toujours un point qui bloque ?
05/09/2016, 14h27
Invité

j'ai l'impressions qu'il as trouvé une solution par dépit, mais qu'il subsiste des incompréhensions!*

d'où notre forme de harcèlement don j'ai bien conscience.
05/09/2016, 18h59
eriiic

Bonjour à tous,

sans vouloir mettre de l'huile sur le feu je suis plutôt d'accord avec francis60.

Citation:

Comme pourtant indiqué dans l'aide VBA, Application.International(xlDecimalSeparator) est ce séparateur décimal "système"

est pour moi faux.
Application.International(xlDecimalSeparator) reflète TOUJOURS le séparateur utilisé à ce moment par excel et non le séparateur système régional, même si l'aide semble dire autre chose.

C'est à dire Application.International(xlDecimalSeparator) = le séparateur système si Application.UseSystemSeparators = True,
ou bien = le séparateur défini dans les options d'excel (donc Application.DecimalSeparator) si Application.UseSystemSeparators = False

C'est ce séparateur qu'on retrouve bien dans les décimaux sur feuille.
Par contre la fenêtre Execution de VBE et la fenêtre Espions utiliseront toujours le séparateur système quelque soit la position de Application.UseSystemSeparators ce qui met de la confusion.
Je peux très bien lire 2,5 dans une variable Double ou Variant/Double ou la fenêtre d'éxécution alors que le séparateur en cours est le point, et vice-versa.
C'est ce que je constate sur 2010.
eric
05/09/2016, 19h53
Marc-L

Mea Culpa !

Je ne comprends pas car pourtant des tests avaient été menés (et je n'étais pas seul !)
et effectivement la propriété International(xlDecimalSeparator) prend la valeur de la propriété DecimalSeparator
quand la propriété UseSystemSeparators est à False !

Et l'affichage dans la fenêtre Exécution s'en tamponne le coquillard,
elle a l'air de toujours afficher le séparateur régional de Windows !

Heureusement côté Excel il n'y a pas ce foutoir dans les cellules, j'ai quand même bien flippé ! (ma punition …)

francis60, je t'adresse donc toutes mes plus plates excuses ‼

Je ne comprends donc plus la logique de Microsoft (et sa p....n d'aide locale ou en ligne ‼) …

J'ai indiqué un message « Francis a raison ! » sur les posts encore modifiables …

Je t'ai mis un point :plusser: sur tes discussions et tu as le droit de te soulager par des :moinsser: sur les miennes !
05/09/2016, 20h47
Invité

Et moi je tournerai 7 fois la roulette de ma souris avant de clicker!
05/09/2016, 20h56
Marc-L

Ce qui est fou dans cette histoire est que je suis sûr de mettre fait avoir à une époque par International
et que l'on s'était aperçu qu'avec UseSystemSeparators à False il fallait récupérer DecimalSeparator …

Cela va simplifier mes codes et j'espère un jour ne plus avoir de surprise de ce côté là !

C'est la deuxième fois que je me suis fourvoyé sur ce forum mais celle-ci est de loin komack !

Encore une fois Francis, toutes mes sincères excuses les plus profondes !
Je vais creuser un trou et m'y faire oublier un moment … :oops:
05/09/2016, 21h36
RyuAutodidacte

Citation:

Envoyé par Marc-L

Je t'ai mis un point :plusser: sur tes discussions et tu as le droit de te soulager par des :moinsser: sur les miennes !

Citation:

Envoyé par rdurupt

Et moi je tournerai 7 fois la roulette de ma souris avant de clicker!

Tout le monde peut se tromper, comme cela m'est déjà arrivé et c'est humain; l'essentiel c'est de le reconnaître c'est pour cela que je mets :plusser: et non :moinsser: ;)
06/09/2016, 16h48
francis60
Bonjour à tous,

J'accepte bien volontiers ton mea culpa Marc-L. à l'avenir tu seras plus tolérant.

Citation:

Envoyé par rdurupt

j'ai l'impression qu'il a trouvé une solution par dépit

J'ai adopté ta proposition #3 qui fait le boulot pour réaliser une "conversion explicite" et s'affranchir des réglages Windows des clients (français, américain, russes, japonais...)
Code:

1 2 Range("A1").Value=1.1 double =val(replace(Range("A1").Value,",","."))
L'astuce de Theze #4 permet de connaitre le séparateur régional de Windows sans passer par l'API.

Code:

Format(0, ".")

Citation:

Envoyé par rdurupt

Personnellement je ne trouve pas qu'il y ait un intérêt à modifier le paramètre régionaux de Windows.

Effectivement, moi aussi je considère que c'était une mauvaise piste.

Du coup ce post est un peu difficile à suivre pour celui qui rencontre le problème, quelqu'un pourrait compléter le tuto "Excel et les paramètres régionaux : Application.International" ?

Voici ma compréhension actuelle du sujet
Les séparateurs peuvent intervenir à 3 niveaux:
- Dans VBA toujours le .
- A l'affichage dans Excel (combinaison des choix utilisateur dans Excel et Windows...)
- Dans l'affichage de la fenêtre d’exécution VBE (CTRL+G) et quand on récupère un Range("A1").Value (paramètres régionaux de Windows)
Citation:

Envoyé par rdurupt

... mais qu'il subsiste des incompréhensions!

Oui, j'ai un poste client - auquel j'ai rarement accès - qui se comporte bizarrement dans la fenêtre "Locals Window" de VBE mais je créerai une discussion spécifique si besoin.
06/09/2016, 18h13
eriiic

Bonjour,

Citation:

Voici ma compréhension actuelle du sujet
Les séparateurs peuvent intervenir à 3 niveaux:
Dans VBA toujours le .

dans la saisie du code oui.
Mais à l'affichage dans VBE c'est toujours le séparateur système qui est utilisé, même si Application.UseSystemSeparators = False et qu'un autre y est défini. Donc la "," en france si l'utilisateur n'a rien changé.
Voir post 32
eric
06/09/2016, 18h43
Marc-L

Désolé Francis j'étais tellement certain car à une époque on avait constaté un comportement différent
ou alors on s'est bien fait embarqué ! C'était gravé dans du marbre dans ma mémoire pourtant …

Citation:

Envoyé par francis60

Voici ma compréhension actuelle du sujet
Les séparateurs peuvent intervenir à 3 niveaux:
• Dans VBA toujours le . : OK

• A l'affichage dans Excel (combinaison des choix utilisateur dans Excel et Windows...) : OK
Selon UseSystemSeparators : True = séparateur régional de Windows | False = Application.DecimalSeparator

• Dans l'affichage de la fenêtre d’exécution VBE (CTRL+G) et quand on récupère un Range("A1").Value
(paramètres régionaux de Windows) : OK

Oui, j'ai un poste client - auquel j'ai rarement accès - qui se comporte bizarrement dans la fenêtre "Locals Window" de VBE

La fenêtre Locals de la version anglo-US correspond à la fenêtre Variables locales de la version française.
De mon côté, c'est comme pour l'affichage de la fenêtre Exécution, aucune prise en compte du séparateur d'Excel
mais uniquement du séparateur décimal régional de Windows …
07/09/2016, 09h46
francis60
Il y a tout de même une limite à la conversion par :
Code:

1 2 3 Range("A1").Value=1.1 double =val(replace(Range("A1").Value,",","."))
Par exemple si

A1: " 5 : ancienne valeur pour info (supprimée le 14/8)"
B2: =N(A1)*5 // affiche 0 - la fonction N dans la cellule autorise une saisie alpha par exemple pour commenter

double = 5 au lieu de 0 attendu

Je n'ai pas la main sur le format de la source de données qui se trouve complètement permissif

Je conserve cette conversion qui jusqu'à présent reste la meilleure
Application.WorksheetFunction.N n'existe pas et présenterait j'imagine autant d'inconvénients tout comme Evaluate.

Voir 40 message(s) de cette discussion en une page

Fuseau horaire GMT +2. Il est actuellement 15h49.

Application. Use System Separators	séparateur décimal système	Application. DecimalSeparator	Application. International (xlDecimalSeparator)
FALSE	,	,	,
FALSE	,	.	.
FALSE	.	,	,
FALSE	.	.	.
TRUE	,	,	,
TRUE	,	.	,
TRUE	.	,	.
TRUE	.	.	.

UseSystemSeparators	Séparateur décimal utilisé dans Excel
True	Application.International(xlDecimalSeparator)
False	Application.DecimalSeparator