3.7k Aufrufe
in Datenbanken von flixe84 Mitglied (107 Punkte)
Hallo zusammen,

habe im Internet gesucht und auch folgenden Arbeitshinweis gefunden:
http://www.ms-office-forum.de/forum/showthread.php?t=50301

==========================================================
Dort wird der Code beschrieben:
Private Sub Form_Open(Cancel As Integer)
NameLaufschrift = DLookup("Laufschrift", "tblLaufschrift") & ""
End Sub

Private Sub Form_Timer()
ElementLaufschrift = Right(ElementLaufschrift, 1) & Left(ElementLaufschrift,
Len(ElementLaufschrift) - 1)
Me.Repaint
End Sub
==========================================================

Wenn ich also das Formular öffne müsste somit die Laufschrift kommen,
es kommt aber vom Visual Basic folgendes "Laufzeitfehler"5, wenn ich dann auf Debuggen gehe springt der gelbe Pfeil zu folgendem

ElementLaufschrift = Right(ElementLaufschrift, 1) & Left(ElementLaufschrift,
Len(ElementLaufschrift) - 1)

Nun zur Meiner Frage, was ist da falsch, oder wäre es anderst besser.

Danke für EURE Hilfe!

Grüße
Flixe84

2 Antworten

0 Punkte
von paul1 Experte (4.9k Punkte)
Hallo,

Im nachfolgenden Link gibt es ein Beispiel zum Downloaden (VBA).

Beispiel


Gruß

Paul1
0 Punkte
von paul1 Experte (4.9k Punkte)
Hallo Felix,

Im nachfolgenden Link noch ein Beispiel:

Lauftext

Weitere Infos im Formular „Lauftext“


Gruß

Paul1

Deine Antwort

Dein angezeigter Name (optional):
Datenschutz: Deine Email-Adresse benutzen wir ausschließlich, um dir Benachrichtigungen zu schicken. Es gilt unsere Datenschutzerklärung.
Anti-Spam-Captcha:
Bitte logge dich ein oder melde dich neu an, um das Anti-Spam-Captcha zu vermeiden.
...