Note: The other languages of the website are Google-translated. Back to English
Σύνδεση Εγγραφή

Λήψη και εισαγωγή του δημιουργημένου χρόνου και της τελευταίας τροποποιημένης ώρας σε κελιά

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

Αποκτήστε την ώρα δημιουργίας και την τελευταία τροποποιημένη ώρα στο Excel με την εντολή Info

Αποκτήστε την ώρα δημιουργίας και την τελευταία τροποποιημένη ώρα στο Excel με τη λειτουργία Advanced Properties

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

Εισαγάγετε τη δημιουργημένη ώρα και την τελευταία τροποποιημένη ώρα στα κελιά / κεφαλίδα / υποσέλιδο με το Kutools για Excel καλή ιδέα3

βέλος μπλε δεξιά φούσκα Αποκτήστε την ώρα δημιουργίας και την τελευταία τροποποιημένη ώρα στο Excel με την εντολή Info

Μπορούμε να μάθουμε τον ακριβή χρόνο δημιουργίας και την τελευταία τροποποιημένη ώρα του τρέχοντος βιβλίου εργασίας σε προβολή στα παρασκήνια του Microsoft Excel 2010/2013.

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

-2

 

Σημείωση: Αυτός ο τρόπος είναι διαθέσιμος μόνο στο Microsoft Excel 2010/2013. Δεν είναι έγκυρο στο Excel 2007.

βέλος μπλε δεξιά φούσκαΑποκτήστε την ώρα δημιουργίας και την τελευταία τροποποιημένη ώρα στο Excel με τη λειτουργία Advanced Properties

Στην πραγματικότητα, μπορούμε να λάβουμε τόσο τον χρόνο δημιουργίας όσο και την τελευταία τροποποιημένη ώρα του τρέχοντος βιβλίου εργασίας στο παράθυρο διαλόγου Ιδιότητες εγγράφου.
1 βήμα: Ανοιξε το Προηγμένες ιδιότητες κουτί διαλόγου:

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

doc-ένθετο-τροποποιημένος-χρόνος-3-3
-1
doc-ένθετο-τροποποιημένος-χρόνος-4-4

 

Στο Excel 2010/2013, κάντε κλικ στο φιλέτο > Πληροφορίες > Ιδιοκτησίες > Προηγμένες ιδιότητες.

doc-ένθετο-τροποποιημένος-χρόνος-4-4

2 βήμα: Στο Προηγμένες ιδιότητες πλαίσιο διαλόγου, θα δείτε την ώρα δημιουργίας και την τελευταία τροποποιημένη ώρα στην καρτέλα Στατιστικά. Δείτε το παρακάτω στιγμιότυπο οθόνης:

doc-ένθετο-τροποποιημένος-χρόνος-4-4

βέλος μπλε δεξιά φούσκα Εισαγάγετε την ώρα δημιουργίας και την τελευταία τροποποιημένη ώρα σε κελιά στο Excel με κωδικό VBA

Οι ακόλουθες μακροεντολές VBA θα σας βοηθήσουν να εισαγάγετε απευθείας τη δημιουργημένη ώρα και την τελευταία τροποποιημένη ώρα των τρεχουσών πληροφοριών του βιβλίου εργασίας σε κελιά απευθείας.

Εισαγάγετε τόσο την ώρα δημιουργίας όσο και την τελευταία τροποποιημένη ώρα στο Excel

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

2 βήμα: Κάντε κλικ Κύριο θέμα >> Μονάδα μέτρησηςκαι επικολλήστε την ακόλουθη μακροεντολή στο παράθυρο της ενότητας.

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

Sub Workbook_Open()
Range("A1").Value = Format(ThisWorkbook.BuiltinDocumentProperties("Creation Date"), "short date")
Range("A2").Value = Format(ThisWorkbook.BuiltinDocumentProperties("Last Save Time"), "short date")
End Sub

3 βήμα:Πάτα το F5 κλειδί για την εκτέλεση αυτής της μακροεντολής. Και τότε η ημερομηνία δημιουργίας και η τελευταία τροποποιημένη ημερομηνία θα εισαχθούν ξεχωριστά στο κελί A1 και στο κελί A2.

Note: μπορείτε να τροποποιήσετε το κελί προορισμού στο VB ανάλογα με τις ανάγκες σας.

Εισαγάγετε την τελευταία τροποποιημένη ώρα του βιβλίου εργασίας στο Excel

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

