Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.10.2025 21:57:06
Diagrammpunkte in unterschiedlichen Farben je nach Wert
19.10.2025 18:21:56
Prüfen, ob Bild geladen wurde
19.10.2025 15:24:14
VBA -Drucken nur, wenn ich mit bestimmtem WLAN verbunden bin
19.10.2025 10:48:58
Zufällige Uhrzeit
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
396to400
396to400
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Textbox in bestimmte Zelle übertragen

Forumthread: Textbox in bestimmte Zelle übertragen

Textbox in bestimmte Zelle übertragen
12.03.2004 02:57:13
Klaus
Hallo Excel-Profis!
Für Euch sicherlich trivial - für mich als VBA Anfänger ne große Hürde!

Ich bin grad am rumspielen und möchte den Text den ich über eine Userform in eine Textbox geschrieben habe in eine bestimmte Zelle schreiben lassen.
TextBox1.Text=Range("B5").Value
wie ich es im Forum gefunden habe funktioniert so aber nicht!
Es ist bestimmt ne KLeinigkeit aber für einen Anfänger wie mich ein Problem.
Wie bereits erwähnt, ist nur ne kleine Spielerei zum üben!
Danke bereits im Voraus!
Klaus
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Textbox in bestimmte Zelle übertragen
12.03.2004 03:02:41
Hans W. Herber
Hallo Klaus,
Dein Code macht genau das umgekehrte. Also in Deinem Fall:
Range("B5").Value = TextBox1.Text
Wenn es sich um einen Zahlenwert handelt:
Range("B5").Value = Cdbl(TextBox1.Text)
Wenn es sich um ein Datum handelt:
Range("B5").Value = Cdate(TextBox1.Text)
gruss hans
Anzeige
Klasse!
12.03.2004 03:10:10
Klaus
Hallo Hans!
Vielen Dank für die schnelle Rückmeldung! Auf Dich ist halt Verlass!
Gruß
Klaus
;

Forumthreads zu verwandten Themen

Userform Textboxinhalte in Zellen schreiben
Gerd

Guten Tag zusammen!
Bitte helft mir bei folgendem Problem:
In einer Userform habe ich eine ganze Reihe Textboxen, in die zum größten Teil Zahlen eingegeben werden.
Nun ist ja bekannt, dass beim Schreiben in Zellen der Inhalt der Textboxen als Text interpretiert wird. Mit der Anweisu...
11.08.2008 14:33:59
Thread-ID: 1000866
3 Beiträge
Anzeige
Userform Textboxinhalte in Zellen schreiben
Gerd

Guten Tag zusammen!
Bitte helft mir bei folgendem Problem:
In einer Userform habe ich eine ganze Reihe Textboxen, in die zum größten Teil Zahlen eingegeben werden.
Nun ist ja bekannt, dass beim Schreiben in Zellen der Inhalt der Textboxen als Text interpretiert wird. Mit der Anweisu...
11.08.2008 14:34:08
Thread-ID: 1000867
5 Beiträge
Mit VBA In Zelle Excelformel schreiben
Gho-Reg

Hi Leute
Ich habe hier diesen netten VBA Code geschrieben und leider wie solls auch anders sein kommt dauernd eine Fehlermeldung :)
CODE:
rowbeforeinteger = 2
Dim text As String
text = "=IF(" & epsoldcolumn & rowbeforeinteger & "=""x"";1;0)+IF(" & emailsoldco...
25.08.2008 11:08:33
Thread-ID: 1004403
6 Beiträge
Textbox Werte in Zellen schreiben
pritt

Hallo zusammen, ich komme nicht so richtig klar: Ich habe eine Userform mit 4 Textboxen, die zu Laufzeit vom User mit Werten gefüllt werden. Wenn alle 4 Textboxen gefüllt sind, sollen diese Werte in 4 verschiedene Zellen eines Tabellenblatts geschrieben werden. Folgenden Code habe ich bisher er...
13.11.2008 12:59:19
Thread-ID: 1024171
7 Beiträge
Eintrag aus Textfeld in zelle übernehmen wenn leer
Benni

