Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
Speichern von aktuellen Werten beim Beenden einer Userform?
zurück: Makro zum Markieren doppelter Wörter weiter: Wird ein UserForm angezeigt? Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Offen Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
23Maximus
Im Profil kannst Du frei den Rang ändern


Verfasst am:
13. Sep 2006, 14:14
Rufname:

Speichern von aktuellen Werten beim Beenden einer Userform? - Speichern von aktuellen Werten beim Beenden einer Userform?

Nach oben
       Version: Office XP (2002)

Hab folgendes Problem:

wenn man aktuelle Werte von Textfeldern, Kontrollkästchen und Optionsfeldern beim Beenden einer UserForm für den nächsten Aufruf speichern will funktioniert folgender Programmcode:

Private Const Anw = "Ihre Eingabe"

Private Sub UserForm_Activate()
S = Me.Name 'Name der UserForm
TextBox1.Text = GetSetting(AppName:=Anw, Section:=S, _
Key:="TextBox1", Default:="")
TextBox2.Text = GetSetting(AppName:=Anw, Section:=S, _
Key:="TextBox2", Default:="")
TextBox3.Text = GetSetting(AppName:=Anw, Section:=S, _
Key:="TextBox3", Default:=Format(Date, "ddMMM"))
CheckBox1.Value = Abs(GetSetting(AppName:=Anw, Section:=S, _
Key:="CheckBox1", Default:=0))
OptionButton1.Value = Abs(GetSetting(AppName:=Anw, Section:=S, _
Key:="OptionButton1", Default:=0))
OptionButton2.Value = Abs(GetSetting(AppName:=Anw, Section:=S, _
Key:="OptionButton2", Default:=0))
OptionButton3.Value = Abs(GetSetting(AppName:=Anw, Section:=S, _
Key:="OptionButton3", Default:=0))
End Sub

Private Sub UserForm_Terminate()
S = Me.Name
SaveSetting AppName:=Anw, Section:=S, _
Key:="TextBox1", Setting:=TextBox1.Text
SaveSetting AppName:=Anw, Section:=S, _
Key:="TextBox2", Setting:=TextBox2.Text
SaveSetting AppName:=Anw, Section:=S, _
Key:="TextBox3", Setting:=TextBox3.Text
SaveSetting AppName:=Anw, Section:=S, _
Key:="CheckBox1", Setting:=Abs(CheckBox1.Value)
SaveSetting AppName:=Anw, Section:=S, _
Key:="OptionButton1", Setting:=Abs(OptionButton1.Value)
SaveSetting AppName:=Anw, Section:=S, _
Key:="OptionButton2", Setting:=Abs(OptionButton2.Value)
SaveSetting AppName:=Anw, Section:=S, _
Key:="OptionButton3", Setting:=Abs(OptionButton3.Value)
End Sub

Jetzt meine Frage :

Wie funktioniert das genauso bei einem frm ? Welche änderungen des Codes sind nötig ?????

Danke schon mal im voraus !!!!!

VIELe GRÜSSE M.

Titel geändert.
Bitte in Zukunft auf aussagekräftige Titel achten! Danke, Lisa
CHF
Word-VBA Professional


Verfasst am:
13. Sep 2006, 14:20
Rufname:


AW: Hallo wer kann mir bitte helfen !?!?!?! - AW: Hallo wer kann mir bitte helfen !?!?!?!

Nach oben
       Version: Office XP (2002)

warum kannst du nicht wie alle anderen einen aussagekräftigen Betreff verwenden?

Was soll "frm" sein?

_________________
Gruß

CHF

Bitte keine Anfragen per PN!
Fragen gehören ins Forum!
>
23Maximus
Im Profil kannst Du frei den Rang ändern


Verfasst am:
18. Sep 2006, 08:49
Rufname:

AW: Speichern von aktuellen Werten beim Beenden einer Userfo - AW: Speichern von aktuellen Werten beim Beenden einer Userfo

Nach oben
       Version: Office XP (2002)

