Εμφάνιση ενός μόνο μηνύματος
  #1  
Παλιά 22-06-13, 12:44
Το avatar του χρήστη gr8styl
gr8styl Ο χρήστης gr8styl δεν είναι συνδεδεμένος
Super Moderator
Όνομα: Θανάσης Στυλιανίδης
Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 19-10-2009
Περιοχή: Βρυξέλλες, Βέλγιο
Μηνύματα: 758
Προεπιλογή Αλλαγή πηγής δεδομένων

Καλημέρα
στο συνημμένο zip έχω 3 αρχεία
Τα Source01.xls και Source02.xls είναι αρχεία/πηγή δεδομένων.
Το vba_qry_ChgSrc.xlsm είναι το κύριο αρχείο που περιέχει και τον κώδικα
Βασικά το κύριο αρχείο κάνει εισαγωγή δεδομένων από το πρώτο αρχείο/πηγή δεδομένων (με ανανέωση δεδομένων).
Με κώδικα ο χρήστης μπορεί να επιλέξει το αρχείο πηγή δεδομένων και γίνεται ανανέωση δεδομένων με την νέα επιλεγμένη πηγή.

Προς το παρόν ο κώδικας είναι συμβατός μόνο με 2010 και όχι με 2003, διότι στο 2010 το QueryTable είναι στοιχείο του ListObject ενώ στο 2003 είναι στοιχείο του Worksheet

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

Ευχαριστώ εκ των προτέρων
Θανάσης

ΥΓ Για να το δοκιμάσετε, αποσυμπιέστε το zip στο directory: C:\temp\change_source\
Συνημμένα Αρχεία
Τύπος Αρχείου: zip change_source.zip (35,2 KB, 18 εμφανίσεις)
Απάντηση με παράθεση