¿Cómo puedo usar VBA para eliminar todas las columnas que están vacías aparte de un encabezado específico?

Me gustaría eliminar todas las columnas de una hoja de trabajo que cumplan los siguientes criterios:

fila 1 = "foobar"las filas 2-1000 están vacías

Suena bastante simple, pero no he logrado que funcione correctamente. Cualquier ayuda sería apreciada masivamente.

¡Gracias!

Respuestas a la pregunta(2)

Su respuesta a la pregunta