Χρήση του Excel Macro Recorder - Συμβουλές για το Excel

Ο Κέβιν ρωτά,

Έχω ένα σύνολο δεδομένων που είναι αποθηκευμένα σε ένα αρχείο κειμένου οριοθετημένο με καρτέλες. Ορισμένες από τις πληροφορίες πρέπει να διατηρήσουν το "padding" - όπως οι ταχυδρομικοί κώδικες (πρέπει να έχουν μήκος 5 ή 9 χαρακτήρων). Όταν το αρχείο κειμένου ανοίξει στο Excel, εμφανίζεται ο Οδηγός εισαγωγής κειμένου αυτόματα. Υπάρχει μια επιλογή για να καθορίσετε ότι η στήλη που περιέχει αυτά τα δεδομένα είναι Κείμενο και όχι Γενική. Η επιλογή αυτής της επιλογής λειτουργεί - αλλά απαιτεί να κάνω το άνοιγμα χειροκίνητα. Δεν μπόρεσα να βρω έναν τρόπο στο VBA για να έχω τις πληροφορίες να είναι κείμενο αντί για γενικές - και να σώσω το "padding" μου

Ενεργοποιήστε τη μακροεντολή εγγραφής και καταγράψτε τη διαδικασία εισαγωγής του αρχείου κειμένου σας. Εδώ είναι ο κωδικός που προκύπτει:

Workbooks.OpenText Filename:= “C:TestData.txt”, Origin:=437, StartRow:=1, DataType:=xlDelimited, TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=True, Semicolon:=False, Comma:=False, Space:=False, Other:=False, FieldInfo:=Array(Array(1, 1), Array(2, 1), Array(3, 2), Array(4, 1)), TrailingMinusNumbers:=True

Η παράμετρος FieldInfo ελέγχει τον τρόπο εισαγωγής κάθε πεδίου. Σε αυτήν την περίπτωση, η συσκευή εγγραφής μακροεντολών σημείωσε ότι έχετε 4 πεδία. Η καταχώρηση Array (2, 1) λέει ότι για το 2ο πεδίο, χρησιμοποιήστε έναν τύπο πεδίου «Γενικά». Σημειώστε ότι για το πεδίο 3, η καταχώριση είναι Array (3, 2). Το "2" είναι ο κωδικός για το Excel για εισαγωγή αυτού του πεδίου ως Κείμενο.