J'ai une formule qui fonctionne bien sur certain ordi mais pas sur
d'autre ???
Voici la formule
=3DA1&" "&D1&"( "&NOMPROPRE(TEXTE(F1,SI(langue()=3D1036,"jjj jj","ddd
dd")))&" "&G1&" "&NOMPROPRE(TEXTE(H1,SI(langue()=3D1036,"jjj jj-mmm-
aa","ddd dd-mmm-yy")))&" )"
Bonne r=E9ponce
Turcot Liste de Garde ( Ven 23 au Lun 26-Janv-09 )
Mauvait r=E9sulta
Turcot Liste de Garde ( Jjj Jj au Jjj Jj-Jan-Aa )
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
michdenis
Le problème s'il en est un, c'est que certains usagers n'ont pas défini la "même" langue dans leur panneau de configuration. Il y a plusieurs "Français" possible. Je te mets la liste plus bas ;
Dans ta formule 1036 représente le code page du pays que windows charge lorsqu'il s'ouvre selon les paramètres définis dans le panneau de configuration. 1036 fait référence aux français de France... si quelqu'un a eu la brillante idée d'utiliser le code page du Canada(Français), le code page est 3084.
En fait, tu as probablement un problème avec ta fonction "langue()" qui doit être défini en VBA... faudrait peut-être que tu l'affiche sur ce fil. Faudrait aussi que tu spécifies les langues des pays que tu voudrais que ta fonction tienne compte.
Language (Locale) LCID Decimal LCID
English (Jamaica) 8201 2009 1252 JAM French (Canada) 3084 0c0c 1252 CAN French (France) 1036 040c 1252 FRA French (Luxembourg) 5132 140c 1252 LUX English (New Zealand) 5129 1409 1252 NZL English (Ireland) 6153 1809 1252 IRL English (Caribbean) 9225 2409 1252 CAR French (Switzerland) 4108 100c 1252 CHE English (Canada) 4105 1009 1252 CAN French (Monaco) 6156 180c 1252 MCO French (Belgium) 2060 080c 1252 BEL English (United States) 1033 0409 1252 USA
"pellet15" a écrit dans le message de groupe de discussion :
Bonjour à tous
J'ai une formule qui fonctionne bien sur certain ordi mais pas sur d'autre ??? Voici la formule ¡&" "&D1&"( "&NOMPROPRE(TEXTE(F1,SI(langue()36,"jjj jj","ddd dd")))&" "&G1&" "&NOMPROPRE(TEXTE(H1,SI(langue()36,"jjj jj-mmm- aa","ddd dd-mmm-yy")))&" )"
Bonne réponce Turcot Liste de Garde ( Ven 23 au Lun 26-Janv-09 )
Mauvait résulta Turcot Liste de Garde ( Jjj Jj au Jjj Jj-Jan-Aa )
ou est l'érreur Merci
Le problème s'il en est un, c'est que certains usagers n'ont pas
défini la "même" langue dans leur panneau de configuration.
Il y a plusieurs "Français" possible. Je te mets la liste plus bas ;
Dans ta formule 1036 représente le code page du pays que
windows charge lorsqu'il s'ouvre selon les paramètres définis
dans le panneau de configuration. 1036 fait référence aux
français de France... si quelqu'un a eu la brillante idée d'utiliser
le code page du Canada(Français), le code page est 3084.
En fait, tu as probablement un problème avec ta fonction "langue()"
qui doit être défini en VBA... faudrait peut-être que tu l'affiche sur
ce fil. Faudrait aussi que tu spécifies les langues des pays que tu
voudrais que ta fonction tienne compte.
Language (Locale) LCID Decimal LCID
English (Jamaica) 8201 2009 1252 JAM
French (Canada) 3084 0c0c 1252 CAN
French (France) 1036 040c 1252 FRA
French (Luxembourg) 5132 140c 1252 LUX
English (New Zealand) 5129 1409 1252 NZL
English (Ireland) 6153 1809 1252 IRL
English (Caribbean) 9225 2409 1252 CAR
French (Switzerland) 4108 100c 1252 CHE
English (Canada) 4105 1009 1252 CAN
French (Monaco) 6156 180c 1252 MCO
French (Belgium) 2060 080c 1252 BEL
English (United States) 1033 0409 1252 USA
"pellet15" <pellet15@videotron.ca> a écrit dans le message de groupe de discussion :
4c64cc9b-fd66-4e4c-b3a4-92fbfc3a05ff@f20g2000yqg.googlegroups.com...
Bonjour à tous
J'ai une formule qui fonctionne bien sur certain ordi mais pas sur
d'autre ???
Voici la formule
¡&" "&D1&"( "&NOMPROPRE(TEXTE(F1,SI(langue()36,"jjj jj","ddd
dd")))&" "&G1&" "&NOMPROPRE(TEXTE(H1,SI(langue()36,"jjj jj-mmm-
aa","ddd dd-mmm-yy")))&" )"
Bonne réponce
Turcot Liste de Garde ( Ven 23 au Lun 26-Janv-09 )
Mauvait résulta
Turcot Liste de Garde ( Jjj Jj au Jjj Jj-Jan-Aa )
Le problème s'il en est un, c'est que certains usagers n'ont pas défini la "même" langue dans leur panneau de configuration. Il y a plusieurs "Français" possible. Je te mets la liste plus bas ;
Dans ta formule 1036 représente le code page du pays que windows charge lorsqu'il s'ouvre selon les paramètres définis dans le panneau de configuration. 1036 fait référence aux français de France... si quelqu'un a eu la brillante idée d'utiliser le code page du Canada(Français), le code page est 3084.
En fait, tu as probablement un problème avec ta fonction "langue()" qui doit être défini en VBA... faudrait peut-être que tu l'affiche sur ce fil. Faudrait aussi que tu spécifies les langues des pays que tu voudrais que ta fonction tienne compte.
Language (Locale) LCID Decimal LCID
English (Jamaica) 8201 2009 1252 JAM French (Canada) 3084 0c0c 1252 CAN French (France) 1036 040c 1252 FRA French (Luxembourg) 5132 140c 1252 LUX English (New Zealand) 5129 1409 1252 NZL English (Ireland) 6153 1809 1252 IRL English (Caribbean) 9225 2409 1252 CAR French (Switzerland) 4108 100c 1252 CHE English (Canada) 4105 1009 1252 CAN French (Monaco) 6156 180c 1252 MCO French (Belgium) 2060 080c 1252 BEL English (United States) 1033 0409 1252 USA
"pellet15" a écrit dans le message de groupe de discussion :
Bonjour à tous
J'ai une formule qui fonctionne bien sur certain ordi mais pas sur d'autre ??? Voici la formule ¡&" "&D1&"( "&NOMPROPRE(TEXTE(F1,SI(langue()36,"jjj jj","ddd dd")))&" "&G1&" "&NOMPROPRE(TEXTE(H1,SI(langue()36,"jjj jj-mmm- aa","ddd dd-mmm-yy")))&" )"
Bonne réponce Turcot Liste de Garde ( Ven 23 au Lun 26-Janv-09 )
Mauvait résulta Turcot Liste de Garde ( Jjj Jj au Jjj Jj-Jan-Aa )
ou est l'érreur Merci
ChristianM
Bonjour, langue() ne serait pas une fonction personnalisée ?
-- ChristianM
"pellet15" a écrit dans le message de news:
Bonjour à tous
J'ai une formule qui fonctionne bien sur certain ordi mais pas sur d'autre ??? Voici la formule ¡&" "&D1&"( "&NOMPROPRE(TEXTE(F1,SI(langue()36,"jjj jj","ddd dd")))&" "&G1&" "&NOMPROPRE(TEXTE(H1,SI(langue()36,"jjj jj-mmm- aa","ddd dd-mmm-yy")))&" )"
Bonne réponce Turcot Liste de Garde ( Ven 23 au Lun 26-Janv-09 )
Mauvait résulta Turcot Liste de Garde ( Jjj Jj au Jjj Jj-Jan-Aa )
ou est l'érreur Merci
Bonjour,
langue() ne serait pas une fonction personnalisée ?
--
ChristianM
"pellet15" <pellet15@videotron.ca> a écrit dans le message de news:
4c64cc9b-fd66-4e4c-b3a4-92fbfc3a05ff@f20g2000yqg.googlegroups.com...
Bonjour à tous
J'ai une formule qui fonctionne bien sur certain ordi mais pas sur
d'autre ???
Voici la formule
¡&" "&D1&"( "&NOMPROPRE(TEXTE(F1,SI(langue()36,"jjj jj","ddd
dd")))&" "&G1&" "&NOMPROPRE(TEXTE(H1,SI(langue()36,"jjj jj-mmm-
aa","ddd dd-mmm-yy")))&" )"
Bonne réponce
Turcot Liste de Garde ( Ven 23 au Lun 26-Janv-09 )
Mauvait résulta
Turcot Liste de Garde ( Jjj Jj au Jjj Jj-Jan-Aa )
Bonjour, langue() ne serait pas une fonction personnalisée ?
-- ChristianM
"pellet15" a écrit dans le message de news:
Bonjour à tous
J'ai une formule qui fonctionne bien sur certain ordi mais pas sur d'autre ??? Voici la formule ¡&" "&D1&"( "&NOMPROPRE(TEXTE(F1,SI(langue()36,"jjj jj","ddd dd")))&" "&G1&" "&NOMPROPRE(TEXTE(H1,SI(langue()36,"jjj jj-mmm- aa","ddd dd-mmm-yy")))&" )"
Bonne réponce Turcot Liste de Garde ( Ven 23 au Lun 26-Janv-09 )
Mauvait résulta Turcot Liste de Garde ( Jjj Jj au Jjj Jj-Jan-Aa )
ou est l'érreur Merci
michdenis
Si ça te tente, essaie ceci :
Tu copies tout ce qui suit dans un module standard :
Après ta déclaration, dans ta cellule, pour formater une date, tu modifies la formule pour obtenir le format des dates comme ceci : =TEXTE(A1;"[$-" & TLang() &"]jjj jj-mmm-aa")
Je n'ai pas testé avec différentes pages pays dans le panneau de configuration...
'Obligatoirement dans le haut du module :Déclaration API '---------------------------------- Declare Function SetLocaleInfo Lib "kernel32" Alias _ "SetLocaleInfoA" (ByVal Locale As Long, ByVal LCType As Long, _ ByVal lpLCData As String) As Boolean Declare Function GetUserDefaultLCID% Lib "kernel32" () Public Const LOCALE_ILANGUAGE = &H1 '----------------------------------
Sub LaLangue(Lang As String) Dim Symbol As String Dim iRet1 As Long Dim iRet2 As Long Dim lpLCDataVar As String Dim Pos As Integer Dim Locale As Long
Locale = GetUserDefaultLCID() iRet1 = GetLocaleInfo(Locale, LOCALE_ILANGUAGE, _ lpLCDataVar, 0) Symbol = String$(iRet1, 0) iRet2 = GetLocaleInfo(Locale, LOCALE_ILANGUAGE, Symbol, iRet1) Pos = InStr(Symbol, Chr$(0)) If Pos > 0 Then Symbol = Left$(Symbol, Pos - 1) Lang = Symbol End If End Sub '----------------------------------- Function TLang() Dim Langue As String LaLangue Langue TLang = Langue End Function '-----------------------------------
"michdenis" a écrit dans le message de groupe de discussion :
Le problème s'il en est un, c'est que certains usagers n'ont pas défini la "même" langue dans leur panneau de configuration. Il y a plusieurs "Français" possible. Je te mets la liste plus bas ;
Dans ta formule 1036 représente le code page du pays que windows charge lorsqu'il s'ouvre selon les paramètres définis dans le panneau de configuration. 1036 fait référence aux français de France... si quelqu'un a eu la brillante idée d'utiliser le code page du Canada(Français), le code page est 3084.
En fait, tu as probablement un problème avec ta fonction "langue()" qui doit être défini en VBA... faudrait peut-être que tu l'affiche sur ce fil. Faudrait aussi que tu spécifies les langues des pays que tu voudrais que ta fonction tienne compte.
Language (Locale) LCID Decimal LCID
English (Jamaica) 8201 2009 1252 JAM French (Canada) 3084 0c0c 1252 CAN French (France) 1036 040c 1252 FRA French (Luxembourg) 5132 140c 1252 LUX English (New Zealand) 5129 1409 1252 NZL English (Ireland) 6153 1809 1252 IRL English (Caribbean) 9225 2409 1252 CAR French (Switzerland) 4108 100c 1252 CHE English (Canada) 4105 1009 1252 CAN French (Monaco) 6156 180c 1252 MCO French (Belgium) 2060 080c 1252 BEL English (United States) 1033 0409 1252 USA
"pellet15" a écrit dans le message de groupe de discussion :
Bonjour à tous
J'ai une formule qui fonctionne bien sur certain ordi mais pas sur d'autre ??? Voici la formule ¡&" "&D1&"( "&NOMPROPRE(TEXTE(F1,SI(langue()36,"jjj jj","ddd dd")))&" "&G1&" "&NOMPROPRE(TEXTE(H1,SI(langue()36,"jjj jj-mmm- aa","ddd dd-mmm-yy")))&" )"
Bonne réponce Turcot Liste de Garde ( Ven 23 au Lun 26-Janv-09 )
Mauvait résulta Turcot Liste de Garde ( Jjj Jj au Jjj Jj-Jan-Aa )
ou est l'érreur Merci
Si ça te tente, essaie ceci :
Tu copies tout ce qui suit dans un module standard :
Après ta déclaration, dans ta cellule, pour formater une
date, tu modifies la formule pour obtenir le format des
dates comme ceci : =TEXTE(A1;"[$-" & TLang() &"]jjj jj-mmm-aa")
Je n'ai pas testé avec différentes pages pays dans le panneau de configuration...
'Obligatoirement dans le haut du module :Déclaration API
'----------------------------------
Declare Function SetLocaleInfo Lib "kernel32" Alias _
"SetLocaleInfoA" (ByVal Locale As Long, ByVal LCType As Long, _
ByVal lpLCData As String) As Boolean
Declare Function GetUserDefaultLCID% Lib "kernel32" ()
Public Const LOCALE_ILANGUAGE = &H1
'----------------------------------
Sub LaLangue(Lang As String)
Dim Symbol As String
Dim iRet1 As Long
Dim iRet2 As Long
Dim lpLCDataVar As String
Dim Pos As Integer
Dim Locale As Long
Locale = GetUserDefaultLCID()
iRet1 = GetLocaleInfo(Locale, LOCALE_ILANGUAGE, _
lpLCDataVar, 0)
Symbol = String$(iRet1, 0)
iRet2 = GetLocaleInfo(Locale, LOCALE_ILANGUAGE, Symbol, iRet1)
Pos = InStr(Symbol, Chr$(0))
If Pos > 0 Then
Symbol = Left$(Symbol, Pos - 1)
Lang = Symbol
End If
End Sub
'-----------------------------------
Function TLang()
Dim Langue As String
LaLangue Langue
TLang = Langue
End Function
'-----------------------------------
"michdenis" <michdenis@hotmail.com> a écrit dans le message de groupe de discussion :
Ou9pWOWfJHA.552@TK2MSFTNGP04.phx.gbl...
Le problème s'il en est un, c'est que certains usagers n'ont pas
défini la "même" langue dans leur panneau de configuration.
Il y a plusieurs "Français" possible. Je te mets la liste plus bas ;
Dans ta formule 1036 représente le code page du pays que
windows charge lorsqu'il s'ouvre selon les paramètres définis
dans le panneau de configuration. 1036 fait référence aux
français de France... si quelqu'un a eu la brillante idée d'utiliser
le code page du Canada(Français), le code page est 3084.
En fait, tu as probablement un problème avec ta fonction "langue()"
qui doit être défini en VBA... faudrait peut-être que tu l'affiche sur
ce fil. Faudrait aussi que tu spécifies les langues des pays que tu
voudrais que ta fonction tienne compte.
Language (Locale) LCID Decimal LCID
English (Jamaica) 8201 2009 1252 JAM
French (Canada) 3084 0c0c 1252 CAN
French (France) 1036 040c 1252 FRA
French (Luxembourg) 5132 140c 1252 LUX
English (New Zealand) 5129 1409 1252 NZL
English (Ireland) 6153 1809 1252 IRL
English (Caribbean) 9225 2409 1252 CAR
French (Switzerland) 4108 100c 1252 CHE
English (Canada) 4105 1009 1252 CAN
French (Monaco) 6156 180c 1252 MCO
French (Belgium) 2060 080c 1252 BEL
English (United States) 1033 0409 1252 USA
"pellet15" <pellet15@videotron.ca> a écrit dans le message de groupe de discussion :
4c64cc9b-fd66-4e4c-b3a4-92fbfc3a05ff@f20g2000yqg.googlegroups.com...
Bonjour à tous
J'ai une formule qui fonctionne bien sur certain ordi mais pas sur
d'autre ???
Voici la formule
¡&" "&D1&"( "&NOMPROPRE(TEXTE(F1,SI(langue()36,"jjj jj","ddd
dd")))&" "&G1&" "&NOMPROPRE(TEXTE(H1,SI(langue()36,"jjj jj-mmm-
aa","ddd dd-mmm-yy")))&" )"
Bonne réponce
Turcot Liste de Garde ( Ven 23 au Lun 26-Janv-09 )
Mauvait résulta
Turcot Liste de Garde ( Jjj Jj au Jjj Jj-Jan-Aa )
Tu copies tout ce qui suit dans un module standard :
Après ta déclaration, dans ta cellule, pour formater une date, tu modifies la formule pour obtenir le format des dates comme ceci : =TEXTE(A1;"[$-" & TLang() &"]jjj jj-mmm-aa")
Je n'ai pas testé avec différentes pages pays dans le panneau de configuration...
'Obligatoirement dans le haut du module :Déclaration API '---------------------------------- Declare Function SetLocaleInfo Lib "kernel32" Alias _ "SetLocaleInfoA" (ByVal Locale As Long, ByVal LCType As Long, _ ByVal lpLCData As String) As Boolean Declare Function GetUserDefaultLCID% Lib "kernel32" () Public Const LOCALE_ILANGUAGE = &H1 '----------------------------------
Sub LaLangue(Lang As String) Dim Symbol As String Dim iRet1 As Long Dim iRet2 As Long Dim lpLCDataVar As String Dim Pos As Integer Dim Locale As Long
Locale = GetUserDefaultLCID() iRet1 = GetLocaleInfo(Locale, LOCALE_ILANGUAGE, _ lpLCDataVar, 0) Symbol = String$(iRet1, 0) iRet2 = GetLocaleInfo(Locale, LOCALE_ILANGUAGE, Symbol, iRet1) Pos = InStr(Symbol, Chr$(0)) If Pos > 0 Then Symbol = Left$(Symbol, Pos - 1) Lang = Symbol End If End Sub '----------------------------------- Function TLang() Dim Langue As String LaLangue Langue TLang = Langue End Function '-----------------------------------
"michdenis" a écrit dans le message de groupe de discussion :
Le problème s'il en est un, c'est que certains usagers n'ont pas défini la "même" langue dans leur panneau de configuration. Il y a plusieurs "Français" possible. Je te mets la liste plus bas ;
Dans ta formule 1036 représente le code page du pays que windows charge lorsqu'il s'ouvre selon les paramètres définis dans le panneau de configuration. 1036 fait référence aux français de France... si quelqu'un a eu la brillante idée d'utiliser le code page du Canada(Français), le code page est 3084.
En fait, tu as probablement un problème avec ta fonction "langue()" qui doit être défini en VBA... faudrait peut-être que tu l'affiche sur ce fil. Faudrait aussi que tu spécifies les langues des pays que tu voudrais que ta fonction tienne compte.
Language (Locale) LCID Decimal LCID
English (Jamaica) 8201 2009 1252 JAM French (Canada) 3084 0c0c 1252 CAN French (France) 1036 040c 1252 FRA French (Luxembourg) 5132 140c 1252 LUX English (New Zealand) 5129 1409 1252 NZL English (Ireland) 6153 1809 1252 IRL English (Caribbean) 9225 2409 1252 CAR French (Switzerland) 4108 100c 1252 CHE English (Canada) 4105 1009 1252 CAN French (Monaco) 6156 180c 1252 MCO French (Belgium) 2060 080c 1252 BEL English (United States) 1033 0409 1252 USA
"pellet15" a écrit dans le message de groupe de discussion :
Bonjour à tous
J'ai une formule qui fonctionne bien sur certain ordi mais pas sur d'autre ??? Voici la formule ¡&" "&D1&"( "&NOMPROPRE(TEXTE(F1,SI(langue()36,"jjj jj","ddd dd")))&" "&G1&" "&NOMPROPRE(TEXTE(H1,SI(langue()36,"jjj jj-mmm- aa","ddd dd-mmm-yy")))&" )"
Bonne réponce Turcot Liste de Garde ( Ven 23 au Lun 26-Janv-09 )
Mauvait résulta Turcot Liste de Garde ( Jjj Jj au Jjj Jj-Jan-Aa )