Avatar billede mira96ac Novice
15. september 2007 - 19:16 Der er 6 kommentarer og
1 løsning

Tilføje/fjerne værktøjslinie

Garanteret et lille nemt spørgsmål til folket.

Jeg har to skabeloner som henter deres funktioner/makroer fra en global xla-fil.

I begge skabeloner har jeg lavet en værktøjslinie med knapper til makroerne. Problemet er bare at den ene skabelon skal have 10 henvisninger/knapper til makroer og den anden kun skal have 5. De 5 er ens for de to skabeloner.

Men kan værktøjslinierne så ikke hedde det samme ?

Hvis jeg sletter de 5 knapper fra den ene skabelon er de også slettet fra den anden skabelon næste gang jeg åbner den ???

Det virker som om Excel bare husker hvordan man efterlod værktøjslinien sidste gang og så bare viser den igen.

Jeg har denne kode i ThisWorkBook i hver skabelon:

Private Sub Workbook_Open()
On Error GoTo Fejl
        Application.CommandBars("SR").Visible = True
Fejl:
End Sub

Og jeg har denne kode i et modul i hver skabelon:

Public Sub auto_close()
On Error GoTo Fejl
        Application.CommandBars("SR").Visible = False
Fejl:
End Sub
Avatar billede mira96ac Novice
15. september 2007 - 19:19 #1
Jeg kan godt se at man måske har et problem hvis man har begge skabeloner åbne samtidig og værktøjslinierne hedder det samme men ikke skal se ens ud... eller hva' ?
Avatar billede kabbak Professor
15. september 2007 - 20:23 #2
Hvis du laver dem fra bunden af, kan du slette dem igen ved

Public Sub auto_close()
On Error GoTo Fejl
Application.CommandBars("SR").Delete
Fejl:
End Sub
Avatar billede mira96ac Novice
15. september 2007 - 20:34 #3
Hvad mener du med at lave dem fra bunden af.
Jeg laver dem via Funktioner - Tilpas osv.

Hvad får jeg ud af at slette dem ?

Har jeg stadig et problem hvis begge skabeloner er åbne samtidig og hedder det samme?
Avatar billede kabbak Professor
15. september 2007 - 20:46 #4
1. at lave den fra bunden af, menes der, at der er en kode der starter med :

Set cbar1 = CommandBars.Add(Name:="SR", Position:=msoBarFloating)
cbar1.Visible = True

og så mere kode for punkter/knapper.

2. du har et problem, hvis begge er åbne og de hedder det samme

Prøv at åbne eksel med en tom mappe og se så om navnet på baren optræder i
Funktioner - Tilpas
hvis de gør det, hjælper det at delete dem ved afslutning.
Avatar billede mira96ac Novice
15. september 2007 - 21:05 #5
OK

Jeg må kigge lidt på at lave koden fra bunden af...

De skal ikke deletes ved lukning af projektmappen. Det sker nemlig tit at man åbner flere projektmapper (hvor samme værktøjslinie i princippet anvendes), og når man så lukker den ene forsvinder værktøjslinien helt.
Sådan som det er nu kan man højklikke i toppen af arket og vise den igen.

Tak for hjælpen...

Kom med et svar så får du point.
Avatar billede kabbak Professor
15. september 2007 - 22:38 #6
tag dem selv, jeg lavede jo ikke noget, jeg kommenterede kun.
;-))
Avatar billede mira96ac Novice
16. september 2007 - 12:35 #7
Lukker og takker
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester