Gegeben die folgende Zeichenfolge:
"Data 1998 1999 2000 2001 2002 2003 2004 2005 2006"
Ich möchte in der Lage sein, die Zeichenfolge zu nehmen und die Daten in 10 separaten Spalten in einer Excel-Tabelle abzulegen. Ich arbeite an einer benutzerdefinierten Funktion, aber sie funktioniert noch nicht ganz.
Hat das schon jemand gelöst?
Vielen Dank
Antworten:
5 für die Antwort № 1- Markieren Sie Ihren Bereich mit der Zeichenfolge, die Sie teilen möchten
- Gehen Sie zur Registerkarte Daten
- Wählen Sie Text in Spalten
- Setzen Sie das Trennzeichen auf ein Leerzeichen
Sie können es auch mit einer Formel tun: http://www.excelforum.com/excel-general/591897-text-to-columns-but-using-a-formula.html
Oder verwenden Sie den Code creamyegg geschrieben.
3 für die Antwort № 2
Die einfache Antwort lautet ja. Es gibt eine VBA Split()
Die Funktion, die Sie verwenden können, gibt ein variantes Array zurück. Das Folgende würde Ihre Beispielzeichenfolge in Zellen einfügen A1:I1
des aktiven Arbeitsblatts:
Dim varArray As Variant
varArray = Split("Data 1998 1999 2000 2001 2002 2003 2004 2005 2006", " ")
ActiveSheet.Range(Cells(1, 1), Cells(1, UBound(varArray))).Value = varArray