Εισαγωγή πολλαπλών αρχείων Excel στην Access

[prittpritt]

Καλημέρα σε όλους στο Forum.

Θα ήθελα να ρωτήσω αν υπάρχει τρόπος να εισάγω αρκετά αρχεία excel στην access, αλλά όχι ένα - ένα αλλά μαζικά.

Ευχαριστώ.

[Meteora]

Καλημέρα

Και βέβαια μπορείς, αλλά υπό προϋποθέσεις. Τα αρχεία να έχουν διαφορετικό όνομα πχ adres-123.xls, adres-124.xls, ...adres-xxx.xls και επιπλέον ίδια δομή στα περιεχόμενά τους.
Η ονοματολογία των αρχείων excel είναι σημαντικό στοιχείο, αφού πρέπει με ευκολία να λες στην access, ποιο αρχείο να 'φορτώσει' σε κάθε loop!


Με εκτίμηση

Νίκος Δ.

Υστερολόγιο: Σε μια εφαρμογή μου η Access φορτώνει δεδομένα από 1300 αρχεία excel.

[prittpritt]

Ευχαριστώ για την απάντηση Νίκο, αλλά πώς μπορώ ακριβώς να το κάνω?

[Meteora]

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

Τα ξαναλέμε λοιπόν!

[prittpritt]

Νίκο σου στέλνω αυτά που μου ζήτησες, αναμένω να δώ τον τρόπο.

[Meteora]

Καλησπέρα


Τα δεδομένα που έχεις στα excel είναι αρκετά 'χύμα',αφού στην ίδια στήλη υπάρχουν:

• Ημερομηνίες
• Χαρακτηρισμός τύπου ΡΕΠΟ, ΑΔΕΙΑ
• Ωράριο εργασίας

Έτσι η δυνατότητα να εισαχθούν τα δεδομένα σε πίνακα access δεν είναι μια διαδικασία κώδικα 5-6 γραμμών. Εδώ κώδικας που θα μεταφέρει τα δεδομένα στην access θα πρέπει να ελέγχει το τι υπάρχει κελί προς κελί και ανάλογα με το τί θα βρεί να κάνει μεταφορά σε αντίστοιχο πεδίο της access. Βέβαια και εσύ στην ανάρτησή σου δεν μας έδωσες κάποια μορφή πίνακα, πράγμα που εγώ ερμηνεύω ότι τώρα ξεκινάς να κάνεις μια νέα μορφή διαχείρισης στα δεδομένα σου, μέσω access.
Για να κάνεις όμως αυτό το εκχείρημα, χρειάζονται ιδιαίτερες γνώσεις VBA, τις οποίες όμως δεν έχεις -είδα το προφιλ σου. Θέλω να βοηθήσω, αλλά δεν έχω αρκετό -για την περίπτωση σου- χρόνο.

Με εκτίμηση

Νίκος Δ.