Prezados, estou com uma dúvida na criação de minha macro em VBA.
Preciso excluir colunas em minha planilha mas que seja dentro intervalo e critério específico de colunas.
A planilha contem várias colunas e preciso manter dentro das colunas dos dia/mês/ano apenas o dia que eu informar para o Excel. ( através o “inputbox”)
Sendo que o dia 01º do mês começa na coluna “D” e o ultimo dia termina na coluna “AH”

Tentei criar uma mas totalmente sem sucesso ainda estou iniciando em VBA.

Sub data()
  
  Dim data As String
  Dim w As Worksheet
  
     
  Set w = Sheets("IAT MAIO")
  w.Select
  w.Range("D1").Select
  
  data = InputBox(" Qual data deseja manter ? ")
   
   
  If ActiveCell <> data Then
  
  ActiveCell.EntireColumn.Select
  
  End If
       
    
  End Sub

OBS: A variação de dias conforme o mês pensarei depois como fazer
Tipo quando mês é (28, 29, 30 ou 31 dias)

Desde já agradeço.