VBA Excel

Résolu
Michel -  
Bonjour,

Est ce que quelqu'un s'y connait en VBA Excel ?

ActiveCell.FormulaR1C1 = "=SUM('Feuille1'!R3C2:R12C2)"

A la place de Feuille1 je voudrais mettre une variable qui contient le nom de la feuille.
J'ai essayé:

ActiveCell.FormulaR1C1 = "=SUM(var!R1C2:R12C2)"

ActiveCell.FormulaR1C1 = "=SUM('var'!R1C2:R12C2)"

ActiveCell.FormulaR1C1 = "=SUM(sheets(var)!R1C2:R12C2)"

et ça ne marche pas !

Merci d'avance pour vos réponses.
Configuration: Windows XP
Firefox 2.0.0.7

13 réponses

  2. Utilisateur anonyme
    Bonjour,

    ActiveCell.Value = "=VLOOKUP(1,Feuil2!B2:C12,2,FALSE)"

    Lupin
    1. stephDublin
      Bonjour,
      Qulel serait la syntaxe à adopter pour une fonction vlookup, au lieu de sum?

      merci d'avance:-)
      Steph
      1. Michel
        Oui oui.

        Mais en revanche la sol de Michel (un autre pas moi) en message 6 marche avec ma petite modif (voir ci dessus).
        2. Landoltp
          c'est bizarre, parce que chez moi ton code fonctionne

          ActiveCell.FormulaR1C1 = "=SUM(var!R1C2:R12C2)"

          donc je vois pas ce qui cloche (question bete, mais t'as bien nommé ta feuille var?), désolé.
          1. Michel
            Bonjour,

            ActiveCell.Value = "=SUM('" & varNom & "'!R1C2:R12C2)"

            Michel
            _______________________________

            Merci, ça (ci dessus) ça marche nickel à part qu'il a fallu que je remplace R1C2:R12C2 par B1:B12.
            Re merci à tous pour votre aide si rapide.
            Bonne soirée
            1. Michel
              dans B1:B12 soit R1C2:R12C2

              Mais de toute manière ce qui pose problème c'est l'appel de la feuille de calcul où se trouve ces cellules, ça marche très bien, quand j'écris le nom de la feuille en toute lettre.
              1. Michel
                Bonjour,

                ActiveCell.Value = "=SUM('" & varNom & "'!R3C2:R12C2)"

                Michel
                1. Landoltp
                  les nombres que tu veux additionner se trouvent dans quelle cellules?
                  2. Landoltp
                    et le problème est pas là?

                    ActiveCell.FormulaR1C1 = "=SUM('Feuille1'!R3C2:R12C2)" ' ici tu mets R3C2

                    ActiveCell.FormulaR1C1 = "=SUM(var!R1C2:R12C2)" ' et là R1C2
                    2. Landoltp
                      salut,

                      je sais pas si c'est ca, mais il faut peut-être que tu définisse le nom de ta feuille:

                      Set var= Sheets("feuil1")