Formule in macro

[W Bloemendal]

als ik een regel geselecteerd heb dan wil ik dat in de betreffende regel kolom j de waarde van kolom H gedeeld door 4

Nu heb ik

Dim Rij

Rij = ActiveCell.Row

cell(Rij, 10) = cell(Rij, 8) / 4

Nu krijg ik sub of function niet gedefineerd.

wat doe ik fout

wim

 

[LucHeyndrickx]

Je bent er bijna:

Dim Rij

Rij = ActiveCell.Row

cells(Rij, 10).Value = cells(Rij, 8).Value / 4

Luc