Frage : Kennwort für Durchlauf das Makro

Hallo, helfen

I Notwendigkeit Experten. Wie man ein Kennwort einstellt, um das angebrachte Makro laufen zu lassen. Dieses, zum des Benutzers zu verhindern laufen lassen versehentlich dieses Makro. Hoffnungexperten können mir helfen, diese Eigenschaft zu addieren.  


1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
Sub clearData ()
'Freies Datenmakro verursacht von Andrew Swingewood (16/07/2010)
Schwaches MySheets
I als lang verdunkeln
J als lang verdunkeln
R als lang verdunkeln

MySheets = Reihe („CH1“, „Ch2“, „CH3“, „CH4“, „CH5“, „CH6“, „CH7“, „CH8“, „CH9“, „CH10“, „CH11“, „CH12“)
Für i = 0 bis 11
    Für J = 2 bis 22
        Wenn (IsNumeric (Blätter (MySheets (i)). Zellen (J, 1)) und (Blätter (MySheets (i)). Zellen (J, 1) <> 0)) Dann
            Für r = 2 bis 9
                Blätter (MySheets (i)). Zellen (J, r) = ""
            Folgendes r
        Beenden wenn
    Folgendes J
Zunächst I
Enden-Unterseeboot

Antwort : Kennwort für Durchlauf das Makro

Löste das Problem indem die Aktualisierung der LOHNDATTextdatei und das Entfernen des .usr archiviert im gleichen Verzeichnis
Weitere Lösungen  
 
programming4us programming4us