Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
248to252
248to252
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Wörter aus Spalte in einem fixen Textblock einfüge

Wörter aus Spalte in einem fixen Textblock einfüge
23.04.2003 22:54:21
Christian
Hallo zusammen !
Vielleicht ist das hier eine Anfängerfrage, aber
ich wäre sehr froh, wenn Ihr mir bei folgendem
Problem helfen könnt.

Auf einem Tabellenblatt habe ich eine (variierende)
Anzahl von Zelleninhalten in nur einer Spalte.
z.B.:

Eintrag1
Eintrag2
Eintrag3
...

Nun möchte ich gerne, dass der Reihe nach diese Zellinhalte
kopiert werden und in einem anderen Tabellenblatt in folgende
Textmatrix (Bestehend aus 2 Spalten, 6 Zeilen) einge-
tragen werden.
So sieht die Textmatrix im Rohformat aus:
(Aus Formatgründen untereinander geschrieben)

_________Spalte1:

Zeile01: FixerText
Zeile02: -leer-
Zeile03: -leer-
Zeile04: -leer-
Zeile05: -leer-
Zeile06: FixerText

_________Spalte2:

Zeile01: -leer-
Zeile02: FixerText ( ??? )
Zeile03: FixerText
Zeile04: FixerText
Zeile05: FixerText ( "???" )
Zeile06: -leer-

(Diese Textmatrix soll immer wieder unter die vorher-
gehende kopiert werden und an den Stellen mit den ??? sollen
dann die einzelnen, oben beschriebenen Einträge jeweils
hineinkopiert werden. - Bis auf die Stellen mit den drei Fragezeichen bleibt der sonstige Text immer fix.
Nach dem Eintrag des letzten Wortes soll das Makro beendet
sein.)

z.B.:

_________Spalte1:

Zeile01: FixerText
Zeile02: -leer-
Zeile03: -leer-
Zeile04: -leer-
Zeile05: -leer-
Zeile06: FixerText

_________Spalte2:

Zeile01: -leer-
Zeile02: FixerText ( Eintrag1 )
Zeile03: FixerText
Zeile04: FixerText
Zeile05: FixerText ( "Eintrag1" )
Zeile06: -leer-


_________Spalte1:

Zeile07: FixerText
Zeile08: -leer-
Zeile09: -leer-
Zeile10: -leer-
Zeile11: -leer-
Zeile12: FixerText

_________Spalte2:

Zeile07: -leer-
Zeile08: FixerText ( Eintrag2 )
Zeile09: FixerText
Zeile10: FixerText
Zeile11: FixerText ( "Eintrag2" )
Zeile12: -leer-

usw...

Könnt Ihr mir bitte helfen ???
Wäre ganz schön dankbar, da es sich um bis zu 1000 Einträge
handelt.

Schöne Grüsse
Christian


2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Wörter aus Spalte in einem fixen Textblock einfüge
24.04.2003 06:38:47
Willie

du kannst die entprechenden Texte direkt im Makro mit geben
und die entsprechenden Variablen einfügen lassen.

z.B:

dim mytext as string
mytext = "Hier ist mein fixer Text, dann kommt " & Variable1 & " weiter mit dem nächsten Teil " & Variable2 & " einen Zeilenumbruch, wenn nötig mit " & chr(10) & _
" Bis mein Text fertig ist!"

oder, wenn du es in eine Zelle bringe willst mit:
=A1 & " " & A2 & " " & A3 & " " & A4 & " " & A5 & " " & A6

Gruß

Willie

Re: Wörter aus Spalte in einem fixen Textblock einfüge
26.04.2003 19:30:08
Christian

Hallo Willie !

Erst einmal vielen Dank für Deinen Beitrag.

Hab´s auf Excell versucht, kenn mich aber in Macroprogrammierung
(speziell VB / VBS) nicht aus.
Lediglich Grundkenntnisse in C und C++ vorhanden.

Inzwischen hab ich mir eine kleine Konsolen-Anwendung auf
C++ geschrieben, die das Problem löst.
(Aus Datei Strings auslesen, Strings sammt Fixtext als neue
Textdatei speichern - Und das Ganze wiederholen, bis jeder
String der Quelldatei komplett ausgelesen und verarbeitet wurde.)

Trotzdem nochmals herzlichen Dank !
Falls Du möchtest kannst Du ja trotzdem ein Makro für Excell
posten das dieses Problem löst. - Mann lernt ja nie aus.

Grüsse,
Christian

Anzeige

363 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige