Office: (Office 2007) Anwendungstitel mit VBA modifizieren

Hallo,

In den Access-Optionen > Aktuelle Datenbank kann man den Anwendungstitel eintragen.
Bei mir ist das im Moment "Französisch".

Da ich ein Formular für verschiedene Lehrbücher verwende, d.h. mit verschiedenen Tabellen als RecordSource, würde ich den Anwendungstitel gerne je nach dem gewählten Lehrbuch modifizieren (z.B. in "Französisch, On y va! (Band A2)". Ich denke mir das etwa so:

HTML:

Private Sub Form_Open(Cancel As Integer)

'Auswertung der im Startformulars gewählten Optionen
Set db = CurrentDb
Set rs = db.OpenRecordset("Materialwahl")
Dim rSource As String

rSource = rs!Basistabelle
Me.RecordSource = rSource

If rSource = "OnYVaA2_tbl" Then
'Anwendungstitel = "Französisch, On y va! (Band A2)"
End if

'[…]

End sub

Ist das möglich, ohne dass man sich tief in die Ribbon-Programmierung einarbeiten muss?

Viele Grüße
Herbert

:)

 

Hallo Herbert,

über DAO kannst du die Eigenschaft (Property) "AppTitle" der Datenbank ändern. Schau mal im www.vbarchiv.net nach.

Viele Grüße,
Stefan

 

Wenn ich das richtig verstehe möchtest du den Formulartitel ändern nicht die DB, oder ?

Falls das so ist kannst du das wie folgt machen...
Code:

Aber dabei darf das umzubenenende Formular nicht geöffnet sein...

 

Hallo,

das Formular umzubenennen darf ja wohl nicht ernsthaft in Erwägung gezogen werden,
statt dessen sollte sich die Formularbeschriftung über die Caption-Eigenschaft einstellen
lassen. Aber hier war ja wohl eindeutig die Rede vom Anwendungstitel, oder?

 

Ja, es geht um den Anwendungstitel und der Hinweis von Stefan hat genau zu dem gewünschten (und dazu einfach zu realisierenden) Ergebnis geführt.
Ganz herzlichen Dank!

Viele Grüße
Herbert