Назначить несколько значений одной объявленной строке

Question

Я ищу способ получить несколько значений, заданных одной переменной, объявленной как String. После кодов может дать вам представление о том, что я ищу

Dim Name as string 
Name = value1 or value2 or value3 
If range("A1"). Value = Name then 
    Activecell.entirecolumn.delete 
End If 

Answer 1

Dim Name As String 
    Dim value1 As String, value2 As String, value3 As String 

    Name = value1 & "," & value2 & "," & value3 

    If InStr(Name, Range("A1")) <> 0 Then 
     ActiveCell.EntireColumn.Delete 
    End If 

Цикл программы через A1, чтобы увидеть, если один из матча значения. Если это произойдет, Instr вернет позицию в поле Имя, где они совпадают. Итак, просто говорит вашей программе, что Instr не равен 0, чтобы удалить то, что вы хотите