2 βήμα: Κάντε κλικ Κύριο θέμα >> Μονάδα μέτρησηςκαι επικολλήστε την ακόλουθη μακροεντολή στο παράθυρο της ενότητας.

Public Function ModDate()
ModDate = Format(FileDateTime(ThisWorkbook.FullName), "m/d/yy h:n ampm")
End Function

3 βήμα: Στη συνέχεια, αποθηκεύστε και κλείστε αυτόν τον κωδικό και επιστρέψτε στο φύλλο εργασίας, σε ένα κενό κελί, εισαγάγετε τον τύπο του = ModDate (), και πατήστε το εισάγετε κλειδί. Στη συνέχεια εισάγει την τελευταία τροποποιημένη ώρα στο κελί.

-2

Εισαγωγή δημιουργημένου χρόνου εργασίας στο Excel

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

2 βήμα: Κάντε κλικ Κύριο θέμα >> Μονάδα μέτρησηςκαι επικολλήστε την ακόλουθη μακροεντολή στο παράθυρο της ενότητας.

Function CreateDate() As Date
CreateDate = ActiveWorkbook.BuiltinDocumentProperties("Creation Date")
End Function

3 βήμα: Αποθηκεύστε και κλείστε αυτόν τον κωδικό, επιστρέψτε στο φύλλο εργασίας, σε ένα κενό κελί, εισαγάγετε τον τύπο του = Δημιουργία ημερομηνίας (), και πατήστε το εισάγετε κλειδί. και η ημερομηνία δημιουργίας θα εισαχθεί στο κελί ως εξής στιγμιότυπα οθόνης που εμφανίζονται:

-2

Σημείωση: Εάν το κελί σας δεν έχει μορφή ημερομηνίας, μπορεί να εμφανίζει έναν παράξενο αριθμό. Απλά μορφοποιήστε αυτό το κελί ως Ημερομηνία μορφή, θα εμφανίζεται ως κανονική ημερομηνία.

βέλος μπλε δεξιά φούσκα Εισαγάγετε τη δημιουργημένη ώρα και την τελευταία τροποποιημένη ώρα στα κελιά / κεφαλίδα / υποσέλιδο με το Kutools για Excel

Μπορώ να σας παρουσιάσω ένα εύχρηστο εργαλείο--Kutools για Excel Ποιες με περισσότερες από 300 χρήσιμες λειτουργίες μπορούν να βελτιώσουν την αποτελεσματικότητα της εργασίας σας; Με τα Εισαγωγή πληροφοριών βιβλίου εργασίας Συνάρτηση, μπορείτε να εισαγάγετε γρήγορα τη διαδρομή του βιβλίου εργασίας, το όνομα του βιβλίου εργασίας / φύλλου εργασίας, το όνομα χρήστη ή την ώρα δημιουργίας και την τελευταία τροποποιημένη ώρα σε κελιά ή κεφαλίδα ή υποσέλιδο.

Kutools για Excel, με περισσότερα από 300 εύχρηστες λειτουργίες, διευκολύνει τις εργασίες σας. 
Δωρεάν κατέβασμα
δωρεάν πλήρεις δυνατότητες σε 30 ημέρες

Μετά το δωρεάν εγκατάσταση Kutools για Excel, κάντε τα παρακάτω:

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

2. Στη συνέχεια, στο Εισαγωγή πληροφοριών βιβλίου εργασίας διαλόγου, ελέγξτε τις πληροφορίες που θέλετε να εισαγάγετε από την ενότητα Πληροφορίες και, στη συνέχεια, μεταβείτε για να καθορίσετε τη θέση στην οποία θέλετε να εισαγάγετε, μπορείτε να επιλέξετε κελιά, υποσέλιδο (αριστερό υποσέλιδο, κεντρικό υποσέλιδο, δεξί υποσέλιδο) ή κεφαλίδα (αριστερή κεφαλίδα, κεντρική κεφαλίδα, σωστή κεφαλίδα). Δείτε το στιγμιότυπο οθόνης:
το ένθετο doc δημιουργήθηκε τροποποιημένος χρόνος 1

3. κλικ Okκαι οι πληροφορίες που ελέγχετε έχουν εισαχθεί στην τοποθεσία που καθορίζετε.

Υπόδειξη. Εάν θέλετε να δοκιμάσετε δωρεάν τη συνάρτηση Insert Workbook Information, μεταβείτε στη δωρεάν λήψη Kutools για Excel πρώτα και μετά πηγαίνετε για να εφαρμόσετε τη λειτουργία σύμφωνα με τα παραπάνω βήματα.

