Sujet Précédent Sujet Suivant

Interpretation d'un mot reserve sous excel

Fermé
bfiguig - 28 août 2009 à 09:45
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 - 28 août 2009 à 12:04
Bonjour,
voila, j'ai un fichier excel avec du code VB et j'ai des cellules qui se remplissent des l'ouverture du fichier excel;
mon probleme est le suivant, dans l'une des cellules je dois afficher le mot "FALSE" mais au lieu que "FALSE" s'affiche c'est "FAUX" qui s'affiche à sa place.
je precise que ces cellules sont rempli à partir du code vb.

merci de votre aide
A voir également:

3 réponses

Réponse 1 / 3
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 311
28 août 2009 à 10:00
Bonjour
dans Vba False est effectivement réservé à une valeur booléenne et sur un XL francophone,yu obtiens FAUX
si tu veux le MOT et non le booléen écris
range("A1")="FALSE"
0
bfiguig
28 août 2009 à 10:58
Bonjour,
j'ai fait ce que tu m'a envoyé et toujours la même chose c'est le mot "FAUX" qui s'affiche.
je t'envoi un bout de code que j'utilise :

If Not IsEmpty(Cells(22, 2)) Then
ActiveSheet.Protect Contents:=False
Range(Cells(22, 2), Cells(22, 2)).Font.Color = RGB(0, 0, 0) 'RGB(192, 192, 192) 'RGB(0, 0, 0)
ActiveSheet.Protect Contents:=True
Cells(22, 2) = "FALSE"
End If
If Cells(22, 2) <> "FALSE" Then
If IsEmpty(Cells(22, 2)) Then
ActiveSheet.Protect Contents:=False
Range(Cells(22, 2), Cells(22, 2)).Font.Color = RGB(0, 0, 0) 'RGB(192, 192, 192) 'RGB(0, 0, 0)
ActiveSheet.Protect Contents:=True
Cells(22, 2) = "FALSE"
End If
End If

merci de ton aide
0
Réponse 2 / 3
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 311
28 août 2009 à 11:23
effectivement (je n'avais pas testé) c'est the piège et la correction automatique est inopérante

pour contourner, j'ai triché en mettant un point après false mais...

hypothèse: si tu travailles sur XL Français et que l'appli sera installée sur un XL anglophone, on aura false

mais j'avoue que...
Tu me dis si tu trouves une astuce....
0
bfiguig
28 août 2009 à 11:36
en fait, pour l'instant j'utilise le même piège que le tiens sauf au lieu de faire un point, je fait un espace comme ça :

"FALSE "

A+
0
Réponse 3 / 3
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 311
28 août 2009 à 11:46
Oui, mais pour moi mettre un espace est dangereux car l'utilisateur ne le voit pas; donc si tu as des "dépendants", il y a des chances que l'utilisateur écrive: si(range("A1")=false....
mais s'il n'y a aucun risque d'évolution sur ce point dans ton appli, c'est OK
tiens!... au passage: "not OK" au lieu de "false" ou...
0
pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 753
28 août 2009 à 12:04
Salut,
Peut être : Cells(22, 2) = "'FALSE"
0