Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
692to696
692to696
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Text-Datei in ein vorhandenes Tabellenblatt

Forumthread: Text-Datei in ein vorhandenes Tabellenblatt

Text-Datei in ein vorhandenes Tabellenblatt
08.11.2005 22:41:09
Babs
Guten abend,
könnte mir vielleicht einer helfen? Ich wäre sehr dankbar darüber.
Ich möchte in einer geöffneten Excel-Datei eine Text-Datei in ein vorhandenes Tabellenblatt einlesen. Der Dateiname der Textdatei soll selbst ausgesucht werden. Wenn es geht, dann per VBA. Wenn ich es probiere, dann öffnet sich immer eine komplett neue Datei. Als Trennzeichen ist ein = Zeichen zu verwenden. Vielen Dank.
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Text-Datei in ein vorhandenes Tabellenblatt
09.11.2005 09:21:19
Harald
Moin Babs,
ungetestet aus der empfehlenswerten Excel-CD von Herber rauskopiert
Die in Zelle P1 genannte Textdatei soll importiert werden.

Sub TextImport()
Dim iRow As Integer, iCol As Integer
Dim sFile As String, sTxt As String
sFile = Range("P1").Value
If Dir(sFile) = "" Then
Beep
MsgBox "Datei wurde nicht gefunden!"
Exit Sub
End If
iRow = 1
iCol = 1
Close
Open sFile For Input As #1
Do Until EOF(1)
Line Input #1, sTxt
Do While InStr(sTxt, "=")
Cells(iRow, iCol).Value = Left(sTxt, InStr(sTxt, "=") - 1)
sTxt = Right(sTxt, Len(sTxt) - InStr(sTxt, "="))
iCol = iCol + 1
Loop
Cells(iRow, iCol).Value = sTxt
iRow = iRow + 1
iCol = 1
Loop
Close
End Sub

Gruss Harald
Anzeige
;

Forumthreads zu verwandten Themen

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
Zellengröße automatisch anpassen
DockM@ster

Hallo,
über ein Tabellenblatt hole ich mir mit der Funktion "sverweis" die Daten. Dabei gibt es auch ein Feld "Langtext". Hier möchte ich, dass sich die Zelle automatisch an den Text anpasst. Mit den normalen Formatierungsfunktionen geht es nicht. Hat dazu jemand eine Lösung (VBA)?
Dock...
06.11.2008 19:55:00
Thread-ID: 1022412
8 Beiträge
wirkllich AUTOMATISCHE Zeilenhöhe bei langem Texti
Christian

Hallo Forum,
habe im Archiv gesucht, aber keine schlüssige Antwort gefunden... daher meine Frage:
in einem Arbeitsblatt mit nicht verbundenen Zelle steht in einigen Zellen Text der deutlich länger ist als die Zeilenbreite. Daher habe ich den Zeilenumbruch (für die gesamte Spalte in der...
07.01.2009 15:43:00
Thread-ID: 1037580
8 Beiträge
Zelleninhalte verschieben, dann Zeilen löschen?
Selma

Hallo Leute,
wenn...
in Zelle der Spalte E dies "Applikation"
in Zelle der Spalte F dies "Version"
in Zelle der Spalte G dies "Computername"
in Zelle der Spalte H dies "Zuletzt genutzt am"
steht,
dann möchte ich die Zelleninhalte von Spalte A bis Spalte D eine Zei...
06.03.2009 19:02:21
Thread-ID: 1057433
6 Beiträge
Zellinhalt rechts von benannter Zeile abfragen
benannter

Guten Abend
Ich verschiedenen Tabellen hat es benannte Zellen. Rechts von diesen Zellen steht manchmal eine gerade Zahl. Nun möchte ich mit einer Funktion, der ich den String des Namens übergebe, die positive gerade Zahl zwischen 1 und 20 zurückerhalten, falls eine solche in der Zelle recht...
14.03.2009 22:27:08
Thread-ID: 1060299
3 Beiträge
Texte aus anderem Tabellenblatt kopieren
Stefan

Hallo zusammen,
in einer Tabelle habe ich mir im Tabellenblatt 'Umwandeln' für verschiedene Textmanipulationen Formeln eingerichtet. Die Texte, die verändert werden sollen (Artikelbezeichungen) bekomme ich in Form einer Exceltabelle und ich ziehe mir das Tabellenblatt 'Artikel' als neues Ta...
22.04.2009 23:35:00
Thread-ID: 1070529
3 Beiträge
Zeilen- und Spaltenbreite in cm
Hartwig

Hallo Leute,
ich habe untenstehendes Makro mal von einem guten Helfer im Forum bekommen.
Ich weiß aber nicht mehr von wem. Nun weichen die Ergebnisse aber von der Eingabe ab.
Wenn ich z.B. 3,00 cm Spaltenbreite eingebe, erhalte ich 2,80 cm, bei 3,00 cm Zeilenhöhe
erhalte ich 3,3...
29.04.2009 09:49:17
Thread-ID: 1071787
4 Beiträge
Zellengröße automatisch anpassen
Ralf

Hallo Excel - Experten,
ich hole mir per sverweis aus einem anderen Tabellenblatt
unterschiedlich langen Text und möchte ihn dann ausdrucken.
Wie kann ich z.B. Zelle Z 5 automatisch so anpassen, daß mir
Excel immer den kompletten Text anzeigt, die Zelle also
vergrößert...
17.07.2009 10:56:33
Thread-ID: 1089311
7 Beiträge
Summe, in Abhängigkeit vom Inhalt anderer Zeilen
Oliver

Hi,
ich will eine Summe aus einer Zeile bekommen, aber es soll nur in die Summe eingehen wenn in der Zeile daneben etwas drin steht.
Habt ihr da Tipps?
Danke
Olli
18.07.2009 17:28:51
Thread-ID: 1089661
4 Beiträge
Anzeige
Tabellenblattreiter lässt sich nicht ändern | Herbers Excel-Forum
Josef_T
Guten Tag zusammen,
ich kann in keiner! Tabelle mehr den Tabellenblattreiter bearbeiten. Egal ob ich mit der linken
oder rechten Maustaste darauf klicke, aktiviere ich nur immer das ganze Blatt.
kann mir bitte jemand einen Tipp geben, wie ich meine Tabellenblattreiter wieder editieren...
23.01.2010 20:19:29
Thread-ID: 1132376
6 Beiträge
Zellgröße automatisch an Textlänge anpassen?
Martin

Hallo liebe Herber-Gemeinde,
gibt es eine Möglichkeit die Zellgröße in Excel automatisch an den darin vorhandenen Text anzupassen, ohne dass der Text dabei verkleinert wird?
Die fragliche Zelle wird mittels einer Formel mit Text aus einem anderen Tabellenblatt befüllt, der von Monat zu...
02.06.2010 12:11:47
Thread-ID: 1159990
6 Beiträge
Zeilen automatisch einfügen Druckbereich anpassen
andreas

Hallo zusammen,
habe hier eine Anwendung bei der unterschiedlich viele Positionen vorkommen. In Tabelle1 werden die Positionen angelegt, in AN sollen diese zum Druck generiert werden. Sind mehr als vier Positionen hat nicht mehr alles auf einer Seite Platz. Jetzt sollen wenn mehrere Positio...
15.06.2010 20:03:35
Thread-ID: 1161890
3 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige