Hello programmers !

Here is my problem :

I wouldlike to put some value into a sheet. the destination cells
depends on the selection. The selection is always type of Range. But i
have to use a conversion to write it down .

Dim bereich as range

AZelle = CStr(ActiveCell.Address)
..
..
..
Worksheets("Protect").Range(AZelle).Value = dteDatum

I dont´t like this . Why can´t i use

Worksheets("Protect").bereich.Value = dteDatum