Hilfe gesucht :: Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office

Einloggen, um private Nachrichten zu lesen

Downloads

[Excel 2000] Hilfe gesucht

Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office Foren-Übersicht » Microsoft Excel Hilfe

Autor

Nachricht

manuela6776
Newbie
Newbie

Anmeldedatum: 08.07.2008
Beiträge: 15

Verfasst am: 23.07.2008, 23:31

ich habe da mal eine dringende Frage. ich habe sehr viele nummern in einem word dokument ( es sind 23.000 Nummern) diese sind alle durch ein Komma getrennt.

diese möchte ich alle auf einmal in eine excel abelle einfügen, diese sollten aber in der excel Tabelle alle untereinander stehen jede nummer in einem Kästchen also zb unter A1 und dann fortlaufend 1,2,3,4 usw.

kann mir jemandsagen, wie ich das machen kann.

MfG Confused

schatzi
Moderator

Anmeldedatum: 09.12.2006
Beiträge: 5715

Verfasst am: 27.07.2008, 12:31

Hallo!

Wenn du die Daten in Excel importierst, dann stehen sie alle in A1?
Dann wähle Menü Daten > Text in Spalten und lege das Komma als Trenner fest.
Nun sollten alle Nummern nebeneinander in Spalten aufgeteilt sein.
Kopiere diese Zellen in die Zwischenablage und wähle Menü Bearbeiten > Inhalte einfügen > Transponieren.
Nun sollten die Daten untereinander stehen.

_________________

Viele Grüße vom Schatzi
------------------------
Ich bin nur noch sporadisch erreichbar!
Bitte hofft nicht auf eine schnelle Beantwortung einer Rückfrage meinerseits!
Jeder andere Helfer darf Rückfragen gerne übernehmen!

miriki
Schlauberger

Anmeldedatum: 05.03.2007
Beiträge: 336
Wohnort: Kiel

Verfasst am: 28.07.2008, 09:43

schatzi hat Folgendes geschrieben:

Dann wähle Menü Daten > Text in Spalten und lege das Komma als Trenner fest.

Das dürfte bei 23.000 Zahlen und Excel2k mit 256 Spalten schwierig werden, oder?

Gruß, Michael

schatzi
Moderator

Anmeldedatum: 09.12.2006
Beiträge: 5715

Verfasst am: 28.07.2008, 10:08

Uuups!!!
Ja, da liegen wir dann doch knapp drüber...

Dann bleibt wohl nur VBA:
Die Nummernkette ist in A1; die Ausgabe erfolgt ab A2 abwärts:

Code:

Sub test()
Dim Arr, Ausgabe As Range
Arr = Split(Range("A1"), ",")
Set Ausgabe = Range("A2").Resize(UBound(Arr), 1)
Ausgabe.NumberFormat = "@" 'für führende Nullen
Ausgabe = WorksheetFunction.Transpose(Arr)
End Sub

schatzi
Moderator

Anmeldedatum: 09.12.2006
Beiträge: 5715

Verfasst am: 28.07.2008, 10:14

Oder auch etwas umständlicher per Formeln:
Nummernkette in A1.
Diese Formel in A2: =LINKS(A1;FINDEN(",";A1)-1)
Diese Formel in A3 und runterkopieren:
=TEIL(A$1;FINDEN("#";WECHSELN(A$1;",";"#";ZEILE(A1)))+1;FINDEN("#";WECHSELN(A$1;",";"#";ZEILE(A2)))-FINDEN("#";WECHSELN(A$1;",";"#";ZEILE(A1)))-1)

Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office Foren-Übersicht » Microsoft Excel Hilfe

Thema		Autor	Forum	Antworten	Verfasst am
Ähnliche Beiträge
	Hilfe!!Lieferscheine über Excel	sevinunu	Microsoft Excel Hilfe	0	07.10.2008, 17:04
	WENN Formel gesucht	Natascha303	Microsoft Excel Hilfe	1	03.10.2008, 11:15
	Brauche dringend Hilfe mit meinem Bla...	feanny	Microsoft Excel Hilfe	0	28.09.2008, 14:12
	Hilfe! Wie funktioniert das mit der A...	Dominik Bortz	Microsoft Outlook Hilfe	0	21.09.2008, 17:12
	Wenn Funktion Hilfe	RulOrphant	Microsoft Excel Hilfe	4	17.09.2008, 19:38

Gehe zu:

Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum posten
Du kannst Dateien in diesem Forum herunterladen

Powered by phpBB © 2001, 2002 phpBB Group :: FI Theme :: Alle Zeiten sind GMT + 1 Stunde
Deutsche Übersetzung von phpBB.de