βέλος μπλε δεξιά φούσκα Εισαγωγή πληροφοριών βιβλίου εργασίας


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

Το Kutools για Excel λύνει τα περισσότερα από τα προβλήματά σας και αυξάνει την παραγωγικότητά σας κατά 80%

  • Επαναχρησιμοποίηση: Εισαγάγετε γρήγορα σύνθετοι τύποι, γραφήματα και οτιδήποτε έχετε χρησιμοποιήσει στο παρελθόν. Κρυπτογράφηση κυττάρων με κωδικό πρόσβασης Δημιουργία λίστας αλληλογραφίας και στείλτε email ...
  • Super Formula Bar (επεξεργαστείτε εύκολα πολλές γραμμές κειμένου και τύπου). Διάταξη ανάγνωσης (εύκολη ανάγνωση και επεξεργασία μεγάλου αριθμού κελιών). Επικόλληση σε φιλτραρισμένο εύρος...
  • Συγχώνευση κελιών / σειρών / στηλών χωρίς απώλεια δεδομένων · Περιεχόμενο διαχωρισμού κελιών Συνδυάστε διπλές σειρές / στήλες... Αποτροπή διπλών κυττάρων; Συγκρίνετε τα εύρη...
  • Επιλέξτε Διπλότυπο ή Μοναδικό Σειρές; Επιλέξτε Κενές σειρές (όλα τα κελιά είναι κενά). Σούπερ εύρεση και ασαφής εύρεση σε πολλά βιβλία εργασίας. Τυχαία επιλογή ...
  • Ακριβές αντίγραφο Πολλαπλά κελιά χωρίς αλλαγή της αναφοράς τύπου. Αυτόματη δημιουργία αναφορών σε πολλαπλά φύλλα? Εισαγωγή κουκκίδων, Πλαίσια ελέγχου και άλλα ...
  • Εξαγωγή κειμένου, Προσθήκη κειμένου, Κατάργηση κατά θέση, Αφαιρέστε το διάστημα; Δημιουργία και εκτύπωση υποσύνολων σελιδοποίησης. Μετατροπή περιεχομένου και σχολίων μεταξύ κελιών...
  • Σούπερ φίλτρο (αποθηκεύστε και εφαρμόστε σχήματα φίλτρων σε άλλα φύλλα). Προηγμένη ταξινόμηση ανά μήνα / εβδομάδα / ημέρα, συχνότητα και άλλα. Ειδικό φίλτρο με έντονη, πλάγια ...
  • Συνδυάστε βιβλία εργασίας και φύλλα εργασίας; Συγχώνευση πινάκων βάσει βασικών στηλών. Διαχωρίστε τα δεδομένα σε πολλά φύλλα; Μαζική μετατροπή xls, xlsx και PDF...
  • Περισσότερα από 300 ισχυρά χαρακτηριστικά. Υποστηρίζει Office / Excel 2007-2021 και 365. Υποστηρίζει όλες τις γλώσσες. Εύκολη ανάπτυξη στην επιχείρηση ή τον οργανισμό σας. Πλήρεις δυνατότητες δωρεάν δοκιμής 30 ημερών. Εγγύηση επιστροφής χρημάτων 60 ημερών.
kte καρτέλα 201905

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

  • Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
  • Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
  • Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!
κάτω μέρος γραφείου
Σχόλια (21)
Δεν υπάρχουν ακόμη βαθμολογίες. Γίνε ο πρώτος που θα αξιολογήσετε!
Ο Σιέντ Νεχάλ
Ο Σιέντ Νεχάλ
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Χρήσιμες πληροφορίες.... :-)
απάντηση
0
0
Brian
Brian
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Αυτό ήταν τέλειο. Ακριβώς αυτό που έψαχνα. Ευχαριστώ πολύ!!
απάντηση
0
0
Khalid
Khalid
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Ευχαριστούμε πολύ για τη βοήθεια, αυτά χρειαζόμαστε. οι κωδικοί λειτουργούν σωστά αλλά χωρίς ενημέρωση, σημαίνει ότι δεν ενημερώνεται η ημερομηνία τροποποίησης μόλις αποθηκεύσω. εχεις καποια λυση για αυτο? Προσπάθησα πολλές φορές, αποθηκεύω, κλείνω και ανοίγω ξανά, χωρίς ενημέρωση για την ημερομηνία.
απάντηση
0
0
alex
alex     Khalid
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Γεια σου Khalid,

