Opmaak veranderd bij gedeeld bestand

[hafidakzin]

Goede middag,

ik gebruik een gedeeld Excel-bestand maar heb hierbij volgende probleem : twee bovenste rijen (met commandbuttons in )
zijn niet meer zichtbaar als ze naar beneden scrollen e.d.

Idealiter staan rij 1 en 2 ALTIJD zichtbaar op het werkblad (beeld - blokkeren - titels maar dan automatisch op bestandniveau).
Het kan zijn dat er ook een fout zit in mijn macro ?

Sub Wachtwoord()
    Dim a As Variant
    a = InputBox("Geef uw wachtwoord: ")
    Sheets("MAART").ScrollArea = ("A1:Z7000")
    
    If a = "d" Then
    Sheets("MAART").ScrollArea = ("B3:C7000")
    Range("B3").Select
         
    ElseIf a = "w" Then
    Sheets("MAART").ScrollArea = ("D3:D7000")
    Range("B3").Select
    
    ElseIf a = "f" Then
    Sheets("MAART").ScrollArea = ("E3:F7000")
    Range("E3").Select
         
    ElseIf a = "p" Then
    Sheets("MAART").ScrollArea = ("H3:Z7000")
    Range("H3").Select
    
    ElseIf a = "demo" Then
    Sheets("MAART").ScrollArea = ("A3:Z7000")
    Range("B3").Select
    
    Else
    MsgBox " Wachtwoord niet correct"
    MsgBox " Helaas zal dit bestand afgesloten worden. "
    ThisWorkbook.Close
    End If
End Sub


Private Sub Opstart()
   Call Module2.Wachtwoord
End Sub


Private Sub command3()
   Columns("A:G").Hidden = False
End Sub

 

[mastermindzh]

Beste hafidakzin,

Ik heb uw eerste bericht even aangepast met codetags, dit is een stuk netter en voorkomt dat delen van de code als smiley worden weergegeven.
U kunt dit zelf doen op de volgende manier:

Veel succes met de vraag :thumb:

 

[hafidakzin]

Bedankt ! Ik wist dit niet en zal het voortaan zeker gebruiken , is een pak overzichtelijker.

 

[VenA]

Ik weet niet met welke versie je werkt. Maar ga eens opzoek naar alle nadelen en beperkingen van het delen van excelbestanden. Veel functies staan uit en VBA werkt niet meer. Dus ik denk dat je het in die richting moet zoeken.

Om gebruikers lastig te vallen met twee berichten die ze weg moeten klikken lijkt mij ook niet prettig.

 

[hafidakzin]

Ik weet niet met welke versie je werkt. Maar ga eens opzoek naar alle nadelen en beperkingen van excelbestanden. Veel functies staan uit en VBA werkt niet meer. Dus ik denk dat je het in die richting moet zoeken.

Om gebruikers lastig te vallen met twee berichten die ze weg moeten klikken lijkt mij ook niet prettig.

Idd , in het te gebruiken bestand is dat 1 msgbox geworden.
Maar inderdaad , beperkingen van excel in achtnemend, ga ik een andere oplossing zoeken.
Ik open hiervoor een nieuwe topic : "moeder & dochterbestanden"