collapse

* Benutzer Info

 
 
Willkommen Gast. Bitte einloggen oder registrieren. Haben Sie Ihre Aktivierungs E-Mail übersehen?

* Wer ist Online

  • Punkt Gäste: 90
  • Punkt Versteckte: 0
  • Punkt Mitglieder: 1
  • Punkt Benutzer Online:

* Forenstatistik

  • stats Mitglieder insgesamt: 14129
  • stats Beiträge insgesamt: 68309
  • stats Themen insgesamt: 9200
  • stats Kategorien insgesamt: 5
  • stats Boards insgesamt: 17
  • stats Am meisten online: 415

Autor Thema: Memo-Feld Zeichenzahl limitieren  (Gelesen 935 mal)

Offline Carl

  • Access-Profi
  • **
  • Beiträge: 400
Memo-Feld Zeichenzahl limitieren
« am: Dezember 11, 2017, 21:48:09 »
Ich würde aus verschiedenen Gründen gern mit Memofeldern arbeiten, die Zeichenzahl aber auf ca. 500 begrenzen.

Ich habe Funktionen für das Formular gefunden, hätte aber gern eine tabellenseitige Begrenzung, Geht sowas?

Und wenn nein, wie macht man das Eurer Meinung nach am Elegantesten mit VBA für das Feld [Memobeispiel]?

Carl
« Letzte Änderung: Dezember 11, 2017, 22:42:33 von MzKlMu »
 

Offline MzKlMu

  • Moderator
  • Access-Oberguru
  • *****
  • Beiträge: 7494
Re: Memo-Feld Zeichenzahl limitieren
« Antwort #1 am: Dezember 11, 2017, 22:06:46 »
Hallo,
siehe Bild.
« Letzte Änderung: Dezember 11, 2017, 22:42:46 von MzKlMu »
Gruß
Klaus
 
Folgende Mitglieder bedankten sich: Carl

Offline Carl

  • Access-Profi
  • **
  • Beiträge: 400
Re: Memo-Feld Zeichenzahl limitieren
« Antwort #2 am: Dezember 12, 2017, 13:13:42 »
Ah, vielen Dank.

Wann bzw. für welche Zwecke würdet Ihr denn die Option in diesem Fall auf Rich Text setzen?
 

Offline Carl

  • Access-Profi
  • **
  • Beiträge: 400
Re: Memo-Feld Zeichenzahl limitieren
« Antwort #3 am: Dezember 12, 2017, 13:51:11 »
Länge([Memofeld])< 501 funktioniert auf Tabellenebene,.

Nun möchte ich im Formular den Hintergrund bedingt rot formatieren, wenn BEI DER EINGABE die Zeichenzahl von 500 überschritten wird. im Netz habe ich nur eine Lösung für Excel gefunden, die eine Meldung ausgibt. Kann man da irgendwie eine bedingte Formatierung für den Hintergrund des Feldes im Formular draus machen?


Private Sub TextBox1_Change()
 If Len(TextBox1.Value) > 500 Then
 Range("A1") = Len(TextBox1.Value)
 Else
 Range("A1") = "Es reicht!! " & Len(TextBox1.Value)
 End If
 End Sub
« Letzte Änderung: Dezember 12, 2017, 15:36:58 von Carl »
 

Offline MzKlMu

  • Moderator
  • Access-Oberguru
  • *****
  • Beiträge: 7494
Re: Memo-Feld Zeichenzahl limitieren
« Antwort #4 am: Dezember 12, 2017, 16:22:46 »
Hallo,
bedingte Formatierung müsste man probieren.
Aber Du kannst den Text begrenzen.
Z.B. so:
Private Sub Memofeld_Change()
   If Len(Me.Memofeld.Text) > 500 Then
        Me.Memofeld = Left(Memofeld.Text, 500)
        MsgBox "Habe fertig"
   End If
End Sub
Das .Text ist wichtig.
« Letzte Änderung: Dezember 12, 2017, 16:38:39 von MzKlMu »
Gruß
Klaus
 
Folgende Mitglieder bedankten sich: Carl

Offline Carl

  • Access-Profi
  • **
  • Beiträge: 400
Re: Memo-Feld Zeichenzahl limitieren
« Antwort #5 am: Dezember 12, 2017, 19:53:30 »
Hat auf Anhieb geklappt. Danke
 

 

eigenartiges Verhalten in Memo-Feldern

Begonnen von Axel18Board Formular

Antworten: 5
Aufrufe: 1901
Letzter Beitrag Oktober 25, 2013, 13:01:34
von Axel18
(Me!Bemerkung = Null) setzt Cursor nicht an Anfang des Memo-Feldes

Begonnen von hawebeBoard Access Programmierung

Antworten: 2
Aufrufe: 1654
Letzter Beitrag Dezember 26, 2013, 15:49:07
von hawebe
Memo Feld

Begonnen von DorianBoard Formular

Antworten: 6
Aufrufe: 5100
Letzter Beitrag Mai 06, 2010, 19:58:35
von Dorian
Memo-Feld ohne Inhalt in einem Bereicht nicht anzeigen

Begonnen von smily68Board Bericht

Antworten: 9
Aufrufe: 6295
Letzter Beitrag April 27, 2012, 17:50:56
von DF6GL
Tabelle mit Memo-Feld in Excel exportieren

Begonnen von MykisBoard Tabelle/Abfrage

Antworten: 1
Aufrufe: 3106
Letzter Beitrag Februar 25, 2014, 18:05:06
von Mykis