celinhoud in een macro

[fj_paul]

Hallo,

Ik ben een macro aan het maken, maar ik kom er niet uit.
Ik wil in een celverwijzing een waarde zetten die ik uitreken in een andere cel.
Die waarde staat in cel I16. Deze is bv. 5. Ik wil nu de waarde van A5 wissen.
Maar als in I16 bv. 8 staat, wil ik de waarde van A8 wissen.
Ik had dit bedacht:

Sub WisregelP()
Dim Getal As Integer
Getal = Value.[I16]
Worksheets("Data Symphony").Cells(1, Getal).ClearContents

End Sub

Mijn (zeer beperkte) programeerkennis schiet hiet tekort.
Getal = value.[I16] klopt niet , en ik kan er niet achter komen hoe het wel moet. Wie weet raad???
Alvast bedankt!

Groet,
fj_paul

 

[Wigi]

Probeer dit

Sub WisregelP()
Dim Getal As Integer
Getal = Range("I16").Value
Worksheets("Data Symphony").Cells(Getal, 1).ClearContents 'eerst staat in Cells( , ) de rij, dan de kolom
End Sub

Wigi

 

[fj_paul]

Dit werkt, bedankt!! :thumb: