automatisch kopiëren cellen in nieuwe regel

[serpent xx]

Wie kan mij helpen met het volgende probleem.
Als ik in bijgevoegd bestand in kolom C in de laatste cel aankom wordt automatisch een nieuwe regel aangemaakt. Helaas worden de instellingen van geblokkeerde cellen niet meegenomen in de nieuwe regel (zie kolom H). Hoe kan ik dit instellen?

 

[HSV]

Bv.

.DataBodyRange.Columns(8).Locked = True

Of:

.DataBodyRange(.ListRows.Count, 8).Locked = True

Ps. Waarom doe je dit niet met de change-event?

 

[serpent xx]

Bv.

.DataBodyRange.Columns(8).Locked = True

Of:

.DataBodyRange(.ListRows.Count, 8).Locked = True

Ps. Waarom doe je dit niet met de change-event?

Dank je Harry,
Werkt perfect!