Excel - макрос за увеличаване на препратка към клетка
Проблем
Искам макро, че на открито ще се увеличи клетката референция в клетка с 11 всеки път, когато книгата е отворена т.е. клетка C18 е = Sheet2! H2. След това следващия път, когато се отвори, искам той да се промени на = Sheet2! H13, след това на следващия отворен = Sheet2! H24 и т.н.
Решение
Ако приемем, че клетката, в която е формулата C18 (променете кода, за да отразите дясната клетка)
Sub Auto_Open () Dim currentRow As String Dim sTemp As String sTemp = Обхват ("C18")., 1, Len (sTemp) - 1) Loop currentRow = CLng (текущ ред) + 11 Обхват ("C18") Формула = sTemp & currentRow End Sub
Забележка
Благодарение на rizvisa1 за този съвет на форума.