gibt es eine Möglichkeit die durch Zellformatierung angepassten Zellinhalte mit einem Schlag in ein Array zu überführen? Damit meine ich, dass die angezeigten Zellinhalte ohne Schleife in ein Array übertragen werden sollen.
Ich habe auch eine stark vereinfachte Beispieldatei hochgeladen:
https://www.herber.de/bbs/user/142605.xlsm
Obwohl die "Text"-Eigenschaft auf eine einzelne Zelle angewandt werden kann, funktioniert es bei einem Zellbereich bestehend aus mehreren Zellen nicht mehr:
Sub Texte()
Dim varWerte As Variant
Debug.Print Range("C8").Text 'geht
Debug.Print Range("C11").Text 'geht
varWerte = Range("C5:C11").Text 'geht nicht
MsgBox Join(Application.Transpose(varWerte), vbCrLf)
End Sub
Da ich regelmäßig sehr viele Zellen zur Weiterverarbeitung auslesen muss, dauert der Schleifendurchlauf einfach zu lange. Für Lösungsvorschläge wäre ich sehr dankbar.Viele Grüße
Martin