Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.04.2024 19:29:30
24.04.2024 18:49:56
Anzeige
Archiv - Navigation
1080to1084
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
Inhaltsverzeichnis

UserForm weiterverarbeiten

UserForm weiterverarbeiten
13.06.2009 17:26:42
Jörg
Hallo alle
jetzt sitz ich an der UserForm, die ihr mir eben empfohlen habt, und hab bissl Code geschreiben, von dem ich gehofft hatte, daß es richtig sei - aber es tut sich nix...
Mag mal jemand reingucken und sagen, was ich da vergessen hab?

Die Datei https://www.herber.de/bbs/user/62410.xls wurde aus Datenschutzgründen gelöscht


Danke für'n Tip...
Jörg

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: UserForm weiterverarbeiten
13.06.2009 17:31:52
Hajo_Zi
Halo Jörg,
Warum neuer Beitrag?
ich hätte den Code ja ausgeführt, wenn ich in de Userform auf OK klicke, aber da kann man ja unterschiedlicher Auffassung sein.

Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" And Target = 6 Then
UserForm1.Show
End If
End Sub



AW: ja, hätte auch den anderen...
13.06.2009 17:59:54
Jörg
...Beitrag fortführen können, Hajo. naja, is nich so schlimm, denk ich...
Schönes WE!
Jörg
AW: UserForm weiterverarbeiten
13.06.2009 17:32:00
Jens
Hallo Jörg
Den Code, den Du unter
Private Sub UserForm_Click()
stehen hast, musst Du unter
Private Sub CommandButton1_Click()
schreiben.
Gruß aus dem Sauerland
Jens
Anzeige
AW: UserForm weiterverarbeiten
13.06.2009 17:32:23
Tino
Hallo,
warum Userform_Click, Du möchtest es bestimmt so.

Private Sub CommandButton1_Click()
If OptionButton1 = True Then
Range("c1").Value = 2
ElseIf OptionButton2 = True Then
Range("c1").Value = 3
End If
End Sub


Gruß Tino

Unload fehlt noch...
13.06.2009 17:35:43
Tino
Hallo,

Private Sub CommandButton1_Click()
If OptionButton1 = True Then
Range("c1").Value = 2
ElseIf OptionButton2 = True Then
Range("c1").Value = 3
End If
Unload Me
End Sub


Gruß Tino

Anzeige
Danke, Jungs! Bin immer wieder....
13.06.2009 17:57:44
Jörg
erstaunt, daß es selbst in einfachsten Problemchen verschiedene Wege zur Sonne gibt...
Ich hatte da mal im Zusammenhang mit UserForms was gelesen vorn "terminate"
Was ist denn der Unterschied zwischen Unload und Terminate?
Schönes WE!
Jörg
AW: Danke, Jungs! Bin immer wieder....
13.06.2009 18:03:02
Tino
Hallo,
UserForm_Terminate ist ein Eventmakro das beim schließen der Userform ausgelöst wird,
z. Bsp. durch Unload Me oder drücken auf X.
Gruß Tino

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige