Office Forum
www.Office-Loesung.de
Access :: Excel :: Outlook :: PowerPoint :: Word :: Office :: Wieder Online ---> provisorisches Office Forum <-
MsgBox popt nicht auf
zurück: Formular nach mehreren Punkten unbewusst Filtern lassen weiter: Summe Prozessdatenfeld UF -> HF Unbeantwortete Beiträge anzeigen
Neues Thema eröffnen   Neue Antwort erstellen     Status: Antwort Facebook-Likes Diese Seite Freunden empfehlen
Zu Browser-Favoriten hinzufügen
Autor Nachricht
friedrichshain
Office-Einsteiger


Verfasst am:
18. Mai 2007, 10:47
Rufname:
Wohnort: Berlin

MsgBox popt nicht auf - MsgBox popt nicht auf

Nach oben
       Version: Office 2003

Hallo,

ich möchte die Zeichenanzahl in einem Textfeld mit:
Code:
Private Sub Abstract_4_AfterUpdate()
    If Len(Me!Abstract_4 & "") > 500 Then
        MsgBox "Maximal 500 Zeichen im Feld 'Programmgruppe'!"
        Me!Abstract_4.SetFocus
        Exit Sub
    End If
End Sub
limitieren.
Funktioniert auch so weit (Eingabe bleibt stehen), nur bekomme ich nicht die MsgBox angezeigt, die darauf hinweist, dass nur max. 500 Zeichen eingegeben werden können.
Woran liegt das? Weiß jemand Rat?

_________________
Vielen Dank und schöne Grüße
friedrichshain
stpimi
Moderator Access


Verfasst am:
18. Mai 2007, 10:56
Rufname:
Wohnort: Graz


AW: MsgBox popt nicht auf - AW: MsgBox popt nicht auf

Nach oben
       Version: Office 2003

Servus!

Bist Du Dir denn sicher, dass die If-Bedingung auch aufgeht? Abgesehen davon ist das AfterUpdate das falsche Ereignis für eine Feldprüfung. Da wäre BeforeUpdate zu verwenden. Sonst ist die Änderung schon durch.

_________________
Lg, Michael

Dein Feedback hilft auch anderen - vergiß es nicht!
steffen0815
VBA-Programmierer


Verfasst am:
18. Mai 2007, 10:56
Rufname:

AW: MsgBox popt nicht auf - AW: MsgBox popt nicht auf

Nach oben
       Version: Office 2003

Hallo,
ich kann zwar dein beschriebenes Verhalten nicht nachvollziehen Rolling Eyes , denn eigentlich kommt die Msgbox, aber das Feld wird verlassen, doch dies dürfte ohnehin der falsche Ansatz sein. Nach der Aktulaisierung ist das "Kind bereits im Brunnen" Wink

Ich denke Vor Aktualisierung ist der richtige Ansatz:
Code:
Private Sub Abstract_4_BeforeUpdate(Cancel As Integer)
    If Len(Me!Abstract_4 & "") > 5 Then
        MsgBox "Maximal 500 Zeichen im Feld 'Programmgruppe'!"
        Cancel = True
    End If
End Sub

_________________
Gruß Steffen
friedrichshain
Office-Einsteiger


Verfasst am:
18. Mai 2007, 11:11
Rufname:
Wohnort: Berlin

AW: MsgBox popt nicht auf - AW: MsgBox popt nicht auf

Nach oben
       Version: Office 2003

Hallo,

Danke erst mal für Eure Hilfe.

Ich habe Eure Hinweise befolgt, ist so weit ok. Aber gibt es eine Möglichkeite, dass das Pop-Up aufspringt, wenn man das 500 Zeichen eingibt? Denn so wird sich der User wundern warum es nicht weiter geht und erst beim Feldwechsel merken, was der Grund war.

_________________
Vielen Dank und schöne Grüße
friedrichshain
stpimi
Moderator Access


Verfasst am:
18. Mai 2007, 11:17
Rufname:
Wohnort: Graz


AW: MsgBox popt nicht auf - AW: MsgBox popt nicht auf

Nach oben
       Version: Office 2003

Servus!

Du kannst den Code im Change-Ereignis (Bei Änderung) verwenden, musst dann aber die Eigenschaft Text prüfen. Ob der damit erzielbare Vorteil mit dem Nachteil der Beschäftigungstherapie für den Prozessor in geeignetem Verhältnis steht, sei dahingestellt.
Code:
Private Sub Abstract_4_Change()
    If Len(Me!Abstract_4.Text & "") > 5 Then
        MsgBox "Maximal 500 Zeichen im Feld 'Programmgruppe'!"
        Cancel = True
    End If
End Sub

_________________
Lg, Michael

Dein Feedback hilft auch anderen - vergiß es nicht!
steffen0815
VBA-Programmierer


Verfasst am:
18. Mai 2007, 11:20
Rufname:

AW: MsgBox popt nicht auf - AW: MsgBox popt nicht auf

Nach oben
       Version: Office 2003

Hallo,
... oder du legst über die Eingabemaske die Vorgabe an:
1) entweder manuell 500 x C (CCCCC ...) in Eingabeformat Wink
oder
2) per Code:
Code:
Private Sub Form_Open(Cancel As Integer)
    Me!Abstract_4.InputMask = String(500, "C")
End Sub
Wenn man bei Michaels Variante, dass
Code:
        Cancel = True
entfernt Wink, dürfte dies aber zu bevorzugen sein.
_________________
Gruß Steffen
friedrichshain
Office-Einsteiger


Verfasst am:
18. Mai 2007, 11:29
Rufname:
Wohnort: Berlin

AW: MsgBox popt nicht auf - AW: MsgBox popt nicht auf

Nach oben
       Version: Office 2003

Hallo stpimi,

wenn ich Deinen Code einsetze, dann komme nach der Eingabe des 500sten Zeichens nicht weiter (Curser bleibt stehen), aber das Pop-Up mit dem Hinweis, dass bei 500 Schluss ist, geht nicht auf, auch nicht, wenn ich in ein anderes Feld springe.

_________________
Vielen Dank und schöne Grüße
friedrichshain
steffen0815
VBA-Programmierer


Verfasst am:
18. Mai 2007, 11:32
Rufname:

AW: MsgBox popt nicht auf - AW: MsgBox popt nicht auf

Nach oben
       Version: Office 2003

Hallo,
ich denke du solltest mal in deinem Formularmodul aufräumen.
Dass bei dir nie eine Msgbox kommt ist verdächtig Wink

_________________
Gruß Steffen
stpimi
Moderator Access


Verfasst am:
18. Mai 2007, 11:35
Rufname:
Wohnort: Graz

AW: MsgBox popt nicht auf - AW: MsgBox popt nicht auf

Nach oben
       Version: Office 2003

Servus!

Mein Code funktioniert bei mir problemlos ... Wink

_________________
Lg, Michael

Dein Feedback hilft auch anderen - vergiß es nicht!
friedrichshain
Office-Einsteiger


Verfasst am:
18. Mai 2007, 11:53
Rufname:
Wohnort: Berlin

AW: MsgBox popt nicht auf - AW: MsgBox popt nicht auf

Nach oben
       Version: Office 2003

Hallo,

ich habe gerade mal den Code für ein anderes Textfeld ausprobiert und da funktioniert er auch bei mir super. Tja, ist wohl was internes - obwohl sich die Textfelder nicht unterscheiden.

Vielen Dank für Eure Hilfe.

_________________
Vielen Dank und schöne Grüße
friedrichshain
steffen0815
VBA-Programmierer


Verfasst am:
18. Mai 2007, 12:15
Rufname:


Re: AW: MsgBox popt nicht auf - Re: AW: MsgBox popt nicht auf

Nach oben
       Version: Office 2003

steffen0815 - 18. Mai 2007, 11:32 hat folgendes geschrieben:
Hallo,
ich denke du solltest mal in deinem Formularmodul aufräumen.
Dass bei dir nie eine Msgbox kommt ist verdächtig Wink

_________________
Gruß Steffen
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 Access Tabellen & Abfragen: Individuelle Button-Beschriftung bei MsgBox 4 Gast 126 10. Okt 2013, 10:15
KlausMz Individuelle Button-Beschriftung bei MsgBox
Keine neuen Beiträge Access Tabellen & Abfragen: MsgBox alle Werte anzeigen 15 frederikrik 310 18. Feb 2013, 22:29
frederikrik MsgBox alle Werte anzeigen
Keine neuen Beiträge Access Tabellen & Abfragen: Wert in Tabelle prüfen und ggf. Msgbox 1 1748351 94 21. Dez 2012, 12:38
KlausMz Wert in Tabelle prüfen und ggf. Msgbox
Keine neuen Beiträge Access Formulare: MsgBox anzeigen, wenn kein DS im Uform 6 wimmera 302 22. Apr 2012, 13:23
wimmera MsgBox anzeigen, wenn kein DS im Uform
Keine neuen Beiträge Access Formulare: Mit MsgBox Meldung ausgeben 20 Akima 3193 01. Dez 2010, 13:36
Akima Mit MsgBox Meldung ausgeben
Keine neuen Beiträge Access Formulare: MsgBox 3 tiss90 191 23. Jun 2010, 11:23
blackoutNO MsgBox
Keine neuen Beiträge Access Formulare: Feldübernahme in der msgBox 2 Josef der andere 411 13. Mai 2010, 09:19
Josef der andere Feldübernahme in der msgBox
Keine neuen Beiträge Access Formulare: Access VBA MsgBox 18 BobbyB 9776 23. Sep 2009, 10:30
BobbyB Access VBA MsgBox
Keine neuen Beiträge Access Formulare: Anzahl aktualisierter Datensätze in MsgBox nach Abfrage 8 Freezer 1330 07. Nov 2008, 10:21
Freezer Anzahl aktualisierter Datensätze in MsgBox nach Abfrage
Keine neuen Beiträge Access Formulare: Mit MsgBox leere Felder prüfen 6 C.Peter 602 01. Nov 2008, 19:27
C.Peter Mit MsgBox leere Felder prüfen
Keine neuen Beiträge Access Formulare: Msgbox soll max Wert einer Abfrage wiedergeben 7 Butterblume 813 06. Okt 2008, 12:17
butterblume1008 Msgbox soll max Wert einer Abfrage wiedergeben
Keine neuen Beiträge Access Formulare: wenn Wert gespeichert soll msgbox erscheinen 6 Bernd1234 614 04. Sep 2007, 13:18
Bernd1234 wenn Wert gespeichert soll msgbox erscheinen
 

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