[VBA] Εύρεση ημερομηνίας κατά το άνοιγμα

[Spirosgr]

Καλημέρα και χρόνια πολλά
Κατ' αρχήν μην έχεις πρόβλημα να ρωτάς οτιδήποτε
Κανείς δεν γεννήθηκε γνωρίζοντας πράγματα
Όλοι άσχετοι ήμασταν στην αρχή
Τώρα επί του θέματος
Το Option Explicit
Δεν έχει σχέση με τον κώδικα αυτώ καθ' αυτώ
Δεν είναι απαραίτητο για να λειτουργήσει ένας κώδικας και δεν πειράζει αν δεν το βάλουμε ΑΛΛΑ
Συνιστάτε και πρέπει να μπαίνει διότι μας υποχρεώνει να δηλώνουμε το σύνολο των μεταβλητών μας έτσι ώστε να αποφεύγονται λάθη
Ο κώδικας που ανοίγει το Workbook σε ορισμένο Worksheet της επιλογής μας είναι αυτός

Sub Auto_open()
Sheets("calendar").Activate
End Sub

Η λέξη μέσα στα εισαγωγικά είναι το όνομα του Worksheet που θέλουμε να ανοίξουμε

Το υπόλοιπο δεν είναι απαραίτητο αλλά κάνει την δουλειά πιο επαγγελματική
MsgBox ("WELLCOME !" & Chr(13) & "You Can Start Editing Data After Click OK Button..."), vbInformation

Είναι εντολή να μας βγάλει ένα Msgbox που θα γράφει κάτι που εμείς θέλουμε (οτιδήποτε γραφτεί μέσα στην παρένθεση και τα εισαγωγικά)
το Chr(13) ανάμεσα σε & αλλάζει γραμμή
Αν γράψεις την ίδια γραμμή κώδικα χωρίς αυτό απλά το αποτέλεσμα είναι μία σειρά και όχι δύο
Το vbInformation δίνει μία πληροφορία στο Msgbox
Έτσι που είναι το Msgbox στο πλαίσιο του γράφει Microsoft Excel
Δοκίμασε το εξής:
Μετά το vbInformation βάλε , "το όνομά σου" και δες το αποτέλεσμα
ΥΓ ΤΡΈΧΟΥΣΑ ΗΜΕΡΟΜΗΝΊΑ
Δεν επηρεάζετε από τον κώδικα και δεν έχει καμία σχέση με αυτόν
Είναι θέμα Μορφοποίησης υπό όρους
Άνοιξε την Μορφοποίηση να δεις τον κανόνα που ορίστηκε