بخصوص تغيير قيمة المتغير

السلام عليكم ورحمة الله

يا أخوان انا عندي متغير او بمعنى اصح

عندي قيمة داخل التكست والقيمة هي (a1 ) واريد تغييرها مع اللوب من ( a1) إلى (a2) (a3) وهكذا كيف الطريقة ارجوا المساعدة

وهذا الكود الي وضعته وما ضبط معاية

For row = 2 To tabel1.Rows - 1
        n = 1
        For col = 1 To tabel1.Cols - 1
            arr(i, n) = tabel1.TextMatrix(row, col)
            oWord.ActiveDocument.Bookmarks(Text55.Text).Select
            oWord.Selection.InsertAfter arr(i, n)
            n = n + 1
            Text55.Text = a1 + 1
        Next
        i = i + 1
    Next

داخل التكست قمت بكتابة a1 واريد يزيد العدد و حرف a كما هو

اتمنى ان يكون السؤال واضح