Vraag : Wachtwoord voor looppas de macro

Hallo,

I de hulp van behoefteDeskundigen. Hoe te om een wachtwoord te plaatsen om de macro in bijlage in werking te stellen. Dit om gebruiker te verhinderen stelt toevallig deze macro in werking. De deskundigen van de hoop kunnen me helpen om deze eigenschap toe te voegen.  


" codeBody "
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
Sub ()
'Duidelijke die gegevensmacro door Andrew Swingewood wordt gecre�ërd (16/07/2010)
Schemerige MySheets
Schemerige I zoals lang
Schemerig j zoals lang
Schemerig r zoals lang

MySheets = Serie („CH1“, „Ch2“, „CH3“, „ch4“, „CH5“, „CH6“, „CH7“, „CH8“, „CH9“, „CH10“, „CH11“, „CH12“)
Voor I = 0 tot 11
    Voor j = 2 tot 22
        Als (IsNumeric (Bladen (MySheets (I)). Cellen (j, 1)) En (Bladen (MySheets (I)). Cellen (j, 1) <> 0)) Dan
            Voor r = 2 tot 9
                Bladen (MySheets (I)). Cellen (j, r) = ""
            Volgende r
        Eind als
    Volgende j
Volgende I
Sub van het eind

Antwoord : Wachtwoord voor looppas de macro

Loste het probleem door het dossier van de paydatatekst bij te werken en de .usr dossiers in de zelfde folder op te verwijderen
Andere oplossingen  
 
programming4us programming4us