Πώς να κάνετε έναν υπολογισμό (όπως VLOOKUP) για κάθε στοιχείο που έχει εισαχθεί Alt + σε ένα κελί.
Δες το βίντεο
- Ένας θεατής λαμβάνει δεδομένα από ένα σύστημα όπου κάθε στοιχείο διαχωρίζεται με Alt + Enter
- Μπιλ: Γιατί το κάνεις αυτό; Πρόγραμμα προβολής: Με αυτόν τον τρόπο κληρονομούν τα δεδομένα. Θέλω να το κρατήσω έτσι.
- Μπιλ: Τι θέλετε να κάνετε με το 40% των τιμών που δεν περιλαμβάνονται στον πίνακα; Προβολή: Δεν υπάρχει απάντηση
- Bill: Υπάρχει ένας περίπλοκος τρόπος για να το λύσετε εάν έχετε τα πιο πρόσφατα εργαλεία Power Query.
- Αντ 'αυτού, μια μακροεντολή VBA για την επίλυσή της - η μακροεντολή πρέπει να λειτουργεί μέχρι το Excel 2007
- Αντί να κάνετε VLOOKUP, κάντε μια σειρά Εύρεση & Αντικατάσταση με VBA
Μεταγραφή βίντεο
Μάθετε το Excel από, Podcast Episode 2150: VLOOKUP Κάθε Alt + Εισαχθεί τιμή σε κάθε κελί.
Γεια. Καλώς ήλθατε πίσω στο netcast. Είμαι ο Μπιλ Τζέλεν. Σήμερα, μία από τις πιο περίεργες ερωτήσεις. Κάποιος είπε, hey, θέλω να κάνω ένα VLOOKUP για κάθε τιμή στο κελί, και όταν άνοιξα το αρχείο Excel, τα δεδομένα έχουν εισαχθεί ALT +. Λοιπόν, υπάρχουν 4 αντικείμενα σε αυτήν τη σειρά και όλα διαχωρίζονται από το ALT + ENTER, και στη συνέχεια μόνο 2 εδώ και 6 εδώ και ούτω καθεξής.
Πήγα πίσω στο άτομο που το έστειλε. Μου άρεσε, λοιπόν, αυτός είναι ένας πολύ κακός τρόπος αποθήκευσης αυτών των δεδομένων. Γιατί το κάνεις αυτό? Και ήταν σαν, δεν το κάνω. Αυτός είναι ο τρόπος λήψης των δεδομένων. Είπα, είναι εντάξει αν το χωρίσω σε ξεχωριστές σειρές; Όχι, πρέπει να το κρατήσετε έτσι.
Καλώς. Επομένως, δεν υπάρχει καλός τρόπος να κάνετε ένα VLOOKUP για κάθε μεμονωμένο στοιχείο και αύριο, στο αύριο επεισόδιο, 2151, θα σας δείξω πώς μπορούμε να χρησιμοποιήσουμε μια ολοκαίνουργια δυνατότητα στο Power Query για να το κάνετε αυτό, αλλά θα έχετε να έχει το Office 365 για να έχει αυτό.
Έτσι, σήμερα, θέλω να χρησιμοποιήσω μια μέθοδο που θα πάει πολύ πίσω και αυτό που έχω κάνει εδώ είναι ότι έχω δημιουργήσει ένα νέο φύλλο εργασίας με το LOOKUPTABLE, οπότε αυτά είναι τα στοιχεία. Παρατήρησα επίσης ότι υπάρχει ένα σωρό πράγματα, περίπου το 40% των πραγμάτων εδώ, δεν είναι στο LOOKUPTABLE. Είπα, τι θέλετε να κάνετε εκεί, και δεν απαντώ σε αυτήν την ερώτηση, οπότε απλά θα τους αφήσω όπως είναι αν δεν βρω κανένα αγώνα.
Εντάξει, λοιπόν, αυτό που έχω εδώ είναι ότι έχω ένα φύλλο που ονομάζεται LOOKUPTABLE και θα δείτε ότι το αρχείο μου είναι τώρα αποθηκευμένο ως xlsx και θα χρησιμοποιήσω μια μακροεντολή VBA. Για να χρησιμοποιήσετε μια μακροεντολή VBA, δεν μπορείτε να την έχετε ως xlsx. Είναι αντίθετο με τους κανόνες. Οπότε, πρέπει να ΑΠΟΘΗΚΕΥΣΕΤΕ ΩΣ και να το αποθηκεύσετε είναι xlsm. ΑΡΧΕΙΟ, ΑΠΟΘΗΚΕΥΣΗ ΩΣ και αλλάξτε το από το WORKBOOK σε ένα MACRO-ENABLED WORKBOOK XLSM ή ένα BINARY WORKBOOK - ένα από αυτά θα λειτουργήσει - εντάξει και κάντε κλικ στο SAVE.
Εντάξει, λοιπόν, τώρα επιτρέπεται η εκτέλεση μακροεντολών. ALT + F11 για να μεταβείτε στη συσκευή εγγραφής μακροεντολών. Ξεκινάτε με αυτήν τη μεγάλη γκρι οθόνη. INSERT, MODULE, και υπάρχει η ενότητα μας, και εδώ είναι ο κωδικός. Έτσι, το ονόμασα ReplaceInPlace και ορίζω ένα φύλλο εργασίας. Αυτός είναι ο πίνακας αναζήτησης. Θα βάλατε εκεί το πραγματικό όνομα του φύλλου εργασίας του πίνακα αναζήτησης και, στη συνέχεια, ο πίνακας αναζήτησης ξεκινά στη στήλη Α, η οποία είναι η στήλη 1. Έτσι, πηγαίνω στην τελευταία σειρά στη στήλη 1, πατήστε το πλήκτρο ΤΕΛΟΣ και το ΕΠΑΝΩ βέλος, ή , φυσικά, το βέλος CONTROL + UP θα έκανε το ίδιο πράγμα, θα καταλάβει ποια είναι η σειρά και, στη συνέχεια, θα πάμε από κάθε σειρά από το 2 στο FinalRow. Γιατί 2; Λοιπόν, επειδή οι επικεφαλίδες βρίσκονται στη σειρά 1. Γι 'αυτό θέλω να αντικαταστήσω, ξεκινώντας από τη σειρά 2 μέχρι την τελευταία σειρά, και έτσι, για κάθε σειρά από 2 έως FinalRow, το FromValue είναι αυτό »s στη στήλη A και το ToValue είναι αυτό στη στήλη B.
Τώρα αν, για κάποιο λόγο, τα δεδομένα σας ήταν στα J και K, τότε αυτό το J θα ήταν η 10η στήλη, οπότε βάζετε ένα 10 εκεί και το K θα είναι η 11η στήλη και, στη συνέχεια, στην Επιλογή, θα αντικαταστήσουμε το FromValue στο ToValue. Αυτό είναι πολύ σημαντικό εδώ. xlPart, xlPart - και αυτό είναι ένα L, όχι ένας αριθμός 1 - xlPart που λέει ότι θα μας επιτρέψει να αντικαταστήσουμε ένα μέρος του κελιού, επειδή αυτοί οι αριθμοί μερών χωρίζονται όλοι με έναν χαρακτήρα γραμμής τροφοδοσίας. Παρόλο που δεν μπορείτε να το δείτε, είναι εκεί. Έτσι, αυτό θα μας επιτρέψει να μην ενημερώσουμε κατά λάθος το λάθος πράγμα, και στη συνέχεια xlByRows, MatchCase, False, SearchFormat, False, ReplaceFormat, False, Next i.
Καλώς. Λοιπόν, αυτή είναι η μικρή μας μακροεντολή εδώ. Ας το προσπαθήσουμε. Θα πάρουμε αυτά τα δεδομένα και δεν θέλω να καταστρέψω τίποτα, οπότε απλώς θα πάρω τα αρχικά δεδομένα και θα τα αντιγράψω προς τα δεξιά. Καλώς. Έχουμε λοιπόν την επιλογή μας εκεί. Στην πραγματικότητα, θα ξεκινήσω από αυτό το σημείο. CONTROL + BACKSPACE και, στη συνέχεια, ALT + F8 για να λάβετε μια λίστα με όλες τις μακροεντολές. Υπάρχει το REPLACEINPLACE μας. Θα κάνω κλικ στο RUN, και οπουδήποτε βρήκε ένα στοιχείο στο LOOKUPTABLE, αντικατέστησε αυτόν τον αριθμό αντικειμένου με το στοιχείο, φαινομενικά να κάνει VLOOKUP, αν και δεν το επιλύουμε καθόλου με VLOOKUP.
Καλώς. Λοιπόν, hey, το ολοκαίνουργιο βιβλίο που κυκλοφόρησε - Power Excel With, το 2017 Edition, 617 Excel Mysteries Solved - όλα τα είδη εξαιρετικών νέων συμβουλών εκεί.
Η σημερινή ολοκλήρωση: ο θεατής λαμβάνει δεδομένα από ένα σύστημα όπου κάθε στοιχείο διαχωρίζεται από ένα ALT + ENTER και, στη συνέχεια, πρέπει να κάνει ένα VLOOKUP σε κάθε στοιχείο και, ξέρετε, γιατί το κάνω αυτό; έτσι, το άτομο είπε, δεν το κάνω, αλλά πρέπει να το διατηρήσω έτσι. και τότε το 40% των τιμών δεν περιλαμβάνονται στον πίνακα, καλά, δεν υπάρχει απάντηση. οπότε υποθέτω ότι θα προσθέσουν αυτά τα στοιχεία στον πίνακα. τώρα, αύριο, θα μιλήσουμε για το πώς να το λύσουμε με το Power Query, αλλά, σήμερα, αυτή η μακροεντολή θα λειτουργήσει μέχρι το τέλος όλων των εκδόσεων του Excel του Windows, τουλάχιστον στο Excel 2007. έτσι, αντί για VLOOKUP, απλώς μια σειρά εύρεσης και αντικατάστασης με VBA
Λοιπόν, γεια. Θέλω να σας ευχαριστήσω που σταματήσατε. Θα σας δούμε την επόμενη φορά για ένα άλλο netcast από.
Λήψη αρχείου
Κατεβάστε το δείγμα αρχείου εδώ: Podcast2150.xlsm
