VBA > Kopieren formule met variabele

[Atara7]

Goedendag beste ex (cel) perts

Ik wil graag een knop maken in vba die een bepaalde kolom vult met een formule.
Deze bestaat uit :
1) Het begin van de formule
2) Een variabele die oploopt
3) Het einde van de formule

Als iemand me op weg kan helpen
Bvd voor jullie hulp

Groetjes, Aat

 

[Roncancio]

Goedendag beste ex (cel) perts

Ik wil graag een knop maken in vba die een bepaalde kolom vult met een formule.
Deze bestaat uit :
1) Het begin van de formule
2) Een variabele die oploopt
3) Het einde van de formule

Als iemand me op weg kan helpen
Bvd voor jullie hulp

Groetjes, Aat

Hoe luidt de formule?
Welke variabele loopt op?
Kan je een voorbeeldbestand sturen?

Met vriendelijke groet,


Roncancio

 

[Atara7]

Ja, is waarschijnlijk te weinig informatie, sorry
Ik ga het morgen op m'n werk uitprinten,
en typ de exacte formule over, dit staat op een afgesloten netwerk

Groetjes, Aat

 

[Atara7]

Volgende poging:
Dit is ongeveer het idee:

Private Sub CommandButton1_Click()
With Worksheets(MEDEW)
For XX = 1 to 20
.Range("N4").Formula = .VERT.ZOEKEN(XX;C1:E500;2;ONWAAR)
Next XX
End With
End Sub

Waarbij XX = F11, F12, F13, enz
N4 moet natuurlijk ook nog eens oplopen naar N5, N6, N7
C1:E500 blijft altijd gelijk

Het uiteindelijke resultaat moet dit worden:
IN N4 komt te staan: =VERT.ZOEKEN(F11;C1:E500;2;ONWAAR)
IN N5 komt te staan: =VERT.ZOEKEN(F12;C1:E500;2;ONWAAR)
IN N6 komt te staan: =VERT.ZOEKEN(F13;C1:E500;2;ONWAAR)

Ik hoop dat het idee duidelijk is?
Sorry voor het ongemak, heb thuis een mac, zonder vba
Alle opmerkingen zijn welkom,

In ieder geval altijd bedankt voor de moeite :love:
Groetjes, Aat

 

[Ginger]

Atara, Je verzoek is toch echt maar heel simpel hoor... Alle code die je nodig hebt is dit.

Sub Formule()

    Range("N4:N7").Formula = "=vlookup(F11,$C$1:$E$500,2,false)"
    
End Sub

Groet, Leo

 

[Atara7]

Whoo! :shocked:
Hoest mogelijk
Leo, bedankt!!!! :thumb:

 

[Ginger]

Graag gedaan. Wil je je vraag nog ff op opgelost zetten? Dank!

Groet, Leo