1. 401.
    0
    Sub generationchange()
    For i = 4 To 3
    ActiveSheet. Cells(i, 2).Value = "tiklamayin dedeler"

    edit: ohaa 4.nesildim 3. nesil oldum
    ···
   tümünü göster