oh entschuldigung - hat sich schon erledigt, aber danke
gonzales558
Gast


Verfasst am:
30. Okt 2006, 17:07
Rufname:

AW: Speichern von aktuellen Werten beim Beenden einer Userfo - AW: Speichern von aktuellen Werten beim Beenden einer Userfo

Nach oben
       Version: Office 2k (2000)

Das funktioniert bei mir nicht! Hat jemand eine bessere Lösung?
Müsste auch etwas aus einem Userform abspeichern!

Vielen Dank für eure Hilfe
Lisa
Moderator; Word seit Word 5.0 (für DOS)


Verfasst am:
30. Okt 2006, 20:37
Rufname:
Wohnort: Leipzig


AW: Speichern von aktuellen Werten beim Beenden einer Userfo - AW: Speichern von aktuellen Werten beim Beenden einer Userfo

Nach oben
       Version: Office XP (2002)

Hallo Gonzales,

die Antwort steht in Deinem anderen Thread:

Daten aus Userform speichern

_________________
Sei doch so nett und gib eine Rückmeldung, ob es klappt!
Gruß, Lisa

Guter Rat ist teuer!
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 Word Serienbriefe: Serienbrief einzeln Speichern, benötige Marko 9 DannyD 226 05. Dez 2013, 20:08
nicki2 Serienbrief einzeln Speichern, benötige Marko
Keine neuen Beiträge Word Formate: Benutzerdefinertes Papierformat speichern 6 clarxes 9068 23. Sep 2013, 09:46
tobiasfichtner.com Benutzerdefinertes Papierformat speichern
Keine neuen Beiträge Word Serienbriefe: Word Dokument (610 Seiten mit Namen und als .txt speichern) 0 vba-verzweifelt 627 17. Apr 2012, 21:07
vba-verzweifelt Word Dokument (610 Seiten mit Namen und als .txt speichern)
Keine neuen Beiträge Word Serienbriefe: Serienbriefe einzeln speichern 23 MAD 26681 04. Feb 2011, 00:36
Gast Serienbriefe  einzeln speichern
Keine neuen Beiträge Word Formate: Änderungen in Briefvorlage.dot speichern 1 MiLie 2128 21. März 2010, 12:45
MiLie Änderungen in Briefvorlage.dot speichern
Keine neuen Beiträge Word Serienbriefe: Dokument auf USB Stick speichern 1 fannygirl 3892 14. Okt 2009, 22:47
charlybrown Dokument auf USB Stick speichern
Keine neuen Beiträge Word Formate: "Nur für aktuellen Abschnitt" aber Word ändert All 4 elli_83 2141 14. Jan 2009, 02:20
elli_83 "Nur für aktuellen Abschnitt" aber Word ändert All
Keine neuen Beiträge Word Formate: Kopfzeile nach x Seiten beenden lassen 1 100000dollarman 1843 23. Jun 2008, 19:49
CaBe Kopfzeile nach x Seiten  beenden lassen
Keine neuen Beiträge Word Formate: Fusszeile: Pfad und Dateiname beim speichern aktualisieren 11 ludomeierle 8186 23. Jan 2008, 16:21
Hübi Fusszeile: Pfad und Dateiname beim speichern aktualisieren
Keine neuen Beiträge Word Formate: Referenz Querverweis nach Speichern nciht mehr vorhanden 0 Harry2300 1311 28. Aug 2007, 11:30
Harry2300 Referenz Querverweis nach Speichern nciht mehr vorhanden
Keine neuen Beiträge Word Formate: Meta Schrift im Dok. speichern 1 Manu12 3036 27. Jun 2007, 20:42
Hübi Meta Schrift im Dok. speichern
Keine neuen Beiträge Word Formate: Formatvorlage: will immer speichern 3 premium_it 2850 04. Jun 2007, 14:04
premium_it Formatvorlage: will immer speichern
 

----> Diese Seite Freunden empfehlen <------ Impressum - Besuchen Sie auch: Access Tabellen