Forum

Αναζήτηση στο ms-office.gr

Πάμε!
ms-office.gr > Forum > Microsoft Access > Access - Ερωτήσεις / Απαντήσεις > Μεταφορά δεδομένων πεδίων σε excel

Access - Ερωτήσεις / Απαντήσεις Access + VBA... Εδώ δεν υπάρχουν όρια!

Απάντηση στο θέμα

 

Εργαλεία Θεμάτων Τρόποι εμφάνισης
  #1  
Παλιά 09-11-11, 12:13
Όνομα: Δημήτρης
Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 02-10-2011
Μηνύματα: 75
Προεπιλογή Μεταφορά δεδομένων πεδίων σε excel

Καλησπέρα, από τα στοιχεία ενός πίνακα πρέπει να μεταφέρω μερικά πεδία σε αρχείο excel. Το excel υπάρχει ήδη και έχει τους τίτλους έτοιμους. Θα πρέπει με έναν αυτόματο τρόπο ο χρήστης της βάσης να μπορεί να εξάγει συγκεκριμένα (τα ίδια κάθε φορά) πεδία. Ίσως με κριτήριο ημερομηνία (που υπάρχει στις εγγραφές συμπληρωμένη ως πεδίο) για να συμπληρώνονται κάθε φορά οι νέες εγγραφές μόνο. Αν μπορεί κάποιος να βοηθήσει και χρειάζεται να διευκρινίσω κάτι, παρακαλώ βοηθήστε με
Απάντηση με παράθεση
  #2  
Παλιά 09-11-11, 17:55
Το avatar του χρήστη Meteora
Συντονιστής
Όνομα: Νίκος
Έκδοση λογισμικού Office: Ms-Office 2007
Γλώσσα λογισμικού Office: Ελληνική
 
Εγγραφή: 28-12-2008
Περιοχή: Θεσσαλονίκη
Μηνύματα: 1.085
Προεπιλογή

Καλησπέρα

Η αλληλεπίδραση Access και Excel δεν είναι κάτι απλό. Χρειάζεται να αφιερώσει κάποιος αρκετό χρόνο για να μπορέσει να καταφέρει κάτι...
Δοκίμασε αυτό το τμήμα κώδικα:

Κώδικας:
Dim ThePath$
ThePath = Replace(CreateObject("WScript.Shell").SpecialFolders("Desktop") & "\" & "onomaarxeio.xls", "\\", "\")
 
    Dim oExcel As Object
    Dim oBook As Object
    Dim oSheet As Object
    'Σύνδεση...
    Set oExcel = CreateObject("Excel.Application")
    Set oBook = oExcel.Workbooks.Open(ThePath)
 
    'Εισαγωγή δεδομένων στο 1ο φύλλο του βιβλίου
    Set oSheet = oBook.Worksheets(1)
    oSheet.Range("H1").Value = "ΜΕΤΕΩΡΑ"
oBook.Save  'Αν δεν υπάρχει αυτή εδω η εντολή,το Excel  ζητά επιβεβαίωση για να σωθούν οι αλλαγές
    oExcel.Quit
    Set oExcel = Nothing
Το αρχείο excel (η φόρμα σου δηλαδή) να βρίσκεται στην επιφάνεια του υπολογιστή σου κλειστό!
Εύχομαι καλή συνέχεια.

Με εκτίμηση

Νίκος Δ.
Απάντηση με παράθεση
Απάντηση στο θέμα

Εργαλεία Θεμάτων
Τρόποι εμφάνισης

Δικαιώματα - Επιλογές
Δε μπορείτε να δημοσιεύσετε νέα μηνύματα
Δε μπορείτε να δημοσιεύσετε απαντήσεις
Δεν μπορείτε να επισυνάψετε αρχεία
Δεν μπορείτε να επεξεργαστείτε τα μηνύματα σας

Ο κώδικας ΒΒ είναι σε λειτουργία
Τα Smilies είναι σε λειτουργία
Ο κώδικας [IMG] είναι σε λειτουργία
Ο κώδικας HTML είναι εκτός λειτουργίας
Trackbacks are εκτός λειτουργίας
Pingbacks are εκτός λειτουργίας
Refbacks are εκτός λειτουργίας


Παρόμοια Θέματα

Θέμα Δημιουργός Forum Απαντήσεις Τελευταίο Μήνυμα
[Συναρτήσεις] Μεταφορά δεδομένων από φύλλο excel stavraetos Excel - Ερωτήσεις / Απαντήσεις 5 14-12-16 11:24
Μεταφορά δεδομένων από Word σε Excel ή Access marpapa Word - Ερωτήσεις / Απαντήσεις 10 10-05-12 21:05
[VBA] Μεταφορά δεδομένων από Excel σε Access Tasos Excel samples - Χρήσιμα αρχεία & παραδείγματα 0 11-04-12 07:38
[Γενικά] Βοήθεια excel μεταφορά δεδομένων tasosk11 Excel - Ερωτήσεις / Απαντήσεις 3 18-08-11 12:55
Αντιγραφή / μεταφορά δεδομένων Access 2007 σε Excel 2007 Galileo Ms-Office 8 27-01-10 23:23


Η ώρα είναι 13:09.