[VBA] Παράκαμψη κωδικού πρόσβασης

[pierta]

Καλησπέρα και καλή χρονιά σε όλους με υγεία.
Θα ήθελα τη βοήθειά σας.
Στο συνημμένο αρχείο έχω ένα κώδικα όπου κλείνει και ανοίγει ξανά το ίδιο αρχείο.
Το αρχείο έχει κωδικό πρόσβασης "1234".
Υπάρχει τρόπος να ανοίγει το αρχείο χωρίς να μου ζητάει τον κωδικό.
Ευχαριστώ

[Tasos]

Καλησπέρα σε όλους!

Δημήτρη, βεβαίως και γίνεται.

Στο συνημμένο του μηνύματος (με κωδικό 1234) υπάρχει ο παρακάτω κώδικας:

Option Explicit

Sub ReOpen()
    ThisWorkbook.Saved = True
    ThisWorkbook.ChangeFileAccess xlReadOnly
    ThisWorkbook.ChangeFileAccess xlReadWrite
End Sub

Ίσως χρειαστεί να αντιστοιχίσεις ξανά τη μακροεντολή στο κουμπί πάνω στο φύλλο εργασίας.

Καλή συνέχεια!

Τάσος

[pierta]

Αρχική Δημοσίευση από Tasos

Καλησπέρα σε όλους!

Δημήτρη, βεβαίως και γίνεται.

Στο συνημμένο του μηνύματος (με κωδικό 1234) υπάρχει ο παρακάτω κώδικας:

Option Explicit

Sub ReOpen()
    ThisWorkbook.Saved = True
    ThisWorkbook.ChangeFileAccess xlReadOnly
    ThisWorkbook.ChangeFileAccess xlReadWrite
End Sub

Ίσως χρειαστεί να αντιστοιχίσεις ξανά τη μακροεντολή στο κουμπί πάνω στο φύλλο εργασίας.

Καλή συνέχεια!

Τάσος

Σε ευχαριστώ πολύ Τάσο να είσαι καλά.
Καλή συνέχεια