Discussion :

[SerialFF]

Bonjour à vous,

J'ai actuellement un petit problème avec notre ami excel.
En effet, sur une case je cherche à insérer la formule suivante via VBA.

Code :

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

Range(col & "7").Value = "=SOUS.TOTAL(3,(AutreFeuille!J" & nb & ":" & "J" & finPlageGPP & "))"

J'ai essayé plein de syntaxe et aussi sans variable ni changement de feuille afin de limiter les risques d'erreurs:

Code :

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

Range(col & "11").Value = "=SOUS.TOTAL(3,(A1:A10))"

A la fin de ma macro, la case en question contient bien la formule mais en apparence j'ai l'erreur "#NOM?" alors qu'ils sont bons... Puis quand je double clique sur la case sans rien changer et fait entrer la valeur apparait !
Comment faire pour que je n'ai pas a double cliquer sur ma case pour voir la valeur ?
Merci à vous

[Marc-L]

Bonjour,

normal car une formule n'est pas une valeur !

Voir donc du côté de la propriété FormulaLocal …

__________________________________________________________________________________________

Merci de cliquer sur pour chaque message ayant aidé puis sur pour clore cette discussion …

[SerialFF]

Bonjour Marc-L,

Merci de ta participation.

FormulaLocal ne fonctionne pas (une erreur qui me demande de débugger)

Code :

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

Range(col & "7").FormulaLocal = "=SOUS.TOTAL(3,(C2:C5))"

Code :

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

Range(col & "7").Formula = "=SOUS........

=> Erreur #NOM?

Code :

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

1
2
Range(col & "7").Select
ActiveCell.Formula = "=SOUS.TOTAL(3,(J" & nb & ":" & "J" & finPlage & "))"

=> Erreur #NOM?

EDIT :

J'ai réussi !
Lorsque l'on fait FormulaLocal la fonction sous.total doit avoir un ; et non une virgule après le 1er paramètre et pas de parenthèses. La syntaxe de cette fonction semble donc variable.
Bonne rep :

Code :

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

"=SOUS.TOTAL(3;C2:C5)"

Merci !

[Oliv-]

salut,

Il faut je pense mettre l'équivalent anglais

il suffit de lancer l'enregistreur de macro puis de revalider ta formule pour en trouver lavaleur dans vbe.

[SerialFF]

Pour nos amis anglophones, cadeau :

Code :

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

ActiveCell.FormulaR1C1 = "=SUBTOTAL(3,UneFeuille!R[-5]C[8]:R[1]C[8])"