hallo,
kann mir jemand helfen, ich kenne mich mit VBA nicht wirklich gut aus.
ich möchte die Eingabe in einem Textfeld auf einer UserForm in eine Zelle auf dem Worksheets "Werte" übertragen. Problem bei der Sache ist, dass z.B. ich bei der Zelle A1 Anfange und wenn dort schon ein „Inhal...
24.06.2009 09:05:21
Thread-ID: 1083991
14 Beiträge
Formel per VBA in Zelle schreiben
einfachf

Hallo Zusammen,
ich habe folgendes Problem
Vielleicht kann mir ja jemand helfen.
Ich prüfe in welcher Zelle der letzte Wert steht mit
CellCount = Cells(65536, 23).End(xlUp).Row
Nun möchte ich in sagen wir mal Cells(CellCount, 21) die Formel eintragen
Summe aus Cells(Cel...
20.02.2010 14:24:22
Thread-ID: 1139917
7 Beiträge
Anzeige
Wert aus letzter Zelle einer Spalte übernehmen
A.

Moin zusammen !
ich habe eine Arbeitsmappe mit mehreren Arbeitsblättern. In die ersten Blätter werden Werte aus immer wieder ändernden CSV Dateien eingelesen. Die Werte in den CSV sollen per Diagramm analysiert werden. Die Übernahme der Werte und das Diagramm funktionieren. Bloss werden die...
09.12.2010 10:14:19
Thread-ID: 1190753
4 Beiträge
Textteil aus einer Textbox in Zelle schreiben
kle

Hallo,
...ich weiß, für Euch sicher einfach, aber ich komm heut einfach nicht richtig dahinter. Ich habe eine Textbox in einer Userform, in der der QUelltext einer Homepage angezeigt wird.
Nun möchte ich gern per Button-Klick, dass aber nur ein bestimmter Bereich ausgelesen und in die Z...
02.02.2011 16:00:17
Thread-ID: 1198647
2 Beiträge
VBA Anzahl in Zelle C18 schreiben/ einfrieren
Marcy

Hallo Forum,
mit unterem Code entferne ich meine doppelten Einträge in Spalte A ab Zeile 25.
Funktioniert auch.
Jetzt hätte ich allerdings gerne mindestens eine Erweiterung:
In Zelle C18, soll vor dem Löschen die Anzahl der gefüllten Zellen (handelt sich um Zahlen) eingetragen w...
27.10.2011 08:24:59
Thread-ID: 1235504
3 Beiträge
Anzeige
Wert aus Zelle in InputBox übernehmen
rieckmann

Hallo,
ich möchte beim öffnen einer InputBox die Werte der Zelle L1 in das Eingabefeld der InputBox als Vorgabe übernehmen.
Wie geht das ?
Hier mein Code.
Leider kommt auch immer noch ein Fehler wenn man auf "Abbrechen" klickt.
Kann man den abfangen ?
Sub Schaltfläche3_K...
23.04.2012 16:17:50
Thread-ID: 1260642
5 Beiträge
Anzeige
Errechneten mit vba in Zelle schreiben
TripleX

Guten Morgen zusammen,
wie ist die richtige Schreibweise, um einen errechneten Integerwert mit Hilfe von vba z.B. in die Zelle "C4" zu schreiben? Grüße
29.06.2014 11:11:27
Thread-ID: 1367951
4 Beiträge
VBA für Formel in Zelle schreiben und ausfüllen
urs
Hallo zusammen
Ich habe mit dem Makrorekorder versucht diese Formel
=WENN(A2grösser0;VERKETTEN(C2;D2);"") in Zelle K2 zu schreiben und von dort bis zur letzten Zeile mit A grösser 0 zu kopieren.
Die Aufzeichnung hat
ActiveCell.FormulaR1C1 = "=IF(A2grösser0,CONTENATE(C2,D2),""...
03.10.2014 13:26:11
Thread-ID: 1384667
5 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Infobox / Tutorial

Textbox in bestimmte Zelle übertragen

Schritt-für-Schritt-Anleitung

  1. Excel Userform erstellen:

    • Öffne Excel und gehe in den VBA-Editor (Alt + F11).
    • Füge eine Userform hinzu (Rechtsklick im Projektfenster > Einfügen > Userform).
    • Füge eine Textbox (Textbox1) und einen Button (CommandButton1) hinzu.

  2. Code zum Übertragen des Wertes:

    • Doppelklicke auf den Button und füge folgenden Code ein: 
      Private Sub CommandButton1_Click()
Range("B5").Value = TextBox1.Text
End Sub

  3. Textbox in Zelle schreiben:

    • Jetzt kannst du den Text, den du in die Textbox eingegeben hast, in die Zelle B5 übertragen, indem du auf den Button klickst.

  4. Zahlen oder Datum verarbeiten:

    • Falls du sicherstellen möchtest, dass der Wert als Zahl oder Datum in die Zelle geschrieben wird, kannst du den Code anpassen: 
      Private Sub CommandButton1_Click()
If IsDate(TextBox1.Text) Then
   Range("B5").Value = CDate(TextBox1.Text)
ElseIf IsNumeric(TextBox1.Text) Then
   Range("B5").Value = CDbl(TextBox1.Text)
Else
   Range("B5").Value = TextBox1.Text
End If
End Sub

Häufige Fehler und Lösungen

  • Fehler: „Typ nicht übereinstimmend“:

    • Stelle sicher, dass die Eingabe in der Textbox dem entsprechenden Datentyp entspricht (Zahl oder Datum).

  • Fehler: Textbox bleibt leer:

    • Überprüfe, ob der Button-Click-Event korrekt verbunden ist und der Code in der richtigen Sub steht.

  • Tipp: Wenn du den Wert aus einer Zelle in die Textbox übernehmen möchtest, kannst du den folgenden Code verwenden:

    Private Sub UserForm_Initialize()
  TextBox1.Text = Range("B5").Value
End Sub

Alternative Methoden

  • Direktes Einfügen einer Textbox:

    • In Excel kannst du auch eine Textbox direkt auf dem Arbeitsblatt einfügen (Entwicklertools > Einfügen > Textbox).

  • Formel verwenden:

    • Du kannst auch Formeln verwenden, um Werte zwischen Zellen zu übertragen, aber dies ist nicht so flexibel wie VBA.

Praktische Beispiele

  1. Einfaches Beispiel:

    • Du hast eine Userform mit einer Textbox, in die der Benutzer einen Namen eingeben kann. Dieser Name wird dann in die Zelle A1 geschrieben: 
      Private Sub CommandButton1_Click()
Range("A1").Value = TextBox1.Text
End Sub

  2. Erweiterte Nutzung:

    • Erstelle eine Liste von Werten in einer Userform und lasse die Auswahl in eine Zelle übertragen, indem du eine ComboBox verwendest.

Tipps für Profis

  • Verwende Fehlerbehandlung:

    • Implementiere Fehlerbehandlungsroutinen in deinem VBA-Code, um unerwartete Eingaben abzufangen. 
      On Error GoTo ErrorHandler
' Dein Code hier
Exit Sub
ErrorHandler:
MsgBox "Bitte überprüfen Sie Ihre Eingabe."

  • Benutzerfreundlichkeit erhöhen:

    • Füge Beschriftungen und Anweisungen in deiner Userform hinzu, um die Benutzererfahrung zu verbessern.

FAQ: Häufige Fragen

1. Wie kann ich den Wert aus einer Zelle in die Textbox übernehmen?
Du kannst den folgenden Code in das UserForm_Initialize-Ereignis einfügen:

TextBox1.Text = Range("B5").Value

2. Kann ich auch mehrere Textboxen verwenden?
Ja, du kannst mehrere Textboxen erstellen und mit ähnlichem Code mehrere Zellen gleichzeitig füllen oder aus ihnen lesen.

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