Μετάβαση στο κύριο περιεχόμενο

Πώς να αποκτήσετε και να εισαγάγετε το τελευταίο τροποποιημένο όνομα χρήστη στο Excel;

Αυτό το άρθρο θα σας δείξει τον τρόπο για να λάβετε τις τελευταίες τροποποιημένες πληροφορίες ονόματος χρήστη και να εισαγάγετε τις τελευταίες τροποποιημένες πληροφορίες ονόματος χρήστη σε κελιά στο Excel.

Αποκτήστε το τελευταίο τροποποιημένο όνομα χρήστη του τρέχοντος βιβλίου εργασίας στο Excel
Εισαγάγετε το τελευταίο τροποποιημένο όνομα χρήστη του τρέχοντος βιβλίου εργασίας με τη λειτουργία που καθορίζεται από το χρήστη
Εισαγάγετε εύκολα το όνομα χρήστη στο κελί, την κεφαλίδα ή το υποσέλιδο με το Kutools για Excel


Αποκτήστε το τελευταίο τροποποιημένο όνομα χρήστη του τρέχοντος βιβλίου εργασίας στο Excel

Όπως γνωρίζουμε, μπορούμε να λάβουμε τις τελευταίες τροποποιημένες πληροφορίες ονόματος χρήστη στο παράθυρο διαλόγου Advanced Properties του τρέχοντος βιβλίου εργασίας.

Εάν χρησιμοποιείτε το Excel 2007

Μπορείτε να λάβετε το όνομα χρήστη που τροποποίησε το τρέχον βιβλίο εργασίας την τελευταία φορά στο Excel με τα ακόλουθα βήματα:

Βήμα 1: Κάντε κλικ στο Κουμπί γραφείου >> Προετοιμάστε >> Ιδιοκτησίες.

Βήμα 2: Στη συνέχεια, το παράθυρο εγγράφου προστίθεται πάνω από το φύλλο εργασίας. Κάντε κλικ στο Ιδιότητες εγγράφου >> Προηγμένες ιδιότητες.

Βήμα 3: Στο αναδυόμενο παράθυρο διαλόγου Advanced Properties, θα δείτε το Τελευταία αποθήκευση από: πληροφορίες στο πλαίσιο του Σε Πραγματικό Χρόνο Tab.

Εάν χρησιμοποιείτε την έκδοση Excel 2010, 2013 ή νεότερη έκδοση

Εάν χρησιμοποιείτε το Microsoft Excel 2010 ή νεότερη έκδοση, μπορείτε να λάβετε τις τελευταίες τροποποιημένες πληροφορίες χρήστη με τα ακόλουθα βήματα:

Απλά κάντε κλικ στο Αρχεία > Πληροφορίες, θα πάρετε το Τελευταία τροποποίηση από πληροφορίες στη δεξιά πλευρά κάτω Σχετικά άτομα Ενότητα. Δείτε το παρακάτω στιγμιότυπο οθόνης.


Εισαγάγετε το όνομα χρήστη που τροποποίησε το τρέχον βιβλίο εργασίας την τελευταία φορά με τη λειτουργία που καθορίζεται από το χρήστη

1: Κρατήστε πατημένο το ALT + F11 για να ανοίξετε το Microsoft Visual Basic για εφαρμογές παράθυρο.

2: Στο Microsoft Visual Basic για εφαρμογές παράθυρο, κάντε κλικ στην επιλογή Κύριο θέμα > Μονάδα μέτρησηςκαι επικολλήστε την ακόλουθη μακροεντολή στο παράθυρο της ενότητας. Δείτε το στιγμιότυπο οθόνηςL

Κωδικός VBA: Εισαγάγετε το τελευταίο τροποποιημένο όνομα χρήστη στο Excel

Function LastAuthor()
LastAuthor = ActiveWorkbook.BuiltinDocumentProperties("Last Author")
End Function

3: Πάτα το άλλος + Q πλήκτρα για να κλείσετε το Microsoft Visual Basic για εφαρμογές παράθυρο.

