Para inserir uma coluna no Excel utilizando VBA, basta seguir os seguintes passos:
Selecionar a célula onde será inserida a coluna.
Utilizar o método "EntireColumn" para selecionar toda a coluna:
Range("A1").EntireColumn
Utilizar o método "Insert" para inserir a nova coluna:
Range("A1").EntireColumn.Insert
O código completo ficará assim:
Sub InserirColuna()Range("A1").EntireColumn.Insert End Sub
Para executar o código, basta pressionar a tecla F5 ou clicar em "Executar" na aba "Desenvolvedor".
A nova coluna será inserida à esquerda da coluna selecionada. Se precisar inserir em outra posição, basta selecionar a célula correspondente e alterar o endereço na linha de código.