| Forfatter |
 Emne Søg  Emne funktioner
|
peppe 
Sølv bruger
Medlem: 26.Okt.2010
Land: Danmark
Status: Offline
Point: 294
|
 Emne: Skjule arkfaner
Sendt: 27.Okt.2010 kl. 21:48 |
Hej til alle herinde
Jeg har en projektmappe med lidt automatiseret VBA-kode bagved.
Jeg har en brugerformular (userform) som dog skal kunne "toggle" frem og tilbage mellem de arkfaner der ligger i projektmappen, men er det muligt at skjule selve fanerne?
Forklaring:
Når man starter projektmappen, så står man på ARK1, hvor der er mulighed for at åbne en brugerformular.
På brugerformularen kan man så trykke sig frem til fx en kundeliste, lagerliste mv som er på nogle andre faner - her synes jeg det kunne være rart man ikke kan se fanerne.
Det er en projektmappe, hvor jeg beskytter de enkelte ark og evt. hele projektmappen.
Peppe
|
 |
|
|
|
|
Allan
Forum Admin
Forum Admin
Medlem: 03.Feb.2010
Land: Danmark
Status: Offline
Point: 10330
|
Sendt: 27.Okt.2010 kl. 21:57 |
Hej Peppe,
3 Forslag, du kan gøre det manuelt, via BST-Utilities eller via VBA.
Ændringen følger filen, så du behøver kun at gøre det én gang.
Manuelt i Excel 2003
- Klik på Indstillinger i menuen Funktioner, og klik derefter på fanen Vis.
- Marker afkrydsningsfeltet eller fjern markeringen i afkrydsningsfeltet Arkfaner.
- BST Utilities / ARK / ZOOM / Vis Arkfaner
Via VBA:
- ActiveWindow.DisplayWorkbookTabs = False
//Allan
|
|
rassten
Guld bruger
Medlem: 26.Okt.2010
Status: Offline
Point: 694
|
Sendt: 27.Okt.2010 kl. 22:13 |
|
For helt at skjule at filen indeholder arkfaner.
Kan du i Excel 2007, tryk på Office-knappe, vælg excel-indstillinger, vælg avanceret, rul ned til "visningsindstillinger for denne projektmappe" - fjern fluebenet fra vis arkfaner
Kan ikke huske vejen i 2003, men det er nok også under indstillinger.
Har du allerede lavet makroen til at gå fra fane til fane?
For hvis ikke, så ville jeg nok anbefale en anden metode end det du beskriver
|
|
rassten
Guld bruger
Medlem: 26.Okt.2010
Status: Offline
Point: 694
|
Sendt: 27.Okt.2010 kl. 22:18 |
Andre nyttige linier:
ActiveWindow.DisplayWorkbookTabs = False
ActiveWindow.DisplayHorizontalScrollBar = False
ActiveWindow.DisplayVerticalScrollBar = False
Application.DisplayFormulaBar = False
ActiveWindow.DisplayHeadings = False
|
|
peppe
Sølv bruger
Medlem: 26.Okt.2010
Land: Danmark
Status: Offline
Point: 294
|
Sendt: 27.Okt.2010 kl. 22:56 |
Super forum herinde - tænk hvor jeg lærer meget...
1. Indstillinger --> avanceret ...
skjuler alle ark. super godt at vide, men i den specifikke opgave vil jeg gerne vise kun én arkfane.
2. BST
laver ændringer i min excel-opsætning eller får man blot nogle genveje til opsætning mv?
3. activeWindow.DisplayWorkbookTabs = False
tror lige jeg prøver den, men hvor skriver jeg koden?
Indtil videre, så tusind tak til Jer begge.
|
|
rassten
Guld bruger
Medlem: 26.Okt.2010
Status: Offline
Point: 694
|
Sendt: 27.Okt.2010 kl. 22:58 |
|
nr 1 og 3 gør det samme
|
|
rassten
Guld bruger
Medlem: 26.Okt.2010
Status: Offline
Point: 694
|
Sendt: 27.Okt.2010 kl. 23:05 |
i vba editor vælg ThisWorkBook
Private Sub Workbook_Open()
ActiveWindow.DisplayWorkbookTabs = False
End Sub
|
men den kunne også skrives andre steder, efter som når makroen når frem til linien vil fanerne blive skjult
|
|
rassten
Guld bruger
Medlem: 26.Okt.2010
Status: Offline
Point: 694
|
Sendt: 27.Okt.2010 kl. 23:33 |
Hvis du kan vil vise et bestemt ark
For Each ark In ActiveWorkbook.Worksheets
If ark.Name <> "Ark1" Then ark.Visible = xlSheetHidden
Next ark
|
bemærk at "ark" er en variabel og ikke vba-terminologi. Og "Ark1" selvfølgelig skal omskrives til det ark som du vil have vist
|
|
Allan
Forum Admin
Forum Admin
Medlem: 03.Feb.2010
Land: Danmark
Status: Offline
Point: 10330
|
Sendt: 28.Okt.2010 kl. 10:00 |
Rigtig gode løsninger fra rassten, jeg havde misforstået dit spørgsmål 
 peppe skrev:
2. BST
laver ændringer i min excel-opsætning eller får man blot nogle genveje til opsætning mv? |
Lidt info om BST-Utilities.
BST-Utilities er en værktøjskasse indeholdende pt. 107 ekstra værktøjer til Excel.
Mange af dem findes ikke i forvejen og er således rigtig gode at have ved hånden da de er hurtige og meget intuitive i deres brug.
BST-Utilities indeholder også en masse genveje til ting som ligger 'under motorhjelmen' i Excel, som f.eks dit eksempel med at skjule arkfanerne, eller helt nye som fjern, vis eller fremhæv dubletter, udvidede formler osv. Alt igen serveret på en lidt nemmere tilgængelig måde.
Der ændres ikke i opsætning eller noget andet ved at installere programmet, der er tale om en såkaldt 'Add in' til Excel som nemt fjernes igen hvis man bestemmer sig for det.
//Allan
|
|
peppe
Sølv bruger
Medlem: 26.Okt.2010
Land: Danmark
Status: Offline
Point: 294
|
Sendt: 28.Okt.2010 kl. 17:05 |
Takker for hjælpen til Jer begge.
Kunne være jeg lige skulle prøve BST - lyder fristende...
Allan - tror ikke du misforstod - tror nærmere det er min lidt sølle forklaring he he - jeg beklager.
Du går lige til benet, enkelt og forståeligt.
Tror jeg savnede en måde at skjule fanerne enkeltvis, men egentlig er der ikke nogen grund til at vise fanerne overhovedet.
Rassten - mange gode muligheder som helt klart er brugbare - tak
Jeg har lidt litteratur (Libris hæfter) om excel og om makroprogrammering, men kender I noget godt litteratur til en begynder, som godt vil lære at programmere VBA - gerne en uddybende forklaring til emnerne og gerne omfattende (og egentlig helst på dansk)?
Herfra Takker jeg Jer begge for den store hjælp
Peppe
|
|
Allan
Forum Admin
Forum Admin
Medlem: 03.Feb.2010
Land: Danmark
Status: Offline
Point: 10330
|
Sendt: 28.Okt.2010 kl. 20:22 |
Velbekomme herfra 
//Allan
|
|
Forum start
Forummets regler
Sådan uploader du filer
Marker Accepteret løsning
Del dine regneark
Excel-regneark.dk
Skjule arkfaner