Excel - makro raku viite suurendamiseks

Probleem

Ma tahan, et avatud makro suurendaks raku viite lahtris 11 iga kord, kui raamat avatakse, st Cell C18 on = Sheet2! H2. Seejärel avaneb järgmine kord, kui soovin, et see muutuks = Sheet2! H13, siis järgmisel avatud lehel = Sheet2! H24 jne.

Lahendus

Eeldades, et rakk, milles valem on C18 (muutke koodi, et see kajastaks õiget lahtrit)

 Sub Auto_Open () Dim currentRow kui string Dim sTemp kui string sTemp = Range ("C18"). Formula do ajal (IsNumeric (Right (sTemp, 1))) currentRow = Right (sTemp, 1) & currentRow sTemp = Mid (sTemp, 1, Len (sTemp) - 1) Loop currentRow = CLng (currentRow) + 11 vahemik ("C18") Vorm = sTemp & currentRow lõpp