Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Userform - soll sich Eingaben merken
zurück: Koordinate in Shape-Sheet dynmisch identifizieren weiter: Grundriss zeichnen Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Feedback Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
k-punkt
Gast


Verfasst am:
13. Feb 2014, 14:36
Rufname:

Userform - soll sich Eingaben merken - Userform - soll sich Eingaben merken

Nach oben
       

Hallo,

ich habe eine Userform erstellt, die sich auch immer brav direkt nach dem Öffnen zeigt. Das, was ich da reinschreibe, speichert es mir auch in das richtige Shape in die richtigen Attribute.

Allerdings ist die Userform bei jedem Öffnen leer. Es erscheint nicht, dass da bereits etwas schon mal drin stand.. Im Shape ist es zwar abgelegt, aber das verwirrt ganz schön und erfüllt somit nicht wirklich den Zweck.

Was muss ich tun, damit sich die Userform die Eingabe merkt und es mir nur noch die fehlenden Felder anzeigt? Kann sie auch ganz wegbleiben, wenn sie komplett gefüllt ist?

Vielen Dank für Eure Hilfe!!
Code:
Private Sub Userform_Initialize()
    Me.dd_type.AddItem ("1")
    Me.dd_type.AddItem ("2")
    Me.dd_type.AddItem ("3")
    Me.dd_type.AddItem ("4")
End Sub

Private Sub cb_ok_Click()
    Call setShapeData("ProjectData", "a", tb_a.value)
    Call setShapeData("ProjectData", "b", tb_b.value)
    Call setShapeData("ProjectData", "c", tb_c.value)
    Call setShapeData("ProjectData", "d", tb_d.value)
    Call setShapeData("ProjectData", "e", dd_e.value)
    Call setShapeData("ProjectData", "f", tb_f.value)
    Call setShapeData("ProjectData", "g", tb_g.value)
    Call setShapeData("ProjectData", "h", tb_h.value)
    Unload Me
End Sub
Gast



Verfasst am:
13. Feb 2014, 14:45
Rufname:

AW: Userform - soll sich Eingaben merken - AW: Userform - soll sich Eingaben merken

Nach oben
       

So wie du mit SetShapeData die Daten aus deinen Eingabefeldern in ShapeSheetZellen (?) schreibst kannst du doch eine analoge Funktion GetShapeData schreiben, die dies wieder ausliest und im Initialize in die Eingabefelder setzt, ala:
Code:
Private Sub Userform_Initialize()
    Me.dd_type.AddItem ("1")
    Me.dd_type.AddItem ("2")
    Me.dd_type.AddItem ("3")
    Me.dd_type.AddItem ("4")
    Me.tb_a = GetShapeData("ProjectData", "a")
    'usw.
End Sub
Wie die funktion auszusehen hat kann ich nicht sagen. Da ich ja nicht weiß wo du die Daten genau speicherst.
Gast



Verfasst am:
13. Feb 2014, 15:04
Rufname:


AW: Userform - soll sich Eingaben merken - AW: Userform - soll sich Eingaben merken

Nach oben
       

Super, danke!!

Funkioniert - bis auf. dass bei dem Erscheinen der Userform im allerersten Feld bereits der Zeiger zum Schreiben blinkt und der Inhalt gelöscht ist..

Alles andere ist aber da!Smile
Neues Thema eröffnen   Neue Antwort erstellen Alle Zeiten sind
GMT + 1 Stunde

Diese Seite Freunden empfehlen

Seite 1 von 1
Gehe zu:  
Du kannst Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum nicht posten
Du kannst Dateien in diesem Forum herunterladen

Verwandte Themen
Forum / Themen   Antworten   Autor   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge MS Project Forum: UserForm erzeugen 0 Manuell 171 19. Sep 2013, 12:30
Manuell UserForm erzeugen
Keine neuen Beiträge MS Visio Forum: Userform starten 3 VBA_Noob 1942 06. Dez 2011, 13:09
Gast Userform starten
Keine neuen Beiträge MS Visio Forum: Starten Userform anstatt Exceldatei 1 VBA Obernoob 223 06. Dez 2011, 13:02
Gast Starten Userform anstatt Exceldatei
Keine neuen Beiträge MS Visio Forum: Doppelklick soll Userform öffnen 4 KaZabO 842 31. Aug 2011, 07:57
Gast Doppelklick soll Userform öffnen
Keine neuen Beiträge MS MapPoint Forum: Fokus von Mappointcontrol in UserForm entfernen 0 data87 1195 29. Okt 2010, 07:37
data87 Fokus von Mappointcontrol in UserForm entfernen
Keine neuen Beiträge MS Visio Forum: Visio Userform Listbox mit Daten aus XLS 4 sam92 1296 06. Aug 2010, 09:10
sam92_loginfaul Visio Userform Listbox mit Daten aus XLS
Keine neuen Beiträge MS Project Forum: VBA - Arbeit pro Ressource in Userform anzeigen 0 Gast 1233 23. Okt 2009, 12:53
Gast VBA - Arbeit pro Ressource in Userform anzeigen
Keine neuen Beiträge MS Project Forum: Kopf- und Fußzeile über Userform 1 mmhagel 1338 17. Jun 2009, 12:35
BHKW-Bastler Kopf- und Fußzeile über Userform
Keine neuen Beiträge MS Visio Forum: .exe erstellen die visio+userform öffnet? 0 Meranox 872 26. Feb 2009, 12:29
Meranox .exe erstellen die visio+userform öffnet?
Keine neuen Beiträge MS Project Forum: Datum in UserForm eingeben über DatePicker - VBA 3 BHKW-Bastler 10597 09. Feb 2009, 18:09
Butzen Datum in UserForm eingeben über DatePicker - VBA
Keine neuen Beiträge MS Project Forum: textbox zum auffordern von eingaben 3 iceyeis 474 11. Apr 2008, 19:22
Gummibärchenfee textbox zum auffordern von eingaben
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Microsoft Excel Tricks