Forum

Forum (https://www.ms-office.gr/forum/)
-   Excel - Ερωτήσεις / Απαντήσεις (https://www.ms-office.gr/forum/excel-erotiseis-apantiseis/)
-   -   [VBA] Εύρεση ημερομηνίας κατά το άνοιγμα (https://www.ms-office.gr/forum/excel-erotiseis-apantiseis/1790-eiresi-imerominias-kata-anoigma.html)

JSARAK2001 13-04-12 11:22

Εύρεση ημερομηνίας κατά το άνοιγμα
 
Χαιρετε σε όλους. Είμαι αρχάριος στο Excel και θα ήθελα την βοήθειά σας για την εξής απορία μου.

Έχω δημιουργήσει ένα ημερολόγιο απλό, όπου κάθε ημερομηνία αναγράφετε σε σειρά.

Τρίτη, 12 Απριλίου 2012 | Εργασία με τον Κώστα...
Τετάρτη, 13 Απριλίου 2012 | Να συναντήσω....
κοκ

Υπάρχει (σε κώδικα VBA) δυνατότητα αμέσως όταν ανοίγω το παραπάνω αρχείο-ημερολόγιο να πηγαίνω αμέσως στην τρέχουσα ημερομηνία?

Ή να δημιουργηθεί μία macro ώστε με συνδυασμό πλήκτρων που θα πατάω να με βρίσκει την τρέχουσα ημερομηνία εκείνης της ημέρας και να με πηγαίνει σε εκείνο το κελί?

Spirosgr 13-04-12 15:41

1 Συνημμένο(α)
καλησπέρα
Η εντολή Auto_open έχει δημοσιευτεί
σε παλιότερη ερώτηση στο φόρουμ από τον Τάσο
Ανοίγει το βιβλίο σε φύλλο της επιλογής μας
Η δε έμφαση στην σημερινή Ημερομηνία γίνετε με μορφοποίηση

JSARAK2001 13-04-12 21:07

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

Τι είναι το explicit και τι σημαίνει vbInformation. Αυτό είναι που κατευθύνει στην τρέχουσα ημερομηνία?

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

Και κάτι άλλο. Υπάρχει κάποιο link για να διαβάσω τις εντολές αυτές? πως συντάσσονται και ίσως με παραδείγματα?

Ευχαριστώ θερμά

Spirosgr 14-04-12 11:40

Καλημέρα και χρόνια πολλά
Κατ' αρχήν μην έχεις πρόβλημα να ρωτάς οτιδήποτε
Κανείς δεν γεννήθηκε γνωρίζοντας πράγματα
Όλοι άσχετοι ήμασταν στην αρχή
Τώρα επί του θέματος
Το 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 βάλε , "το όνομά σου" και δες το αποτέλεσμα
ΥΓ ΤΡΈΧΟΥΣΑ ΗΜΕΡΟΜΗΝΊΑ
Δεν επηρεάζετε από τον κώδικα και δεν έχει καμία σχέση με αυτόν
Είναι θέμα Μορφοποίησης υπό όρους
Άνοιξε την Μορφοποίηση να δεις τον κανόνα που ορίστηκε


Η ώρα είναι 20:26.

Ms-Office.gr - ©2000 - 2026, Jelsoft Enterprises Ltd.


Search Engine Optimization by vBSEO 3.3.2