Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
896to900
896to900
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Text aus Zeilen auf einzelne Seiten

Forumthread: Text aus Zeilen auf einzelne Seiten

Text aus Zeilen auf einzelne Seiten
14.08.2007 11:58:48
Melanie
Hallo Ihr Lieben,
ich habe eine 600-Zeilen Tabelle, bei der ich den Text aus jeder Zeile auf ein einzelnes Blatt ausdrucken muß. Dazu muß aber noch anderer Text und Grafiken, die ich dann dazufüge.
Das ist, wenn man es kann, bestimmt ganz einfach, ich muß das heute abgeben und bin der Verzweiflung nahe!
Danke für Tips! Beste Grüße Mel

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Text aus Zeilen auf einzelne Seiten
14.08.2007 12:01:00
Rudi
Hallo,
du willst also eine Mappe mit 600 Tabellen erzeugen?
Gruß
Rudi
Eine Kuh macht Muh, viele Kühe machen Mühe

AW: Text aus Zeilen auf einzelne Seiten
14.08.2007 12:05:23
Ramses
Hallo
das musst du schon genauer beschreiben ?
Was heisst das:
"..anderer Text und Grafiken, die ich dann dazufüge...."
Ist das für jede Zeile das gleiche oder unterschiedlich ?
Wieviele Zellen sind in der Zeile die ausgedruckt werden müssen
Gruss Rainer

Anzeige
AW: Text aus Zeilen auf einzelne Seiten
14.08.2007 12:40:00
Melanie
ich muß aus jeder Zeile ein einzelnes Dokument machen...
ich versuche es gerade als serienbrief, mal seheh, ob es gelingt...
wünscht mir glück!

AW: Text aus Zeilen auf einzelne Seiten
14.08.2007 13:29:53
Chaos
Servus Melanie,
so mal auf die Schnelle:

Sub sechshundert()
Dim zeile As Long, zähler As Long
Dim strpfad
Dim nam As String
nam1 = ThisWorkbook.Name
strpfad = "C:\Dokumente und Einstellungen\Christian\Desktop\600" ' Hier der Pfad, wo es hin  _
soll, muss bis Desktop schon bestehen
If Dir(strpfad, vbDirectory) = "" Then
MkDir strpfad
End If
zähler = 1
For zeile = 1 To 600 Step 1
Workbooks.Add
nam = ActiveWorkbook.Name
With Workbooks(nam1).Sheets(1)
.Cells(zeile, 1).EntireRow.Copy Destination:=Workbooks(nam).Sheets(1).Range("A1")
End With
Workbooks(nam).SaveAs Filename:=strpfad & "\" & zähler & ".xls"
ActiveWorkbook.Close
zähler = zähler + 1
Next zeile
End Sub


Legt einen Ordner neu an.
Macht aus deinen 600 zeilen 600 einzelne Arbeitsmappen und nennt sie nach der Zeile und speichert sie im neuen Ordner, damit sie nicht verloren gehen.
Alles aus Sheet(1) der Quelle nach Sheet(1) des ziels in die erste zeile.
Vielleicht hilft's ja.
Gruß
Chaos

Anzeige
;

Forumthreads zu verwandten Themen

Inhalt einer Zelle im Windows Infobereich anzeigen
Thomas

Hallo,
kann ich den Inhalt einer Zelle im Windows Infobereich anzeigen lassen?
Ich habe eine VBA-Anwendung, die mir den Verarbeitungsstatus in einer Zelle anzeigt.
Weil die Verarbeitung sehr lange dauert möchte ich zwischendurch mit anderen Anwendungen arbeiten und unten rechts nebe...
27.08.2008 17:50:23
Thread-ID: 1005163
3 Beiträge
Textinhalte aus Zellen zusammenkopieren
zehetner

Liebe Profis,
ich habe die Ergebnisse einer Befragung in ein Excel-Sheet eingegeben, jeder Befragte in ein Registerblatt. Nun möchte ich die Antworten der Befragten, die in Textfeldern (immer in den selben, zB E145 stehen) gesammelt in eine neue Tabelle bringen.
Ziel ist es, die Antwort...
21.09.2008 18:29:25
Thread-ID: 1011343
2 Beiträge
Text (Datum) aus Zeile mit Zeilenbruch auslesen
Iro

Hallo,
ih habe folgendes Problem: ich muss aus einem vorgegebenen Sheet einen bestimmten Zinssatz zu einem bestimmten (Jahr / Monat) auslesen.
1. Problem: das vorgegebene, gesuchte Datum hat das Format TT.MM.JJJJ, das andere Datum, mit dem ich es vergleichen muss wird mit "Monat Jahr"....
01.10.2008 23:00:06
Thread-ID: 1013778
4 Beiträge
Text aus einer Zelle in ein anderes Tabellenblatt
grigolet

