Πώς να ελέγξετε αν μια διαδρομή Κόμβος Έξοδος σε VBA XML

Extensible Markup Language ( XML ) επιτρέπει στους προγραμματιστές να αποθηκεύσετε τα δεδομένα για μελλοντική χρήση . Μπορείτε να χρησιμοποιήσετε το Visual Basic for Applications ( VBA ) για να χειριστείτε προγραμματισμού πολλούς διαφορετικούς τύπους δεδομένων , συμπεριλαμβανομένων των δεδομένων XML . Τα έγγραφα αποθηκεύονται σε μορφή XML περιέχει κόμβους , τα οποία είναι σύνολα που ταιριάζουν ετικέτες που περικλείουν ένα συγκεκριμένο σώμα των πληροφοριών . Προγραμματιστές πρέπει να διασχίσει μια διαδρομή κόμβο μέσα σε έγγραφα XML , εφόσον επιθυμούν να αποκτήσουν τα δεδομένα που περιέχονται σε ένα συγκεκριμένο κόμβο . Μπορείτε να χρησιμοποιήσετε VBA για να ελέγξετε για να δείτε αν ένα μονοπάτι κόμβος βγαίνει όταν εκτελείτε εργασίες μεταφοράς δεδομένων . Οδηγίες
Η

1 Ανοίξτε το έγγραφο που περιέχει το αρχείο XML που επιθυμούν να αξιολογήσουν , και να δημιουργήσει ένα κώδικα πίσω από το αρχείο ή έγγραφο κειμένου ως κατάλληλη για το αρχείο XML στόχο . Ανοίξτε την καρτέλα "Προγραμματιστής " και κάντε κλικ στο εικονίδιο VBA , αν είστε με τη χρήση του Microsoft Office 2

Δημιουργήστε μια μεταβλητή αναφοράς τύπου bool : .

Δημ. doesNodePathExist Όπως Bool

Η

3 Ανοίξτε το έγγραφο XML :

Set XMLDOM = Νέα MSXML2.DOMDocument
4

Ωθήστε την πορεία κόμβο μέσα σε μια δήλωση Εάν :

Dim doesNodePathExist Όπως Bool

Εάν XMLDOM « διαδρομή κόμβος πηγαίνει εδώ
5

Ορίστε τη μεταβλητή Bool σε" true " αν VBA tranversed τη διαδρομή κόμβο με επιτυχία . Αλλά επιτρέψει να διατηρήσει την προεπιλεγμένη τιμή " false" αν αποχώρησε χωρίς να βρεθεί μια τιμή :

Dim doesNodePathExist Όπως Bool

Εάν XMLDOM ( « διαδρομή Κόμβος πηγαίνει εδώ ) Στη συνέχεια

doesNodePathExist = true
Η 6

Χρησιμοποιήστε την τιμή στον κώδικα , όπως απαιτείται . Εάν είναι απαραίτητο , το έναυσμα για μια νέα αναζήτηση για ένα διαφορετικό κόμβο XML .
Η 7

Αποθηκεύστε την εργασία σας και δοκιμάστε το για να βεβαιωθείτε ότι λειτουργεί όπως αναμένεται .

Η