Excel - макрос для збільшення посилання на клітинку
Проблема
Я хочу, щоб макрос на відкритому збільшив орієнтацію осередку в комірці на 11 разів при кожному відкритті книги, тобто осередку C18 має = Sheet2! H2. Тоді наступного разу, коли він відкриється, я хочу, щоб він змінився на = Sheet2! H13, потім на наступний відкритий = Sheet2! H24 і т.д.
Рішення
Припускаючи, що комірка, в якій знаходиться формула C18 (зміна коду відображає праву комірку)
Sub Auto_Open () Dim currentRow As String Dim sTemp Як рядок sTemp = Діапазон ("C18") Формула Do While (IsNumeric (Право (sTemp, 1))) currentRow = Право (sTemp, 1) & currentRow sTemp = Mid (sTemp), 1, Len (sTemp) - 1) Петля currentRow = CLng (currentRow) + 11 Діапазон ("C18") Формула = sTemp & currentRow End Sub
Примітка
Завдяки rizvisa1 за цей відгук на форумі.