Через VBA - Как найти конкретный столбец по имени, скажем Inception_Month

Question

Через VBA - Как найти определенный столбец по имени, скажем, Inception_Month, и, если он найден, удалить весь столбец и, если он не найден, перейти к оставшемуся коду. Пожалуйста, помогите, ребята.

Я уже пробовал это, записав макрос, нажав Ctrl F, но он выдает ошибку, если не находит определенного имени столбца, я не хочу видеть ошибку. Я хочу, чтобы код продолжал выполнять следующие шаги, если столбца с именем «Inception_Month» не существует.

Если имя столбца найдено - я хочу, чтобы весь столбец был удален, а правый следующий столбец был перемещен в пространство удаленного столбца, не хочу видеть пустой столбец.

Answer 1

Вы можете пойти, чтобы вставить make it в таблицу, и затем вы можете использовать что-то вроде ниже.

MyTableName.HeaderRowRange.Cells.Find("Inception_Month").Delete

Или использовать что-то вроде ниже

Sub Find_Column()
Dim ws as ActiveSheet

Set ws = ActiveSheet
With ws
    Set c = .Find("Inception_Month", LookIn:=xlValues)

    If Not c Is Nothing Then
        ' some code here
    else
        Columns(c.Column).Delete
    End If
End With
End Sub