• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

gans blad blokkeren

Status
Niet open voor verdere reacties.

rocknroadie

Gebruiker
Lid geworden
5 sep 2016
Berichten
184
Hello,

hoe kan ik in excel een gans blad blokkeren?

ik ben zelf (in Excel 2016 Voor Mac) een soort van start pagina met navigatieknoppen aan het maken. userform kan ik niet gebruiken omdat in excel voor mac 2016 geen userforms meer zitten. dus dan maar zelf een blad maken en daar nen hoop knoppen op zetten :p

nu wil ik echter dat blad zodanig vast zetten dat er niet meer kan gescrold worden en dat die knoppen dus altijd mooi op zn plaats blijven staan.

hoe kan ik dat doen?


alvast bedankt

Marc
 
Probeer hier eens mee:

Code:
Private Sub Workbook_Open()
    Worksheets("Blad1").ScrollArea = "A1:Z35"
End Sub
 
Probeer hier eens mee:

Code:
Private Sub Workbook_Open()
    Worksheets("Blad1").ScrollArea = "A1:Z35"
End Sub

hmmmm

dat werkt niet.... ik heb het ook in een andere macro verwerkt (om ff te testen)

Sub Return_To_Main()
'
' Return_To_Main Macro
'

'
Sheets("SMOS").Visible = True
Sheets("SMOS").ScrollArea = "A1:Z35"
Sheets("Venuelist").Select
ActiveWindow.SelectedSheets.Visible = False
End Sub


en zo werkt het ok niet. zou zo normaal gezien toch moeten werken ook, niet?
 
Laatst bewerkt:
Als dit niet bij u werkt heeft dat te maken met de ^problemen die Mac heeft met de VBA van Windows-Office:
Code:
Sub Return_To_Main()
'
' Return_To_Main Macro

With Sheets("SMOS")
    .Visible = True
    .ScrollArea = "A1:M35"
End With
Sheets("Venuelist").Visible = False
End Sub
 
Als dit niet bij u werkt heeft dat te maken met de ^problemen die Mac heeft met de VBA van Windows-Office:
Code:
Sub Return_To_Main()
'
' Return_To_Main Macro

With Sheets("SMOS")
    .Visible = True
    .ScrollArea = "A1:M35"
End With
Sheets("Venuelist").Visible = False
End Sub


nope, werkt niet..... nochtans als ik m laat lopen geeft ie geen fouten.....
 
Probeer dit eens op het blad SMOS:
Code:
ActiveSheet.Range("A35").Select
ActiveWindow.FreezePanes = True
 
Laatst bewerkt:
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan