Я пытаюсь объединить столбец C и столбец H в столбец F, где он удовлетворяет определенным условиям. Я хочу объединить столбец C, где он равен «FS_Tier_1», со столбцом H, где он равен «FS_CAP_1_001», в столбец F (ниже первой строки «FS_Tier_1»), пока столбец H не достигнет «FS_CAP_1_002».
Вот как выглядят мои данные:
Я искал много кода VBA, но не могу найти то, что вполне соответствует тому, что я пытаюсь сделать. Я в основном работаю в SQL Server, поэтому я новичок в VBA. Я пытался использовать предложение WHERE, но не смог заставить его работать.
Sub Concat_ParentCode_Cap1()
With Worksheets("PD Code Structure")
Dim ParentCode As Range
Dim TierCode As String
Dim CapCode As String
TierCode = "FS_Tier_1"
CapCode = "FS_CAP_1_001"
ParentCode = Range("F2:F24")
Select Case CapCode
Case "FS_CAP_1_001"
ParentCode = TierCode & " . " & CapCode
End Select
End With
End Sub
Я получаю сообщение об ошибке: «Переменная объекта или переменная блока не установлена».
Я бы хотел, чтобы мои данные выглядели следующим образом:
