Αλλαγή ονόματος χρήστη με παραδείγματα κώδικα VBA - VBA

Αυτό το σύντομο σεμινάριο θα δείξει πώς να χρησιμοποιήσετε τη μέθοδο Application.UserName.

Λήψη και αλλαγή ονόματος χρήστη εφαρμογής σε VBA

Λήψη ονόματος χρήστη

Μπορείς να χρησιμοποιήσεις Application.UserName για επιστροφή ή ρύθμιση του ονόματος του τρέχοντος χρήστη. Αυτό είναι το προεπιλεγμένο όνομα που εμφανίζεται σε "μακροεντολή καταγεγραμμένη από", νέα σχόλια, "τελευταία αποθήκευση από" κ.λπ …

Μπορείτε να εμφανίσετε το όνομα του τρέχοντος χρήστη σε ένα πλαίσιο μηνυμάτων όπως αυτό:

MsgBox "Ο τρέχων χρήστης είναι" & Application.UserName

Αλλαγή ονόματος χρήστη

Μπορείτε να αλλάξετε το τρέχον όνομα χρήστη ως εξής:

Application.UserName = "MonkeyCoder"

Εάν ενδιαφέρεστε ποιος είναι ο συγγραφέας του τρέχοντος βιβλίου εργασίας, μπορείτε να το λάβετε ως εξής:

UserNameAuthor = ThisWorkbook.BuiltinDocumentProperties ("Συγγραφέας")

Μπορείτε επίσης να το αλλάξετε:

ThisWorkbook.BuiltinDocumentProperties ("Συγγραφέας") = "ItsMe"

Το όνομα χρήστη των Windows μπορεί να ληφθεί ως εξής:

UserNameWindows = Environ ("Όνομα χρήστη")

<