Διαχείριση ημερομηνιών μέσω Visual Basic for Excel

VB Script και κολπάκια, Excel macro, Word, Powerpoint, κτλ

Συντονιστές: WebDev Moderators, Super-Moderators

Απάντηση
Άβαταρ μέλους
gvarth
Δημοσιεύσεις: 155
Εγγραφή: 02 Αύγ 2006 11:02
Τοποθεσία: Μαρούσι
Επικοινωνία:

Διαχείριση ημερομηνιών μέσω Visual Basic for Excel

Δημοσίευση από gvarth » 18 Οκτ 2007 13:19

Παιδιά καλημέρα,

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

Υπάρχουν τυχαία ονόματα και ημερομηνίες που υποτίθεται ότι λήγει η σύμβαση που έχουν με την ασφαλιστική εταιρεία τους. Πατώντας λοιπόν πάνω σε συγκεκριμένο κουμπί στο φύλλο εργασίας , εμφανίζεται παράθυρο διαλόγου το οποίο παρουσιάζει την σημερινή ημερομηνία - χωρίς δικαίωμα αλλαγής - και μας επιτρέπει να διαλέξουμε το πλήθος των ημερών , σε σχέση με τη σημερινή , τις οποίες θα λάβει υπόψη προκειμένου να χρωματίσει τις γραμμές με τα ονόματα για τα οποία η σύμβαση πλησιάζει να λήξει ή έχει ήδη λήξει. Για το σκοπό αυτό χρησιμοποιείται πορτοκαλί χρώμα στην πρώτη περίπτωση και κόκκινο στη δεύτερη.

Υπάρχει και δυνατότητα ακύρωσης του χρωματισμού αυτού με κατάλληλο κουμπί πάνω στο φύλλο εργασίας.

Θυμηθείτε να ρυθμίσετε το επίπεδο ασφάλειας στο Excel σε "μεσαίο". Διαφορετικά δεν θα μπορέσετε να δείτε το αποτέλεσμα της διαδικασίας.

Πιστεύω να το βρείτε χρήσιμο.

Έγινε προσθήκη και άλλου αρχείου Excel με έμφαση στη διαχείριση ημερομηνιών. Σε συγκεκριμένο κελλί εισάγετε μια έγκυρη ημερομηνία και η μακροεντολή που "τρέχει" με το πάτημα του κατάλληλου κουμπιού - που βρίσκεται μέσα στο φύλλο εργασίας - επιδεικνύει βασικές χρήσεις ημερομηνίας. Πειραματιστείτε μαζί του.



Για τυχόν απορίες , μη διστάσετε να μου γράψετε στα : gvarth@in.gr ή gvarth@gmail.com
Συνημμένα
VBA TESTDATES-2.zip
Νέο φύλλο εργασίας σχετικά με διαχείριση ημερομηνιών.
(15.93 KiB) Μεταφορτώθηκε 508 φορές
VBA TESTDATES.zip
Διαχείριση δεδομένων τύπου Date - Excel VBA
(12.5 KiB) Μεταφορτώθηκε 467 φορές
Αγαπάς το δάσος ; Αγαπάς τη θάλασσα ; Τότε αγαπάς και τη ζωή ...

:: Το ιστολόγιό μου :: :: Υπολογιστικά εργαλεία για μηχανικούς ::

Απάντηση

Επιστροφή στο “Office, Excel, Word VB Scripts και Tips”

Μέλη σε σύνδεση

Μέλη σε αυτήν τη Δ. Συζήτηση: Δεν υπάρχουν εγγεγραμμένα μέλη και 0 επισκέπτες