Discussion :

[Marilo30]

Bonjour,

J'essaye de créer automatiquement des formules dans ma feuille de calcul via vba.
J'ai appris ce jour à en faire (merci internet).
J'ai commencé par un truc simple:

Code :

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

1
2
Sheets("Suivi Fi. Readaptic").Cells(ligne, colonne_2).Formula = "=" & Sheets("Suivi Fi. Readaptic").Cells(ligne, colonne_2 - 2).Address(RowAbsolute:=False, ColumnAbsolute:=False) _
& "-" & Sheets("Suivi Fi. Readaptic").Cells(ligne, colonne_2 - 1).Address(RowAbsolute:=False, ColumnAbsolute:=False)

Cela m'a permis d'obtenir, en fonction de ma ligne et de ma colonne:

Code :

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

=F45-G45

A présent, j'essaye de créer, au début de la ligne, un somme.si. J'ai tenté en changeant par sumif, mais j'ai tout de même une erreur 1004.
Pour info, si je mets tout sauf le "=" du début, et que je le rajoute à la main à posteriori (en gros il m'a marqué automatiquement le calcul comme une ligne de texte), cela fonctionne.
Voici le code:

Code :

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

1
2
3
Sheets("Suivi Fi. Readaptic").Cells(ligne, 3).Formula = "=SOMME.SI(" & Sheets("Suivi Fi. Readaptic").Cells(35, colonne_2 - 2).Address & ":" & _
Sheets("Suivi Fi. Readaptic").Cells(35, nb_colonne.Count + 2).Address & ";C$35;" & Sheets("Suivi Fi. Readaptic").Cells(ligne, colonne_2 - 2).Address & ":" & _
Sheets("Suivi Fi. Readaptic").Cells(ligne, nb_colonne.Count + 2).Address & ")"

Je suis censé obtenir ceci:

Code :

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

=SOMME.SI($F$35:$HM$35;C$35;$F$45:$HM$45)

Que dois-je faire pour que cela fonctionne svp?

Merci d'avance pour votre aide

[laurent_ott]

Bonjour.
Le plus simple est d'utiliser l'enregistreur de macro : ça donne la trame du code.
Et attention car Excel parle anglais par défaut, donc 'formula' prend des termes anglais, voir formule locale pour du français (mais pas forcément conseillé).
Bonne continuation.

[Philippe Tulliez]

Bonjour,
La lecture de mes deux billets sur le sujet, vous aiderons peut-être

• Comment écrire une formule dans une plage de cellules en VBA ?
• Comment écrire une formule plus complexe dans une cellule ?

[mach1974]

il faut plutôt prendre la propriété value et regarder si excel est en anglais, sumif sinon essayez le somme( si(condition; conséquence))

[Alex020181]

Bonjour

En VBA le séparateur de paramètres des fonctions n'est pas le ";" mais ",".

Et le nom de la fonction est "sumif" et non plus "somme.si".

Il te faut obtenir

Code formule :

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

=SUMIF($F$35:$HM$35,C$35,$F$45:$HM$45)

[Alex020181]

Votre problème est il résolu ?