Hallo,
ich erstelle gerade eine Arbeitsmappe in der auf verschiedenen Tabellenblättern die gleichen Namen erscheinen sollen (aus dem Blatt 'Verhandlungsergebnis' sollen die Personendaten der Beteiligten in ein erstelltes Vertragsformular übernommen werden). Ich habe das z.B. mit = gelöst. J...
09.10.2008 11:24:26
Thread-ID: 1015295
2 Beiträge
Inhalt einer Zelle in anderer Zelle als Formel
Elias

Guten Morgen,
ich bin auf der Suche nach einer Lösung für folgenden Sachverhalt.
In einer Tabelle wird aus dem Inhalt verschiedener Zellen über Verketten eine Zeichenfolge gebildet, die in einer anderen Tabelle als Formel herhalten soll.
(Kurzes) Beispiel, das Original ist furchtbar...
11.01.2009 06:01:22
Thread-ID: 1038572
6 Beiträge
Anzeige
Text in Fußzeile aus Zelle ziehen
Sandra

Hallo zusammen!
Ich brauche mal wieder Eure Hilfe.
Meine Exceltabelle (ein Protokoll) soll im linken Teil der Fußzeile einen Text bekommen, der automatisch aus einer Zelle gezogen wird. So das sich die Fußzeile immer aktualisiert, wenn die Zelle geändert wird. Mit einer Formel geht es j...
29.01.2009 11:29:24
Thread-ID: 1044904
23 Beiträge
Zufällig einen Text ausgeben aus best. Zellen
Eddie

Hallo und Guten Abend.... habe mal wieder ein Problem...
Ich will gerne aus einer Anzahl von zellen (ca 100 Zeilen) .. wo bestimmte Sätze drin stehen diese Zufällig in einer Bestimmten zelle anzeigen lassen ....
Vielleicht hat ja jemand schon sowas gemacht ?
thx schon einmal
G...
15.02.2009 20:14:00
Thread-ID: 1050974
7 Beiträge
Anzeige
Inhalt einer Zelle in mehrere Zellen aufsplitten
Joerschi

Hallo liebe Excel-Community,
ich möchte den Inhalt einer Zelle (getrennt durch Leerzeichen) in andere Zellen aufsplitten bzw. in anderen Zellen getrennt anzeigen lassen. Die Leerzeichen aus der Herkunftszelle sollen dabei ignoriert werden.
Z. B. steht in Zelle A1: "1 2 3 4 5"
Jetzt...
04.03.2009 11:46:03
Thread-ID: 1056268
9 Beiträge
Bestimmten Inhalt einer Zelle in Textbox
Mone

Hallo Ihr Experten!
Ich bin am Verzweifeln....suche nach einer Möglichkeit mit VBA aus einer Zelle (A6) einen Teil aus dieser Zelle in eine Textbox zu manövrieren. Also in A6 steht z.B. 1234 Musterstadt. Ich muss nun die PLZ in eine separate Textbox einlesen als auch den Ort. Habe da mittel...
04.03.2009 23:39:53
Thread-ID: 1056628
4 Beiträge
Zugriff auf auf Teilinhalte einer Zelle
Der

Hallo da Draußen!
Habe mal wieder ein Problem mit meiner VBA Programmierung. Ich möchte innerhalb einer Exceltabelle auf einzelne Zellen zugreifen, die ein bestimmtes Merkmal haben. Der Inhalt der Zelle beginnt mit einer Zahl (in diesem fall mit einer Postleitzahl). Ich möchte also meine Ab...
20.03.2009 14:52:09
Thread-ID: 1062230
5 Beiträge
Teilinhalte aus Zellen löschen
Der

Hallo da draußen,
ich möchte aus einer Zelle die ersten x Zeichen von links löschen und die Restlichen beibehalten. Mit dem Befehl left(cells(R,C),x) kann ich auf diese Zeichen zugreifen und sie auch auslesen. Wie kann ich sie nun löschen?
Danke für Eure Hilfe!
Grüße aus der Hauptst...
25.03.2009 15:20:24
Thread-ID: 1063841
9 Beiträge
'Inhalt'/Typ einer Zelle bestimmen
TommiH

Hallöchen,
gibt es eine einfache Methode bei einer Zelle zu bestimmen, ob der Inhalt eine Zahl ist oder nicht?
Ich habe eine Zelle über die ich nicht weiss was drin steht, aber wenn eine Zahl drin steht, muss diese um 1 erhöht und einer anderen Zelle zugewiesen werde. Wenn es keine Zahl...
27.03.2009 14:17:52
Thread-ID: 1064625
8 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige