Insérer dans une cellule une formule avec des guillemets via VBA
Bonjour,
Dans une macro, je veux insérer cette formule dans une cellule : =SOMMEPROD(($G$8:$G$38<>"")/NB.SI($G$8:$G$38;$G$8:$G$38 & ""))
Pour cela j'ai fait le code vba ci dessous:
Dim Form as string
Cells(1,1) = "=SOMMEPROD((" & plage.Address & "<>" & """" & ")/NB.SI(" & plage.Address & ";" & plage.Address & " & " & """" & "))"Sauf que le résultat dans ma cellule est le suivant : =SOMMEPROD(($G$8:$G$38<>")/NB.SI($G$8:$G$38;$G$8:$G$38 & "))
Il me manque des guillemets mais je ne comprends pas pourquoi?
Avez-vous une solution ?
Merci d'avance
Agrimaman
Salut Agrimaman,
devrait aller...
Set rCells = Range("G8:G38")
Cells(10, 1).FormulaLocal = "=SOMMEPROD((" & rCells.Address & "<>"""")/NB.SI(" & rCells.Address & ";" & rCells.Address & " & """"))"
A+
Bonjour,
avec & """"
tu ajoute une seule double-quote.
La 1ère ouvre la chaine, celle doublée dis que tu veux ce caractère, la dernière ferme la chaine.
Il faut la doubler 2 fois si tu en veux 2 : & """"""
En l'intégrant au reste de la chaine tant qu'à faire comme te montre curulis, tu as 2 & inutiles.
eric
Merci curulis57. Ta solution a fonctionné!!
Eriiic, J'ai essayé également ta solution mais par contre cela n'a pas marché. Merci de ton retour tout de même
Agrimaman
Bonjour,
par contre cela n'a pas marché
disons que tu n'as pas su l'utiliser.
Mais le but était l'explication de ton erreur, qu'il est important que tu comprennes.
eric