Dansk Regneark Forum
  Hjælp Hjælp  Søg i forum   Arrangementer   Opret ny bruger Opret ny bruger  Log ind Log ind


Emne lukketLayout i Excel

 Besvar Besvar
Forfatter
peppe Se dropdown
Sølv bruger
Sølv bruger
Avatar

Medlem: 26.Okt.2010
Land: Danmark
Status: Offline
Point: 294
Direkte link til dette indlæg Emne: Layout i Excel
    Sendt: 28.Okt.2010 kl. 20:31
Hej herinde
 
Hvilke muligheder er der for at ændre layoutet i Excel - fx bare individuelle projektmapper.
 
Eksempler:
1. mulighed for at fjerne hhv. rækketal og kolonnebogstaver
 
2. fjerne/deaktivere scrollebjælkerne i siden og forneden
 
3. ændre Excels faner (foroven) - fx sætte andre ikoner/knapper(commandbuttons) ind
 
I det hele taget ændre hele udseendet af Excel
Evt. litteratur der beskriver disse emner og gerne om VBA...
 
Peppe
Til top



Til top
rassten Se dropdown
Guld bruger
Guld bruger


Medlem: 26.Okt.2010
Status: Offline
Point: 694
Direkte link til dette indlæg Sendt: 28.Okt.2010 kl. 21:25
Gennem indstilinger,
eller gennem VBA:

Skjuler arkfaner:
ActiveWindow.DisplayWorkbookTabs = False
Skjuler horisontal rulle:
ActiveWindow.DisplayHorizontalScrollBar = False
Skjuler vertikal rulle:
ActiveWindow.DisplayVerticalScrollBar = False
Skjuler formellinien :
Application.DisplayFormulaBar = False
Skjuler Række og kolonne headings:
ActiveWindow.DisplayHeadings = False
Skjuler gitterlinierne
ActiveWindow.DisplayGridlines = False

Denne gør Ribbon lille:
Application.SendKeys ("^{F1}")

De første kan du ligge ind i en makro og gå linierne igennem med "F8" tasten. Men ikke den sidste, hvis du bruger "F8" kommer excel-hjælp. Men kører du makroen igennem automatisk virker den.

Det sidste spørgsmål har Bill Jelen  skrevet om i flere af hans bøger. Men det er meget svært og omstændigt.
I Excel 2010 bliver er det igen muligt at lave om på menuerne.
Til top
peppe Se dropdown
Sølv bruger
Sølv bruger
Avatar

Medlem: 26.Okt.2010
Land: Danmark
Status: Offline
Point: 294
Direkte link til dette indlæg Sendt: 28.Okt.2010 kl. 22:26
Helst både gennem indstillinger og gennem VBA (så er der valgfrihed)
Sejt - der er mange muligheder og nogle af dem har du vist nævnt før.
 
Jeg er blot lidt i tvivl om hvor jeg indtaster koderne...
 
Indtil videre skal du have tak
 
 
 
Til top
rassten Se dropdown
Guld bruger
Guld bruger


Medlem: 26.Okt.2010
Status: Offline
Point: 694
Direkte link til dette indlæg Sendt: 28.Okt.2010 kl. 22:47
I VBA, de først linier kan du bare ligge i et almindeligt modul, kør kode en gang, slet koden. Gem og luk filen, Åben filen igen, så burde de forskellige ting som vil have skjult, stadig være skjult. Men kun for denne fil.
Det koden egentlig gør, er at slå indstillingerne fra, som du også selv kan gøre manuelt, gennem Office knappen osv.
Men prøv også at se på fanen "vis" her kan du også slå elementer til og fra.

Denne gør Ribbon lille:
Application.SendKeys ("^{F1}")

For at denne skal virke ordentligt.
I vba editor vælg "ThisWorkBook"


Private Sub Workbook_Open()
Application.SendKeys ("^{F1}")
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.SendKeys ("^{F1}")
End Sub

Beforeclose er vigtig, eller bliver ribbon ved med at være minimeret.

Til top
peppe Se dropdown
Sølv bruger
Sølv bruger
Avatar

Medlem: 26.Okt.2010
Land: Danmark
Status: Offline
Point: 294
Direkte link til dette indlæg Sendt: 28.Okt.2010 kl. 23:20

Kan ikke lige få ribbon lille - bliver sendt til office hjælp... øv øv.

Nå men der er jo tilgengæld mange indstillingsmuligheder under excel-indstillinger.
 
Tak for det
Til top
rassten Se dropdown
Guld bruger
Guld bruger


Medlem: 26.Okt.2010
Status: Offline
Point: 694
Direkte link til dette indlæg Sendt: 28.Okt.2010 kl. 23:32
Koden kan ikke testes.
Grunden, koden betyder faktisk, send et tastetur tryk til excel, og hvis det ikke køres som kode er det rigtigt at det skal åbne excel-hjælp.

som test, prøv at ligge nedenstående kode i et almindeligt modul. Tryk "F8", vælg a_test - kør, så burde det virke.

Sub a_test()
ActiveWindow.DisplayWorkbookTabs = False
ActiveWindow.DisplayHorizontalScrollBar = False
ActiveWindow.DisplayVerticalScrollBar = False
Application.DisplayFormulaBar = False
ActiveWindow.DisplayHeadings = False
Application.SendKeys ("^{F1}")

End Sub


Til top
peppe Se dropdown
Sølv bruger
Sølv bruger
Avatar

Medlem: 26.Okt.2010
Land: Danmark
Status: Offline
Point: 294
Direkte link til dette indlæg Sendt: 29.Okt.2010 kl. 18:22
Hej igen
 
Det virker - det eneste der er tilbage er en "menulinje" (minimerede faner) og værktøjslinjen "hurtig adgang".
 
Ved du om disse koder virker med XP excel (2003 tror jeg)? - det er der programmet skal køre?
 
Indtil videre Mange tak
Til top
rassten Se dropdown
Guld bruger
Guld bruger


Medlem: 26.Okt.2010
Status: Offline
Point: 694
Direkte link til dette indlæg Sendt: 01.Nov.2010 kl. 17:43
Jeg ved ikke hvordan, og om overhoved, sendkeys virker i excel 2003. Men de andre linier burde virke ens i 2003 og 2007. Har ikke prøvet 2010, men der burde koderne også virke.
Til top
peppe Se dropdown
Sølv bruger
Sølv bruger
Avatar

Medlem: 26.Okt.2010
Land: Danmark
Status: Offline
Point: 294
Direkte link til dette indlæg Sendt: 01.Nov.2010 kl. 19:45
Takker
Til top
 Besvar Besvar

Skift forum Forum tilladelser Se dropdown

© 2010 - 2024 Dansk Regneark Forum - en del af Excel-regneark.dk