Είχα το ίδιο θέμα και πρόσθεσα τη γραμμή "Application.Volatile" στον κωδικό και όταν πατήσω το F9 θα ενημερώσει τις πληροφορίες.
Το είδα στο βίντεο "Learn Excel - "Function for Last Saved Time": Podcast #1725 " του Bill Jelen.
@Bill: Ευχαριστώ πολύ για το βίντεο!

https://www.youtube.com/watch?v=KnSA6xdmc2Q

Χαιρετισμούς,
alex
απάντηση
0
0
Larry S. Peteet
Larry S. Peteet
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Γεια: Το έκανα με διαφορετικό τρόπο αλλά και με κωδικοποίηση. Αφού πρόσθεσα κώδικα, με κάνει να αποθηκεύσω το βιβλίο εργασίας με Μακροεντολές και κατά συνέπεια ως *.XLSM. Αυτό είναι εντάξει, αλλά πολλά μέρη δεν επιτρέπουν τέτοιου είδους μακροεντολές. Υπάρχει τρόπος να γίνει αυτό (ή να αποθηκεύσετε το βιβλίο εργασίας με την αλλαγή) σε ένα κανονικό .XLS; Υποθέτω επίσης ότι θα ζητήσει από κάποιον να "Ενεργοποιήσει τις μακροεντολές" εάν έχει ενεργοποιημένη αυτήν τη ρύθμιση (είμαι σύμβουλος και στα περισσότερα μέρη που εργάζομαι με κάνει να ενεργοποιώ τις μακροεντολές όταν αυτό ισχύει μετά το άνοιγμα ενός βιβλίου εργασίας). FYI: Να πώς το έκανα σε μια μακροεντολή (όχι καλύτερα, απλά διαφορετικά). Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, _ Cancel As Boolean) Cancel = False With ActiveSheet.PageSetup ' .LeftHeader = "" ' .CenterHeader = "" ' .RightHeader = "Τελευταία ενημέρωση "( & Format(Now /ηη/εεεε") .RightHeader = "" .RightFooter = "Τελευταία ενημέρωση" & Μορφή(Τώρα(), "μμ/ηη/εεεε") Τέλος με Τέλος Υπο
απάντηση
0
0
UMAIR
UMAIR
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Αυτές οι πληροφορίες είναι πολύ χρήσιμες για μένα. ευχαριστώ ανησυχία
απάντηση
0
0
UMAIR
UMAIR
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
ευχαριστώ για αυτές τις πληροφορίες
απάντηση
0
0
Σουράν
Σουράν
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
[quote]Γεια: Το έκανα με διαφορετικό τρόπο αλλά και κωδικοποιώντας. Αφού πρόσθεσα κώδικα, με κάνει να αποθηκεύσω το βιβλίο εργασίας με Μακροεντολές και κατά συνέπεια ως *.XLSM. Αυτό είναι εντάξει, αλλά πολλά μέρη δεν επιτρέπουν τέτοιου είδους μακροεντολές. Υπάρχει τρόπος να γίνει αυτό (ή να αποθηκεύσετε το βιβλίο εργασίας με την αλλαγή) σε ένα κανονικό .XLS; Υποθέτω επίσης ότι θα ζητήσει από κάποιον να "Ενεργοποιήσει τις μακροεντολές" εάν έχει ενεργοποιημένη αυτήν τη ρύθμιση (είμαι σύμβουλος και στα περισσότερα μέρη που εργάζομαι με κάνει να ενεργοποιώ τις μακροεντολές όταν αυτό ισχύει μετά το άνοιγμα ενός βιβλίου εργασίας). FYI: Να πώς το έκανα σε μια μακροεντολή (όχι καλύτερα, απλά διαφορετικά). Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, _ Cancel As Boolean) Cancel = False With ActiveSheet.PageSetup ' .LeftHeader = "" ' .CenterHeader = "" ' .RightHeader = "Τελευταία ενημέρωση "( & Format(Now /ηη/εεεε") .RightHeader = "" .RightFooter = "Τελευταία ενημέρωση" & Μορφή(Τώρα(), "μμ/ηη/εεεε") Τέλος με Τέλος ΥποΤου Larry S. Peteet[/quote] Γεια σας Έβαλα με επιτυχία την Ημερομηνία και ώρα τελευταίας τροποποίησης, αλλά δεν ενημερώνεται όταν αποθηκεύετε και ανοίγετε ξανά το βιβλίο εργασίας. Παρακαλώ βοηθήστε εδώ...... δεν ξέρω για κωδικοποίηση, επομένως αντιγράφω όποιες πληροφορίες δίνονται σε τέτοια φόρουμ Ευχαριστώ Swaran
απάντηση
0
0
Billg
Billg     Σουράν
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Ναι, έχω το ίδιο πρόβλημα - λειτούργησε τέλεια χθες, αλλά σήμερα δεν θα άλλαζε όταν αποθηκευτεί.
απάντηση
0
0
Ασράφ
Ασράφ
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Παρακαλώ βοηθήστε!!! πρέπει να επιστρέψετε την ημερομηνία και την ώρα της τελευταίας τροποποίησης ενός κλειστού αρχείου και να επιστρέψετε αυτές τις πληροφορίες σε ένα κελί του ανοιχτού αρχείου
απάντηση
0
0
Ντέιβιντ
Ντέιβιντ
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Γεια, αυτό ήταν υπέροχο. Είναι δυνατόν να εισαγάγετε την ημερομηνία δημιουργίας και την ημερομηνία τελευταίας τροποποίησης ενός διαφορετικού βιβλίου εργασίας; Ψάχνω να δημιουργήσω ένα αρχείο ευρετηρίου που θα μου ενημερώνει πότε ενημερώθηκαν για τελευταία φορά άλλα έγγραφα. Ευχαριστώ!!
απάντηση
0
0
Τζούλι Χιουζ
Τζούλι Χιουζ
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Hiya Love love μου αρέσει αυτό, αλλά δυστυχώς η ημερομηνία εμφανίζεται μόνο στις ΗΠΑ και στην Αυστραλία έχουμε ηη/μμ/εε Βαρέθηκα να την αλλάξω σε αυτήν τη μορφή χρησιμοποιώντας την ενότητα "Ημερομηνία", αλλά δεν είχα καμία τύχη. Καμιά ιδέα?
απάντηση
0
0
MurrayFree
MurrayFree     Τζούλι Χιουζ
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Julie - στον κώδικα VBA χρησιμοποιήστε αντί αυτού "ηη/μμ/εε ωω:ν". Αυτό θα βάλει την ημερομηνία στη «σωστή» σειρά! :χαχαχα:
απάντηση
0
0
Μοχτάρ
Μοχτάρ
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
πολύ πολύ πολύ πολύ πολύ πολύ πολύ πολύ χρήσιμο ευχαριστώ
απάντηση
0
0
Μπρους
Μπρους
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Θα μπορούσε να τροποποιηθεί για να εμφανιστεί η ημερομηνία δημιουργίας του άλλα κλειστά αρχεία; Θα ήθελα να συγκρίνω την ημερομηνία δημιουργίας ενός αρχείου στην επιφάνεια εργασίας μου με ένα αρχείο σε δημόσιο διακομιστή ιστού. Θα μπορούσα να δημιουργήσω τον τύπο για να χρησιμοποιήσω τις συναρτήσεις σας...CreateDate() του τοπικού αρχείου στο CreateDate() του αρχείου web...και να με ειδοποιήσω για μια αλλαγή. Εκτιμώ την βοήθειά σου. Μπρους
απάντηση
0
0
Christopher Huergo
Christopher Huergo
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Ευχαριστώ για τη βοήθεια, αλλά είχα επίσης ένα πρόβλημα με το κελί που δεν ενημερώνεται μετά από αποθήκευση χωρίς να χρειαστεί πρώτα να κλείσω και να ανοίξω ξανά το βιβλίο εργασίας. Πρόσθεσα τον ακόλουθο κώδικα στο βιβλίο εργασίας που ανανεώνεται μετά από ένα συμβάν αποθήκευσης: Private Sub Workbook_AfterSave(ByVal Success As Boolean) If Success Τότε ActiveSheet.Calculate End If End Sub Αυτό μου έκανε το κόλπο. Ελπίζω να βοηθήσει.
απάντηση
0
0
Ο Γουέιν Έρφλινγκ
Ο Γουέιν Έρφλινγκ
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Βλέπω ότι το "Last Save Time" αναφέρεται μόνο ΜΙΑ ΦΟΡΑ στον κώδικα. Χρησιμοποιώ το Excel 2010. Όταν βάζω το "Last Save Time" σε μια συνάρτηση, ακόμα και με το Application.Volatile(true), η τιμή δεν ενημερώνεται ποτέ. Στη συνέχεια, παρατήρησα ότι η τιμή που επιστράφηκε από το "Last Save Time" δεν εμφανίζεται στη σελίδα "Ιδιότητες" του Excel 2010 ΟΥΤΕ καμία από τις καρτέλες στο παράθυρο διαλόγου "Advanced Properties". Θα μπορούσε το "Last Save Time" να είναι κάποιο λείψανο;
απάντηση
0
0
Ο Γουέιν Έρφλινγκ
Ο Γουέιν Έρφλινγκ
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Έμαθα γιατί το "Last Save Time" δεν λειτουργούσε για μένα. Έβαλα τη λειτουργία μου στο αρχείο μου .XLA και το "ThisWorkbook" αναφερόταν στο ίδιο το αρχείο .XLA. Επομένως χρειάστηκε να πάρω το Application.ActiveWorkbook (προφανώς τη θέση της κλήσης συνάρτησης), που καταλήγει σε: Συνάρτηση DocumentProperty(PropertyName As String) ' 'Μπορείτε να ανατρέξετε στις ιδιότητες του εγγράφου είτε με βάση την τιμή ευρετηρίου είτε με το όνομα. Η ακόλουθη λίστα εμφανίζει τα διαθέσιμα ενσωματωμένα ονόματα ιδιοτήτων εγγράφων: «Τίτλος Θέμα Συγγραφέας «Πρότυπο σχολίων Λέξεις-κλειδιά» Αριθμός αναθεώρησης Τελευταίος συγγραφέας Όνομα εφαρμογής «Ημερομηνία τελευταίας εκτύπωσης Ημερομηνία δημιουργίας Τελευταίος χρόνος αποθήκευσης «Συνολικός χρόνος επεξεργασίας Αριθμός σελίδων Αριθμός λέξεων «Αριθμός Χαρακτήρες Κατηγορία ασφαλείας «Διαχειριστής μορφής Εταιρεία» Αριθμός byte Αριθμός γραμμών Αριθμός παραγράφων «Αριθμός διαφανειών Αριθμός σημειώσεων Αριθμός κρυφών διαφανειών «Αριθμός κλιπ πολυμέσων Υπερσύνδεση Βάση αριθμός χαρακτήρων (με κενά) Εφαρμογή κλήσης. Πτητικές (Αληθινές) Dim ActiveUserWorkbook On Σφάλμα Συνέχιση Επόμενο Ορισμός ActiveUserWorkbook = Application.ActiveWorkbook If Err.Number 0 Τότε DocumentProperty = "!!! Σφάλμα κατά τη λήψη του Application.ActiveWorkbook: " & Err.Description Λειτουργία εξόδου Τέλος If DocumentPropertyor If DocumentPropertyor IfDocumentPropertyUperties. 0 Τότε DocumentProperty = "!!! Άγνωστο όνομα ιδιότητας !!!" Exit Function End If End Function
απάντηση
0
0
Σουτζίν Ρατζ
Σουτζίν Ρατζ
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Γεια σου Ομάδα, χρειάζομαι τη βοήθειά σου. Έχω ένα αρχείο excel, εκεί θέλω να βρω την ημερομηνία τροποποίησης ενός συγκεκριμένου κελιού. Παρακαλώ βοηθήστε με με την κωδικοποίηση εδώ, αν είναι δυνατόν. Ευχαριστώ εκ των προτέρων.
απάντηση
0
0
γρύλος
γρύλος
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
Θέλω να δημιουργήσω αυτόματα ένα διάστημα μεταξύ κάθε πελάτη στο excel πώς μπορώ να το κάνω αυτό;
απάντηση
0
0
Γαβριήλ
Γαβριήλ
Αυτό το σχόλιο ελαχιστοποιήθηκε από τον συντονιστή του ιστότοπου
ΣΕ ΑΓΑΠΩ!!!! TKSSSSSS
απάντηση
0
0
Δεν υπάρχουν σχόλια δημοσιεύτηκε ακόμα
Αφήστε τα σχόλιά σας
Επισκέπτης
Δημοσίευση ως επισκέπτης
Σύνδεση
×
Αξιολογήστε αυτήν την ανάρτηση:
Επαναφορά
0   Χαρακτήρες
Προτεινόμενες τοποθεσίες

Ακολουθησε μας

Πνευματικά δικαιώματα © 2009 - www.extendoffice.com. | Ολα τα δικαιώματα διατηρούνται. Τροφοδοτείται από ExtendOffice. | Sitemap
Το Microsoft και το λογότυπο του Office είναι εμπορικά σήματα ή σήματα κατατεθέντα της Microsoft Corporation στις Ηνωμένες Πολιτείες ή / και σε άλλες χώρες.
Προστατεύεται από το Sectigo SSL