formule in cel wegschrijven middels vba

[D-Mon]

Beste Helpmijers,

Ik wil een formule middels VBA opbouwen en vervolgens wegschrijven in een cel in een excelsheet. Hiervoor gebruik ik de volgende code:

Sheet1.Range("B8").Value = "=VERT.ZOEKEN("

Uiteraard volgt er nog een stuk code, maar dat is is bij mijn vraag niet van belang.

Ik krijg vervolgens echter een foutmelding: "Fout 1004 tijdens uitvoering, door de toepassing of door object gedefinieerde fout".

Het lijkt mij niet spannender dan het wegschrijven van een stuk tekst, maar het zit hem blijkbaar in het teken "("

De volgende regel doet het namelijk wel:

Sheet1.Range("B8").Value = "=VERT.ZOEKEN"

Is dit een bekend probleem met het teken "(" ? Iemand enig idee hoe ik dit probleem zou kunnen omzeilen?

Arno

 

[ExcelAmateur]

D-Mon,

Zo schrijf je de formule in VBA.

ActiveCell.FormulaR1C1 = "=VLOOKUP(RC[-2],Blad2!R[-1]C[-2]:R[12]C[1],3,0)"

Dit staat er dan in de cel.

=VERT.ZOEKEN(B2;Blad2!B1:E14;3;0)

Dit kun je ook zelf met de macrorecorder opnemen.

 

[D-Mon]

Bedankt!

Ik heb hinderdaad via FormulaR1C1 op kunnen lossen, zoals alsvolgt:

Sheets(1).Range("A1").FormulaR1C1 = "=VLOOKUP(zoekwaarde,bereik,kolom)"

Arno