Discussion :

[wholehog2]

je suis dans excel et je voudrais par l'intermédiaire d'une macro taper une formule (avec des adresses de cellule sous la forme F10, S35, ...) dans une cellule.

voila le code que j'ai ecris

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
ActiveCell.Offset(3, -1).Range("A1").Select
ActiveCell.FormulaLocal = "=si(ESTTEXTE(saisie!" & case1 & "10);"";MOYENNE(saisie!" & case1 & "10:" & case2 & "10))"

comme vous pouvez le voir je veux gérer les lignes par le code.

et excel me dit erreur d'execution 1004.

je ne comprend pas pourquoi ?

[RLX]

Salut wholehog2,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ActiveCell.Offset(3, -1).Range("A1").Select

----> Normal tu lui demande la cellule situé 3 cellules plus bas 1 colonne à gauche.la cellule "A1"
---->VBA comprends pas
et moi non plus d'ailleurs que veut tu dire pour cette ligne de code?

[SfJ5Rpw8]

manque des " ... tu devrai afficher ta formule histoire de trouver l'erreur :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
Dim st As String
st = "=si(ESTTEXTE(saisie!" & case1 & "10);"""";MOYENNE(saisie!" & case1 & "10:" & Case2 & "10))"
Debug.Print st
 
ActiveCell.FormulaLocal = st

[wholehog2]

effectivement il manqué des guillemets et en plus j'ai stocker la formule dans un string et ça fonctionne

merci.