Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.10.2025 19:08:54
Verbindung von Excel mit maps
14.10.2025 15:55:14
wenn zwei Werte aus Liste übereinstimmen, dann wahr
14.10.2025 14:57:29
Wenn Datum in Ferienzeit dann Name angeben
14.10.2025 09:39:44
VBA - Excel speichern und schließen (Laufzeitfehler 91)
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
1180to1184
1180to1184
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Daten exportieren

Forumthread: Daten exportieren

Daten exportieren
Peter
Hallo,
ich würde gerne die Ergebnisse beider Textboxen nach Excel exportieren.
Option Explicit 
Private Sub Command1_Click()
Do
Text2.Text = Text1.Text
Text1.Text = Text1.Text + 1
Loop Until Text2.Text = 10
End Sub

Kann mir jemand sagen wie ich sowas anstelle?
Anzeige

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

Betreff
Benutzer
Anzeige
AW: Daten exportieren
07.10.2010 11:58:54
abu
Hallo Peter,
probier das mal:
With Sheets("Tabelle1")
.Cells(1,1) = Text1.Text ---> =Zelle A1
.Cells(1,2) = Text2.Text ---> =Zelle A2
End With
Gruss
Abu
AW: Daten exportieren
07.10.2010 17:40:14
Peter
Wenn ich das so mache, kommt immer die Fehlermeldung:
Sub oder Function nicht definiert
Und die Zeile With Sheets wird markiert.
Was geht da?
Anzeige
AW: Daten exportieren
07.10.2010 12:12:42
welga
Hallo,
Private Sub Command1_Click()
For i = 1 To 10
TextBox1 = i
TextBox2 = TextBox1
ThisWorkbook.Sheets(2).Cells(i, 1).Value = TextBox2
Next i
End Sub

Gruß
AW: Daten exportieren
08.10.2010 14:04:55
Peter
Hallo Welga,
danke für den Code. Aber wie muss ich die Variable ThisWorkbook.Sheets definieren damit es funktioniert?
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