Динамическое изменение индекса ячеек в Excel - Visual Basic .NET

Формулировка задачи:

Доброго времени суток. Вкратце суть проблемы. Есть 9 чекбоксов. Есть 9 макетов в одном листе екселе в столбик. Запись производится программным выводом из ВБ.нет. Возможно ли сделать динамическое изменение числового индекса ячеек? То есть по тому какие чекбоксы нажаты динамически менять числовой индекс ячеек в екселе? Пример вывода: ...

                    Листинг программы
                
 
                            
                        
'макет первого анализа
                .Range("A1").Value = "п/о"
                .Range("C1").Value = TextBox2.Text
                .Range("B2").Value = "'xxx''"
                .Range("H2").Value = "Каб 92"
                .Range("B3").Value = "АНАЛИЗ КРОВИ №_____ + ЭДС"
                .Range("H3").Value = "III этаж"
                .Range("A5").Value = TextBox1.Text
                .Range("A6").Value = "В учреждение_______________________________________________________"
                .Range("A7").Value = "Корпус. отд_________________________________________________________"
                .Range("D9").Value = "Толстая капля"
                .Range("A10").Value = "Эритроц."
                .Range("B10").Value = "Гемогл."
                .Range("C10").Value = "Цв. Пок."
                .Range("D10").Value = "Полихр."
                .Range("E10").Value = "Базоф."
                .Range("F10").Value = "Ретикул."
                .Range("G10").Value = "Тромбоц."
                .Range("H10").Value = "Параз."
                .Range("A11").Value = "в 1 куб. мм 4 1/2 - 5мм"
                .Range("B11").Value = "80-100"
                .Range("C11").Value = "0.8-1.0"
                .Range("D11").Value = "+"
                .Range("E11").Value = "-"
                .Range("F11").Value = "0.6-0.8"
                .Range("G11").Value = "250-400"
                .Range("D17").Value = "каб 29"
                'макет второго анализа
                .Range("A18").Value = "п/о"
                .Range("C18").Value = TextBox2.Text
                .Range("B19").Value = "''xxx''"
                .Range("H19").Value = "Каб 92"
                .Range("C20").Value = "АНАЛИЗ КРОВИ HBsAg, a-HCV cym"
                .Range("H20").Value = "III этаж"
                .Range("A22").Value = TextBox1.Text
                .Range("D34").Value = "каб 29"
                'макет третьего анализа
                .Range("A35").Value = "п/о"
                .Range("C35").Value = TextBox2.Text
                .Range("B36").Value = "''xxx''"
                .Range("H36").Value = "Каб 93"
                .Range("C37").Value = "АНАЛИЗ КАЛА НА Я/ГЛИСТ"
                .Range("H37").Value = "III этаж"
                .Range("A39").Value = TextBox1.Text
                .Range("A40").Value = "Домашний адрес____________________________________________________"
                .Range("A49").Value = "''___'' _________ 201__г."
                .Range("E49").Value = "__________________________________"
                .Range("F50").Value = "подпись"
                .Range("D51").Value = "каб 29"

... Возможно ли динамически менять числовой индекс у ячеек для уменьшения объема текста программы? Знаю что можно написать кракозябру через функции, но в этом деле я полный нубарь, последний раз кодил лет 8 назад. Не прошу за меня вас писать что-то, просто возможно ли допустим индекс ячеек записывать в формате A(i+x), если да то как?

Решение задачи: «Динамическое изменение индекса ячеек в Excel»

textual
                            Листинг программы 
                        
.cells(1+17*(n-1),3).Value = TextBox2.Text
.cells(5+17*(n-1),1).Value = TextBox1.Text