Ein paar konkrete Antworten

[Vinzenz Mai]

Hallo Frank,

Zeilenanzahl = ActiveWorkbook.ActiveSheet.UsedRange.Rows.Count
Spaltenanzahl = ActiveWorkbook.ActiveSheet.UsedRange.Rows(1).Cells.Count

Es gibt nicht nur Rows, es gibt auch Columns :-)

Spaltendelimiter = "§§§§§"

Deklariere diesen als Konstante außerhalb der Prozedur.

Zeilendelimiter = "°°°°°"

Warum nimmst Du keine Zeilenumbruch (vbCrLf)?
Klar, Du musst auch Zellen mit Zeilenumbruch maskieren.

Was passiert, wenn Du einfach alle Zellinhalte maskierst?

Derzeit maskierst Du ja überhaupt nicht und verläßt Dich auf die Wahl Deiner Delimiter.

Freundliche Grüße

Vinzenz