программирование серии слов с помощью цикла

Question

У меня есть макрос, который проверяет каждую ячейку первой строки моих 60 первых столбцов. Если ячейка пуста, макрос автоматически заполняет ячейку словом «boubou» для каждой пустой ячейки.Однако я бы хотел каждый раз заполнять пустую ячейку не одним и тем же словом.Например, если макрос обнаруживает первую пустую ячейку, я хотел бы, чтобы он заполнялся словом «boubou», затем для второй найденной пустой ячейки я хотел бы, чтобы он заполнялся словом «boubou2», »,затем для третьей найденной пустой ячейки, я хотел бы, чтобы она заполнялась словом «boubou3» и так далее… Пожалуйста, найдите мой код VBA ниже.Если кто-то знает решения, это было бы замечательно.

Большое спасибо Хави

Sub hdfhgfdhhgf()
Dim i As Integer
For i = 1 To 60
If IsEmpty(Cells(1, i).Value) = True Then
 Cells(1, i).Value = "boubou"
 End If
 Next i
End Sub

Answer 1

У вас уже был код, просто нужно было добавить & i

Option Explicit
Sub hdfhgfdhhgf()

    Dim i As Integer

    For i = 1 To 60
        If IsEmpty(Cells(1, i)) Then Cells(1, i).Value = "boubou" & i
    Next i

End Sub

Думал, первое слово будет "boubou1"