Jak stworzyć dostęp do interfejsu ACCDE po ukryciu wstążki paska narzędzi za pomocą Event Procedure? - ms-access, ms-access-2007

Mam podzieloną bazę danych. Zrobiłem procedurę zdarzenia na obciążenie DoCmd.ShowToolbar "Ribbon", acToolbarNo aby ukryć pasek narzędzi Wstążki.

Teraz chcę utworzyć wersję ACCDE, aby dystrybuować przedni koniec mojej bazy danych. Mój problem polega na tym, że nie mogę utworzyć wersji ACCDE, gdy pasek narzędzi wstążki nie jest widoczny. Również jeśli tworzę ACCDE przed DoCmd.ShowToolbar "Ribbon", acToolbarNo Nie mogę tego zrobić, ponieważ ACCDE wyłącza widok projektu formularzy.

Jakie jest najlepsze rozwiązanie? Chciałbym, żeby wstążka była ukryta, tak jak jest DoCmd.ShowToolbar "Ribbon", acToolbarNo.

Odpowiedzi:

Jeśli masz formularz ładujący się przy starcie, to poniższy kod w jego On_Load Wydarzenie umożliwi wstęgę podczas projektowania formularzy i wyłącza ją po przesłaniu wersji do użytkowników.

If LCase(Right(CurrentDb.Name, 3)) = "mdb" Then
DoCmd.ShowToolbar "Ribbon", acToolbarNo
ElseIf LCase(Right(CurrentDb.Name, 5)) = "accde" Then
DoCmd.ShowToolbar "Ribbon", acToolbarNo
ElseIf LCase(Right(CurrentDb.Name, 5)) = "accdr" Then
DoCmd.ShowToolbar "Ribbon", acToolbarNo
Else
DoCmd.ShowToolbar "Ribbon", acToolbarYes
End If