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

Textbox Inhalt übertragen und mit Zelle verknüpfen

Textbox Inhalt übertragen und mit Zelle verknüpfen
15.11.2005 15:17:16
Karl-Heinz
Hallo,
wieder ein Problem. Ich hab's selber versucht. Soll ja üben. Aber komm nicht weiter.
1. Die in eine Textbox (im Tabellenblatt) eingegebene Zahl soll über CommandButton_Click1 in eine Zelle (hier: a1) des Tabellenblattes als Prozentwert für weitere Rechenoperationen übertragen werden.
Dass mach ich im Moment mit:

Private Sub CommandButton1_click()
Range("a1") = CDbl(Textbox1) / 100
End Sub

2. Es soll es aber auch die Möglichkeit bestehen, wenn der Prozentsatz in der Zelle a1 direkt geändert wird, dass dieser neue Wert automatisch in die Textbox1 übertragen wird und der Eintrag überschrieben wird. Also wechselseitige Korrekturmöglichkeiten.
Ich hab es mit LinkedCell versucht, aber irgendetwas klappt dann mit der Formatierung nicht.
Vielleicht gibt's Hilfe ?
Viele Grüße
Karl-Heinz

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

Betreff
Datum
Anwender
Anzeige
AW: Textbox Inhalt übertragen und mit Zelle verknüpfen
15.11.2005 15:41:20
IngGi
Hallo Karl-Heinz,
ins Modul deines Tabellenblattes:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "A1" Then Me.Textbox1 = CStr(Target)
End Sub
Gruß Ingolf
AW: Textbox Inhalt übertragen und mit Zelle verknüpfen
15.11.2005 17:13:35
Karl-Heinz
Hallo Ingolf,
vielen Dank für die schnelle Antwort. Ich habe den Code-Vorschlag in die Codeseite zum Tabellenblatt geschrieben. Hier befinden sich auch die anderen Code zu weiteren Textboxen, dem CommandButton und einigen Optionsfeldern. Leider funktioniert es nicht. Meine VBA-Kenntnisse befinden sich noch im Aufbau. Sorry.
Gibt's noch Hilfe ?
Viele Grüße
Karl-Heinz
Anzeige
AW: Textbox Inhalt übertragen und mit Zelle verknüpfen
16.11.2005 11:48:07
IngGi
Hallo Karl-Heinz,
jetzt steh ich selbst da, wie der Ochs vorm Berg. Ich hab das ursprünglich gar nicht getestet, weil für mich "klar" war, dass das so läuft. Nun muss ich aber feststellen, dass nach dem Einfügen einer Textbox aus der Steuerelemente-Toolbox keine Ereignisprozeduren auf dem Tabellenblatt mehr laufen. Vielleicht (hoffentlich) weiss da sonst noch jemand Rat? Frage offen!
Gruß Ingolf
AW: Textbox Inhalt übertragen und mit Zelle verknüpfen
16.11.2005 13:43:35
Karl-Heinz
Hallo Ingolf,
ich habe mir Zeit genommen und einfach mal verschiedenes ausprobiert "Learning by doing".
Mit diesem Code funktioniert es nun

Private Sub worksheet_change(ByVal target As Range)
If target = Range("a1") Then Me.TextBox1 = CStr(target)
End Sub

Warum weiß ich nicht. Die Empfehlung war aber zum Lernen schon hilfreich.
Nochmals Danke.
Viele Grüße
Karl-Heinz
Anzeige

304 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige