Есть ли способ ввода текста для определенных ячеек в выбранном диапазоне?

Question

Впервые в Vba Excel, и я не могу понять, как ввести в текст диапазон ячеек, который находится в пределах уже выбранного диапазона ячеек.

У меня есть список данных, идущий вниз примерно на 10 тыс. Строк,Я добавил новый заголовок, пытаясь добавить к нему текст для каждой идущей вниз строки.

В общем, если я Ctrl + Shift + Вниз (в наборе данных, который у меня есть) и перейти к моему новому заголовку у меня естьдиапазон данных, который я хочу, но я не могу понять, как ввести текст под заголовком в этом диапазоне.Надеюсь, что все это имеет смысл.

Я уже пробовал это.

Так что я только дошел до выбора диапазона через VBA.В идеале я хочу, чтобы новый заголовок мог запускать проверки «If then» и обновлять каждую ячейку под новым заголовком соответственно.Поэтому, если ячейка «H8» говорит что угодно, тогда «P8» будет именно там, где я хочу получить результат.

Sub Card_type_test()

    Dim CT As String

    CT = ActiveCell.Value

    If CT = "AMERICAN EXPRESS" Then
        ActiveCell(1, 9).Value = "AMEX2"
    ElseIf CT = "MASTERCARD" Then
        ActiveCell(1, 9).Value = "MC2"
    ElseIf CT = "VISA" Then
        ActiveCell(1, 9).Value = "VISA2"
    Else
    End If

End Sub

Sub Selecting_correct_Cells()

    Range(Range("P8"), Range("H8").End(xlDown)).Select

End Sub

Первый Sub был тестом, чтобы увидеть, сработал ли оператор «if then».Что и происходит, если я выделю «H8», например, в качестве активной ячейки.Последний саб - это выбранный диапазон, которого я пытаюсь достичь.