Excel VBA: поиск и замена Если/Условный

Question

Можем ли мы сделать это с помощью VBA?

Если текст в столбце A = «Студент» и текст в столбце B = «Джон», замените текст B на «John Paul».

спасибо.

Answer 1

Ответ на мой вопрос. Работы со мной:

Sub ChangeJohn() 

Dim x As Integer 
Dim i As Integer 

x = Range("A" & Rows.Count).End(xlUp).Row 

For i = 1 To x 

If Range("A" & i).Value = "Student" Then 
    If Range("B" & i).Value = "John" Then 
     Range("B" & i).Value = "John Paul" 
    End If 
End If 

Next i 

End Sub