Я создал макрос, как показано ниже в Excel. В столбце значения A разделяются точкой с запятой. В столбце A имеются значения сплит-разрядов и замена разделенных значений в столбце B.VBA loop trough ячейки с ячейками со значением и заменить
Невозможно выполнить циклическое разделение значений.
Sub ReplaceAttachments3()
Dim cl As Range
Dim cell As Variant
Dim i As Long
Dim txt As String
For Each cl In Range("$B$1:$B" & Range("$B65536").End(xlUp).Row)
txt = Cells(cl.Row, 1)
cell = split(txt, ";")
For i = 0 To UBound(cell)
Cells(cl.Row, 2).replace What:=txt, Replacement:="",LookAt:=xlPart, SearchOrder:= _
xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Application.Goto Reference:="ReplaceAttachments"
Next i
Next
End Sub
Что не так?
Почему бы не просто использовать 'Text To Columns'? VBA не требуется. И если вы все еще хотите, чтобы VBA записывал макрос для «Text To Columns» –
Я хотел бы заменить значения split в столбце B. Например, в столбце A: «a; b; c;» \t столбец B: «text text2 b text2 c», а в столбце B я хотел бы заменить значения как a, b, c на пустые значения. – user3114375
, поэтому вы хотите удалить значения split из col B? –