Περιεχόμενο TechKnowledge
Πρόβλημα Είναι δυνατό να προσθέσετε ένα κουμπί σε ένα παράθυρο του Great Plains και να ανοίξετε κώδικα VBA σε μια υπάρχουσα βάση δεδομένων της Microsoft Access όταν
κάνετε κλικ σε αυτό το κουμπί;
Επίλυση
Αυτό μπορεί να γίνει χρησιμοποιώντας το Modifier και τη VBA.
1. Προσθέστε ένα νέο κουμπί στο επιθυμητό παράθυρο "Μεγάλες απλές" χρησιμοποιώντας την Τροποποίηση.
2. Δώστε σε αυτό το κουμπί ένα περιγραφικό όνομα, όπως btnOpenAccessDb.
3. Παραχωρήσετε ασφάλεια σε αυτό το τροποποιημένο παράθυρο και, στη συνέχεια, ανοίξτε το ίδιο το παράθυρο στο Great Plains.
4. Προσθέστε το παράθυρο στη VBA και, στη συνέχεια, προσθέστε το νέο κουμπί και στη VBA.
5. Ανοίξτε το πρόγραμμα επεξεργασίας VBA και μεταβείτε στην ενότητα κώδικα για αυτό το παράθυρο του Great Plains. Ακολουθεί ένα δείγμα κώδικα που μπορεί να χρησιμοποιηθεί εδώ: Option
Explicit
Dim appAccess As Object
Private Sub btnOpenAccessDb_BeforeUserChanged(KeepFocus As Boolean, CancelLogic As Boolean)
Dim docAccess
Set appAccess = CreateObject("Access.Application")
docAccess = appAccess.OpenCurrentDatabase("C:\My Documents\db1.mdb", True)
appAccess.Visible = Δευτερεύουσα σημείωση True End -Αυτό
το δείγμα κώδικα έχει σχεδιαστεί για να ανοίξει μια βάση δεδομένων με το όνομα "db1.mdb" που βρίσκεται στον κατάλογο C:\Τα έγγραφά μου και μπορεί να αλλάξει, όπως απαιτείται. Το αντικείμενο appAccess θα πρέπει να έχει διαστάσεις στην ενότητα "Γενικές δηλώσεις", έτσι ώστε να παραμένει πέρα από το εύρος του συμβάντος κλικ κουμπιού στο οποίο ο κώδικας εκλύεται.
Αυτό το άρθρο ήταν Αναγνωριστικό εγγράφου TechKnowledge:32879