4. Επιλέξτε ένα κελί που θέλετε να τοποθετήσετε το όνομα χρήστη, εισαγάγετε τον τύπο = LastAuthor () στη γραμμή τύπων και, στη συνέχεια, πατήστε το εισάγετε κλειδί. Στη συνέχεια, το τελευταίο τροποποιημένο όνομα χρήστη εισάγεται αμέσως στο κελί. Δείτε το στιγμιότυπο οθόνης:


Εισαγάγετε εύκολα το όνομα χρήστη στο κελί, την κεφαλίδα ή το υποσέλιδο με το Kutools για Excel

Μπορείτε εύκολα να εισαγάγετε το όνομα χρήστη σε καθορισμένο κελί, κεφαλίδα φύλλου εργασίας ή υποσέλιδο στο Excel με το Εισαγωγή πληροφοριών βιβλίου εργασίας χρησιμότητα του Kutools για Excel. Κάντε τα εξής:

Πριν από την εφαρμογή Kutools για Excel, σας παρακαλούμε κατεβάστε και εγκαταστήστε το πρώτα.

1. κλικ Kutools Plus > Βιβλίο εργασίας > Εισαγωγή πληροφοριών βιβλίου εργασίας. Δείτε το στιγμιότυπο οθόνης:

2. Στο Εισαγωγή πληροφοριών βιβλίου εργασίας πλαίσιο διαλόγου, πρέπει:

1). Επίλεξε το όνομα χρήστη επιλογή του Πληροφορίες τμήμα.

2). Εάν θέλετε να εισαγάγετε το όνομα χρήστη σε ένα καθορισμένο κελί, προσδιορίστε αυτό το κελί στο Σειρά κουτί; για εισαγωγή ονόματος χρήστη στην κεφαλίδα ή στο υποσέλιδο, επιλέξτε το επικεφαλίδα or Υποσέλιδο επιλογή.

3). Κάντε κλικ στο Ok κουμπί. Δείτε το στιγμιότυπο οθόνης:

Στη συνέχεια, το όνομα χρήστη θα εισαχθεί αμέσως στην καθορισμένη θέση.

  Εάν θέλετε να έχετε μια δωρεάν δοκιμή (30-ημερών) αυτού του βοηθητικού προγράμματος, κάντε κλικ για να το κατεβάσετεκαι μετά πηγαίνετε για να εφαρμόσετε τη λειτουργία σύμφωνα με τα παραπάνω βήματα.

Τα καλύτερα εργαλεία παραγωγικότητας γραφείου

🤖 Kutools AI Aide: Επανάσταση στην ανάλυση δεδομένων με βάση: Ευφυής Εκτέλεση   |  Δημιουργία κώδικα  |  Δημιουργία προσαρμοσμένων τύπων  |  Αναλύστε δεδομένα και δημιουργήστε γραφήματα  |  Επίκληση Λειτουργιών Kutools...
Δημοφιλή χαρακτηριστικά: Εύρεση, επισήμανση ή αναγνώριση διπλότυπων   |  Διαγραφή κενών γραμμών   |  Συνδυάστε στήλες ή κελιά χωρίς απώλεια δεδομένων   |   Γύρος χωρίς φόρμουλα ...
Σούπερ Αναζήτηση: VLookup πολλαπλών κριτηρίων    VLookup πολλαπλών τιμών  |   VLookup σε πολλά φύλλα   |   Ασαφής αναζήτηση ....
Σύνθετη αναπτυσσόμενη λίστα: Γρήγορη δημιουργία αναπτυσσόμενης λίστας   |  Εξαρτημένη αναπτυσσόμενη λίστα   |  Πολλαπλή αναπτυσσόμενη λίστα ....
Διαχειριστής στήλης: Προσθέστε έναν συγκεκριμένο αριθμό στηλών  |  Μετακίνηση στηλών  |  Εναλλαγή κατάστασης ορατότητας κρυφών στηλών  |  Συγκρίνετε εύρη και στήλες ...
Επιλεγμένα Χαρακτηριστικά: Εστίαση πλέγματος   |  Προβολή σχεδίου   |   Μεγάλη Formula Bar    Διαχείριση βιβλίου εργασίας & φύλλου   |  Βιβλιοθήκη πόρων (Αυτόματο κείμενο)   |  Επιλογή ημερομηνίας   |  Συνδυάστε φύλλα εργασίας   |  Κρυπτογράφηση/Αποκρυπτογράφηση κελιών    Αποστολή email ανά λίστα   |  Σούπερ φίλτρο   |   Ειδικό φίλτρο (φίλτρο με έντονη γραφή/πλάγια γραφή/διαγραφή...) ...
Κορυφαία 15 σύνολα εργαλείων12 Κείμενο Εργαλεία (Προσθήκη κειμένου, Κατάργηση χαρακτήρων, ...)   |   50 + Διάγραμμα Τύποι (Gantt διάγραμμα, ...)   |   40+ Πρακτικό ΜΑΘΗΜΑΤΙΚΟΙ τυποι (Υπολογίστε την ηλικία με βάση τα γενέθλια, ...)   |   19 Εισαγωγή Εργαλεία (Εισαγωγή κωδικού QR, Εισαγωγή εικόνας από το μονοπάτι, ...)   |   12 Μετατροπή Εργαλεία (Αριθμοί σε λέξεις, Μετατροπή Συναλλάγματος, ...)   |   7 Συγχώνευση & διαχωρισμός Εργαλεία (Σύνθετες σειρές συνδυασμού, Διαίρεση κελιών, ...)   |   ... κι αλλα

Αυξήστε τις δεξιότητές σας στο Excel με τα Kutools για Excel και απολαύστε την αποτελεσματικότητα όπως ποτέ πριν. Το Kutools για Excel προσφέρει πάνω από 300 προηγμένες δυνατότητες για την ενίσχυση της παραγωγικότητας και την εξοικονόμηση χρόνου.  Κάντε κλικ εδώ για να αποκτήσετε τη δυνατότητα που χρειάζεστε περισσότερο...

Περιγραφή


Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη

  • Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
  • Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
  • Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!
Comments (16)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
How can the Activeworkbook be dynamic?

I tried to no success the below code

LastSavedby = Range("A1").value.BuiltinDocumentProperties("Last Author")

Where in A1 contains the path of the file with the file name and extension
This comment was minimized by the moderator on the site
Hi! I, my case it doesn't work automatically, I need to press "enter" after the formula "= VBAProject.Module3.LastAuthor()".
How should i make it automatic?
Thank you
This comment was minimized by the moderator on the site
Hey, this code worked nicely. Is there a way I can display the user name if a ROW is adjusted? For example, I hhave Column K with the header "Last modified By", and I want to know who adjusted "each row" as this is a shared document. I have the below code for Date, which works like how I would want the name to work: Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column > 11 Or Target.Row = 1 Then Exit Sub Application.EnableEvents = False Cells(Target.Row, 12) = Now Application.EnableEvents = True End Sub Please email me if possible
This comment was minimized by the moderator on the site
Hi. I would like to ask how to write the VBA codes to retrieve all current users which modifying on the worksheet. Thank You:)
This comment was minimized by the moderator on the site
thanks a lot for this helpful article. I used it and it worked well. can I get the last modified date on that sheet just like the username ? MANY THANKS
This comment was minimized by the moderator on the site
Can u pls help if iwant the user name to appear in aspreadsheet as and when the previous cell is filled by a user
This comment was minimized by the moderator on the site
Thanks, Cp & Jay Chivo :)
This comment was minimized by the moderator on the site
Sub UserName() Sheets("Sheet1").Range("A1").Value = Environ("username") End Sub --------------- Change the sheet name
This comment was minimized by the moderator on the site
I am runing excel 2007 and am getting the runtime error 9, script out of range as well. any way to make it work in excel 2007?
This comment was minimized by the moderator on the site
Excel 2010. Same time i would like to ask that is it possible to use this Subscript with another function script ? Thanks Naghman
This comment was minimized by the moderator on the site
[quote]Excel 2010. Same time i would like to ask that is it possible to use this Subscript with another function script ? Thanks NaghmanBy Naghman[/quote] With another script? What script? :-)
This comment was minimized by the moderator on the site
To get last saved date. Function LastSaveDate() Application.Volatile True LastSaveDate = FileDateTime(ThisWorkbook.FullName) End Function
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations