Syntaxe VBA "" et ''

Version imprimable

26/04/2011, 16h20
andrea0

Syntaxe VBA "" et ''

En mettant cette formule dans mon code VBA

Code:

g1 = "=IF(OR((" & Fe & "!R" & lig + 6000 & "C" & col1 - 1 & ")=D8,(" & Fe & "!R" & lig + 6000 & "C" & col1 - 1 & ")=D9),1,"""")"

Sur Excel quand je regarde ce que ca donne ca me met le message d'erreur suivant: #NOM?

en cliquant sur la cellule ca m'a mit:=SI(OU(($FB$6020)='D8';($FB$6020)='D9');1;"")
donc avec des ' ' quand je clique sur la cellule et que je les retire ca ne me met plus ce mesage d'erreur

(Or dans la formule que j'ai mis dans mon code j'ai bien mis D8 et D9 et pas 'D8' et 'D9')jcomprends pas quelqu'un aurait une idée??

Merci

andrea
26/04/2011, 20h18
Invité

Bonjour

Regardes du coté de Formula et là : Pourquoi autant de propriétés 'Formula' différentes ?

Philippe
27/04/2011, 09h38
andrea0

Je te remercie de m'avoir lu mais
ca ne m'aide pas beaucoup je ne trouve toujours pas
27/04/2011, 17h52
Flo3301

Bonjour,

Tu as 4 apostrophes d'affilé à la fin, c'est normal ? Ca me parait bizarre. D'autre part à quoi correspondent tes variables Fe, lig et col1 ?

Ton erreur vient du codage en lui même, tu as mal placé les apostrophes à mon avis.
27/04/2011, 18h36
Theze
Bonsoir,

Tu utilise la référence R1C1 dans ce cas, il te faut l'utiliser jusqu'au bout et donc D8 et D9 doivent être entrées en référence R1C1 :
Code:

1 2 Range("g1").FormulaR1C1 = "=IF(OR((" & Fe & "!R" & lig + 6000 & "C" & col1 - 1 & ")=R8C4,(" & Fe & "!R" & lig + 6000 & "C" & col1 - 1 & ")=R9C4),1,"""")"
Hervé.