用vba代码，怎么表示任意选中单元格区域的单个单元格

我要对选中区域里面的单元格做处理，不知道怎么表示选中区域里面的单元格，比如我要对选中区域里面的大于0的单元格改为“正数”

dim Rng as range
for each Rng in Selection
if Rng>0 then Rng="正数"
next