Hallo.
VBA kenne ich jetzt nicht so ... aber in c# mache ich folgendes. Ich fülle die Datatable und dann ...

DataColumnCollection dcc = mdtMailPlus.Columns;
for (int i = 0; i < mdtMailPlus.Columns.Count; i++)
{
oSheet.Cells[Zeile, i + Spalte] = dcc[i].ColumnName.ToString();
}

Vielleicht geht so was ja auch in VBA :-)
Gruß aus Flensburg
Ralf