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 :

Concaténer 2 Formules dans une cellule


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Inscrit en
    Février 2007
    Messages
    35
    Détails du profil
    Informations forums :
    Inscription : Février 2007
    Messages : 35
    Par défaut Concaténer 2 Formules dans une cellule
    Salut,

    Voici les 2 formules qui marchent suivantes :
    FORMULE 1:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
     
        For iCaseJour = 0 To 5
            gFeuilleHebSem.Cells(j, 6 + 2 * iCaseJour).FormulaLocal = "='Outil.xls'!CalculNbAgentParTrancheHebdo(" & j - NbLigGH + 1 & ";" & Retour_Col(6 + iCaseJour * 2) & NBLigTH + 1 & ":" & Retour_Col(7 + iCaseJour * 2) & NbLigGH - 2 & ")"             
        Next iCaseJour
    Et:
    FORMULE 2:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
     
        For M = 0 To 5
            gFeuilleHebSem.Range(Retour_Col(2 * M + 6) & j & ":" & Retour_Col(2 * M + 7) & j).Merge
            gFeuilleHebSem.Cells(j, 2 * M + 6).FormulaR1C1 = "=P!R" & LigP & "C[" & 2 - M & "]"
        Next M
    Ce que je voudrais faire, c'est avoir au niveau d'une même cellule la chose suivante:
    FORMULE 1 "tiret" FORMULE 2.

    J'ai fais la chose suivante, mais ça ne marche pas:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
     
    For iCaseJour = 0 To 5
            gFeuilleHebSem.Cells(j, 6 + 2 * iCaseJour).FormulaLocal = "='Outil.xls'!CalculNbAgentParTrancheHebdo(" & j - NbLigGH + 1 & ";" & Retour_Col(6 + iCaseJour * 2) & NBLigTH + 1 & ":" & Retour_Col(7 + iCaseJour * 2) & NbLigGH - 2 & ")" _
    & "-" & "=P!R" & LigP & "C[" & 2 - iCaseJour  & "]"
     
     
        Next iCaseJour
    Est-ce que qqun peut m'aider please ?

    Thx !

    Mila

  2. #2
    Membre confirmé Avatar de a.dequidt
    Profil pro
    Inscrit en
    Septembre 2007
    Messages
    144
    Détails du profil
    Informations personnelles :
    Âge : 38
    Localisation : France

    Informations forums :
    Inscription : Septembre 2007
    Messages : 144
    Par défaut
    Salut Mila,


    Dis nous quelle erreur tu as...

  3. #3
    Membre averti
    Inscrit en
    Février 2007
    Messages
    35
    Détails du profil
    Informations forums :
    Inscription : Février 2007
    Messages : 35
    Par défaut Concaténer un string et un Integer [Précision]
    Je n'ai pas de message d'erreur.
    La cellule est vide.

    Est-ce que tu as bien compris mon pb, car je ne sais pas si j'ai été très claire...?

    En fait, ce que je veux, c'est:
    - dans une même cellule, avoir: Formule1 "/" Formule2

    Merchi

    Mil...

  4. #4
    Membre Expert
    Profil pro
    Inscrit en
    Novembre 2006
    Messages
    1 567
    Détails du profil
    Informations personnelles :
    Âge : 62
    Localisation : France

    Informations forums :
    Inscription : Novembre 2006
    Messages : 1 567
    Par défaut
    tu places tout betement un & entre les deux

  5. #5
    Membre averti
    Profil pro
    Inscrit en
    Octobre 2007
    Messages
    22
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Octobre 2007
    Messages : 22
    Par défaut Pas mieux
    le & remplacant la fonction concatener d'excel, tu peux meme y ajouter un espace entre tes deux resultats de requêtes...

    Formule1 & " " & Formule2

  6. #6
    Membre Expert
    Profil pro
    Inscrit en
    Novembre 2006
    Messages
    1 567
    Détails du profil
    Informations personnelles :
    Âge : 62
    Localisation : France

    Informations forums :
    Inscription : Novembre 2006
    Messages : 1 567
    Par défaut
    Citation Envoyé par C_mila
    Ce que je voudrais faire, c'est avoir au niveau d'une même cellule la chose suivante:
    FORMULE 1 "tiret" FORMULE 2.
    donc pour ton cas çela devient
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    cells (.,.).formulalocal = "FORMULE 1" & "-" & "FORMULE 2"
    c'est a dire exactement ce que tu a fait et qui devrait marcher. yauntruc.
    ça y est j'ai trouvé je crois. ta premiere formule est en formulalocal et ta deuxieme en r1c1. je pense que tu devrais les synchroniser avant de les concatener

Discussions similaires

  1. Insérer une formule dans une cellule Excel via VBA
    Par *.Har(d)t dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 19/02/2020, 13h02
  2. Pb de formule dans une cellule
    Par spoyet dans le forum Excel
    Réponses: 3
    Dernier message: 18/06/2007, 14h31
  3. Pb de formule dans une cellule
    Par spoyet dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 17/06/2007, 09h59
  4. [Formule]Macro pour masquer des formules dans une cellule
    Par Hellx dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 26/04/2007, 08h21
  5. [VBA] Macro qui envoie une formule dans une cellule
    Par Okoss dans le forum Macros et VBA Excel
    Réponses: 2
    Dernier message: 24/04/2007, 22h32

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