IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Range().FormulaLocal


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Futur Membre du Club
    Inscrit en
    Octobre 2005
    Messages
    4
    Détails du profil
    Informations forums :
    Inscription : Octobre 2005
    Messages : 4
    Par défaut Range().FormulaLocal
    Bonjour,

    J'utilise du VB sous Lotus notes pr generer un fichier Excel avec des formules de Total; mon seul probleme c'est que FormulaLocal ne me genere pas la formule dans la langue locale.
    Y a-t-il qq chose à forcer ?
    Ma formule c qq chose comme ça :

    xlSheet.Range(xlSheet.Cells(ligne+3,col+k).address).FormulaLocal = "=SUM("+Trim(ReplaceSubstring (range1, "$" , ""))+")"

    Merci de votre aide

  2. #2
    Expert confirmé
    Avatar de bidou
    Homme Profil pro
    Développeur .NET
    Inscrit en
    Mai 2002
    Messages
    3 055
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 58
    Localisation : France, Rhône (Rhône Alpes)

    Informations professionnelles :
    Activité : Développeur .NET
    Secteur : Transports

    Informations forums :
    Inscription : Mai 2002
    Messages : 3 055
    Par défaut
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    xlSheet.Range(xlSheet.Cells(ligne+3,col+k).address).Formula = "=SUM("+Trim(ReplaceSubstring (range1, "$" , ""))+")"
    Puisque tu passes la formule en anglais il faut utiliser Formula à la place.

  3. #3
    Futur Membre du Club
    Inscrit en
    Octobre 2005
    Messages
    4
    Détails du profil
    Informations forums :
    Inscription : Octobre 2005
    Messages : 4
    Par défaut
    effektivmt, g utilisé Formula à la place mais ça marche tjrs pas. Le probleme c que je ne peux pas utiliser "Somme" comme g des users français et anglais dc forcement je dois utiliser la formule internationale et ça marche pas; pourtant ça genere bien dans le fichier une formule du type "=SUM(C4:AL4)"
    mais les users français ont une erreur.

  4. #4
    Membre Expert Avatar de Megaxel
    Profil pro
    Inscrit en
    Mai 2003
    Messages
    1 187
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2003
    Messages : 1 187
    Par défaut
    Hello !
    Ca fait du boulot en plus, je sais, mais moi, j'évite les formules dans les cellules Excel. Pourquoi est-ce que tu ne fais pas le calcul dans ta procédure en VBA et que tu n'affiches pas directement le résultat de ta somme dans la cellule?

  5. #5
    Membre émérite
    Avatar de Theocourant
    Profil pro
    Inscrit en
    Janvier 2005
    Messages
    618
    Détails du profil
    Informations personnelles :
    Âge : 47
    Localisation : France

    Informations forums :
    Inscription : Janvier 2005
    Messages : 618
    Par défaut
    Salut,

    Et si tu utilisais la fonction FormulaR1C1 avec le code fournit par ouskel'n'or
    Pour la somme sur C4:AL4, cela donnerait:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    Sub InsérerFormuleDansExcel() 
        NoLigneDebut = CStr(4)
        NoColonneDebut = CStr(3) 
        NoLigneFin = CStr(4)
        NoColonneFin = CStr(38) 
        MaFormule = "=SUM(R" + NoLigneDebut + "C" + NoColonneDebut + ":R" + NoLigneFin + "C" + NoColonneFin + ")" 
     
        xlSheet.Range(xlSheet.Cells(ligne+3,col+k).address).FormulaR1C1 = MaFormule 
    End Sub
    J'espère que cela pourra t'aider

    @+

    Théo

  6. #6
    Futur Membre du Club
    Inscrit en
    Octobre 2005
    Messages
    4
    Détails du profil
    Informations forums :
    Inscription : Octobre 2005
    Messages : 4
    Par défaut
    à moins qu'Excel permette de savoir la langue

  7. #7
    Membre émérite
    Avatar de Theocourant
    Profil pro
    Inscrit en
    Janvier 2005
    Messages
    618
    Détails du profil
    Informations personnelles :
    Âge : 47
    Localisation : France

    Informations forums :
    Inscription : Janvier 2005
    Messages : 618
    Par défaut
    Citation Envoyé par mitaf
    à moins qu'Excel permette de savoir la langue
    Re,

    Avec la méthode International de l'application, tu peux récupérer les paramètre régionaux : langue, séparateur décimal .....

    Par contre la méthode est en lecture seule

    Bonne continuation

    Théo

  8. #8
    Futur Membre du Club
    Inscrit en
    Octobre 2005
    Messages
    4
    Détails du profil
    Informations forums :
    Inscription : Octobre 2005
    Messages : 4
    Par défaut
    merci bcp, je vais compiler vos propositions et en tirer qq chose.
    Merci

  9. #9
    Membre émérite
    Avatar de Theocourant
    Profil pro
    Inscrit en
    Janvier 2005
    Messages
    618
    Détails du profil
    Informations personnelles :
    Âge : 47
    Localisation : France

    Informations forums :
    Inscription : Janvier 2005
    Messages : 618
    Par défaut
    Lut,

    Quand tu auras trouvé une solution pense à la faire partager ici (avec le code ) et pense au tag tout en bas à gauche

    Merci et bonne continuation

    Théo

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo