|
Χρήση της συνάρτησης VLOOKUP 1 Συνημμένο(α) Καλησπέρα Θα ανεβάσω ένα αρχείο excel όπου θα ήθελα μέσω της καρτέλας Search να κάνω αναζήτηση στις άλλες 2 καρτέλες (Sheet2, Sheet3) βάση των πεδίων Code και Sheet (της καρτέλας Search) και να μου εμφανίζει αναλόγως τι πληκτρολογώ τα αποτελέσματα (left, Right, Middle, wing, Straight, down) κάθε φορά. Εάν δεν υπάρχει το Sheet ή Code με το νούμερο που βάζω να εμφανίζει "τα στοιχεία που πληκτρολογήσατε είναι λάθος". Μελλοντικά ίσως να έχω και περισσότερες καρτέλες για αναζήτηση. Ελπίζω να έγινα κατανοητός. Καμία ιδέα πως να το πραγματοποιήσω όλο αυτό με την συνάρτηση VLOOKUP? Ευχαριστώ! |
1 Συνημμένο(α) Καλησπέρα Αντώνη, καλωσόρισες στην παρέα μας. Δες μια πρόταση στο συνημμένο. Φιλικά/Γιώργος |
1 Συνημμένο(α) Ευχαριστώ πολύ για την βοήθεια στην Vlookup. Σαν επόμενο βήμα προσπαθώ να κάνω το εξής: Οταν πληκτρολογώ το ανάλογο Sheet και Code εμφανίζονται τα δεδομένα κάθε εγγραφής. Μετά θέλω να πληκτρολογώ μια ποσότητα σε ένα κελί πχ οπως το κελί J2 και αυτη η ποσότητα να αφαιρείτε απο το κελί Middle. Δηλαδή εάν εγώ βάλω Sheet2 και Code 1 τότε στα δεδομένα που εμφανίζονται το Middle είναι 25. Οταν εγω πληκτρολογήσω στο κελί J2 τον αριθμό 2 και πατήσω το κουμπί ENTER τότε το Middle να γίνει 23( η τιμή όμως να αλλάξει στην καρτέλα Sheet2). «Στο κιτρινισμένο κελί εμφανίζεται καθε φορά σε ποιόν αριθμό γραμμής της καρτέλας είναι η εγγραφή που αναζητήσαμε.» Εφόσον καταφέρω να το κάνω σε μία συγκεκριμένη καρτέλα μετα θα πρέπει να τον κώδικα να τον προσαρμόσω έτσι ώστε να μπορώ να αφαιρώ απο οποιαδήποτε καρτέλα έχω με δεδομένα. Μελλοντικά μπορεί να είναι και 20. Θα ανεβάσω πάλι το αρχείο Excel ώστε να καταλάβετε τι εννοώ. Καμία ιδέα τι κάνω λάθος στον κώδικα που έχω και πως θα μπορούσε να γίνει? Ευχαριστώ! |
1 Συνημμένο(α) Καλησπέρα Αντώνη, δες το συνημμένο |
Σούπερ σε ευχαριστώ πολύ! Κάτι ακόμα μπορούμε να κάνουμε κάτι ανάλογο σε μια νέα καρτέλα όπου θα πληκτρολογώ τα ίδια ακριβώς δεδομένα άλλα σε αυτήν την περίπτωση θα προσθέτει σε μια εγγραφή τον αριθμό που βάζω σε ένα κελί. Πρόσθεση και όχι αφαίρεση όπως κάναμε μέχρι τώρα. Αν δεν υπάρχει ο συγκεκριμένος μοναδικός κωδικός αριθμός στην καρτέλα αυτή να λέει σαν μήνυμα ότι η "εγγραφή με αυτόν τον κωδικό δεν υπάρχει θέλετε να δημιουργήσετε μια νέα?" αν ναι τότε να προσθέτει την εγγραφή αυτή με τα στοιχειά που έχουμε βάλει. Το θέμα δεν ξέρω αν οι εγγραφές θα είναι όλες με κάποια αύξουσα σειρά στο κελί κωδικό. Ας την βάζει στο τέλος. Εάν έχεις κάποια καλύτερη ιδέα....? Ευχαριστώ! |
1 Συνημμένο(α) Καλημέρα Αντώνη, δες το συνημμένο |
Ευχαριστώ πολύ, να σαι καλά! Μια ερώτηση στον κώδικα With Worksheets(Range("a2").Value) το a2 τι είναι? Καμιά φορά όταν προσπαθώ να προσαρμόσω τον κώδικα σε άλλο πρότζεκτ μου βγάζει σφάλμα σε αυτήν την γραμμή και λέει ότι όλο αυτό είναι empty, subscript out of range. |
Είναι το κελί A2 του ενεργού (αυτού που περιέχει τα κουμπιά) φύλλου, το οποίο περιέχει το όνομα του φύλλου με τα στοιχεία της αποθήκης. Ουσιαστικά το: Worksheets(Range("a2").Value) είναι το φύλλο της αποθήκης στο οποίο θα γίνουν οι αλλαγές (ενημέρωση). |
1 Συνημμένο(α) Ευχαριστώ Γιώργο! Συνεχίζω όμως και κάτι κάνω λάθος στον κώδικα. Κάτι με το κελί στην καρτέλα όπου προσθέτουμε και αφαιρούμε κάθε φορά αλλά δεν μπορώ να το διορθώσω. Το αναβάζω να το δείς. |
1 Συνημμένο(α) Καλημέρα Αντώνη, χρησιμοποιείς συγχωνευμένα κελιά και ψάχνεις να βρεις που έκανες λάθος; Πόσες φορές, σ’ αυτό το φόρουμ, τονίστηκε να μη χρησιμοποιούμε συγχώνευση κελιών; Επίσης το αρχείο που ανέβασες δεν έχει καμία σχέση με το αρχικό. Τέλος πάντων δες το συνημμένο. Φιλικά/Γιώργος |
Δεν είμαι πάνω από εβδομάδα μέλος στο φόρουμ και δεν το γνώριζα αυτό με την συγχώνευση κελιών. Αν το ήξερα δεν θα τα συγχώνευα. Αυτό που θέλω να κάνω στην ουσία τώρα ξεκινάω να το οργανώνω βήμα βήμα. Στα πρώτα αρχεία απλά ήταν κάποιες σκέψεις για αυτό και το τελευταίο αρχείο είναι διαφορετικό. Προσπαθώ να τα προσαρμόσω. Ευχαριστώ για την βοήθειά σου. Τώρα προσπαθώ να ξεκινήσω μια νέα καρτέλα όπου θα πληκτρολογείς όλα τα δεδομένα σε κελιά και μετά θα εισάγετε σαν νέα εγγραφή εκεί που έχω επιλέξει (όνομα καρτέλας και κωδικός). Στον κώδικα που έχουμε μέχρι τώρα (κουμπί import) αν κάποια εγγραφή δεν υπάρχει τότε τα δεδομένα που εμφανίζονται είναι Ν/Α τα οποία δεν θέλω να τα αποθηκεύω. Αν πληκτρολογήσω μετά τα δεδομένα τα νέα σε κάθε κελί ξεχωριστά θα χάνετε η συνάρτηση Vlookup. Σκέφτηκα ότι μάλλον θα χρειαστεί και μια επιλογή όπου θα μπορείς εισάγεις ένα νέο προϊόν εξ αρχής στην αποθήκη με όλα τα δεδομένα. |
Μετά την εισαγωγή του Κωδικού και της ποσότητας θα μπορούσε με ελάχιστη αλλαγή στον κώδικα (Προσθήκη 2 γραμμών) να πηγαίνουμε αυτόματα στο κατάλληλο φύλλο και τη γραμμή του φύλλου της αποθήκης, για να πληκτρολογήσουμε και τα υπόλοιπα στοιχεία. Κώδικας: If MsgBox("Δεν υπάρχει ο κωδικός. Να δημιουργηθεί νέα εγγραφή;", vbYesNo) = vbYes Then |
Σε ευχαριστώ Γιώργο. Μπορεί να γίνει να τοποθετεί και την νέα εγγραφή καθε φορά στην σωστή θέση (γραμμή) στην κάθε καρτέλα? πχ μια εγγραφή με κωδικό 10 να πάει πιο πάνω απο μια άλλη με κωδικό 12 (με αυτην την σειρά) Ενα ακόμα σκέφτομαι να έχω ενα κουμπί delete (στην καρτέλα που κάνω αναζήτηση) ώστε να μπορώ να διαγράφω ενα προιόν εξ' ολοκλήρου. Ευχαριστώ πολύ! |
1 Συνημμένο(α) Αντώνη, δες μια πρόταση στο συνημμένο. |
| Η ώρα είναι 18:43. |
Ms-Office.gr - ©2000 - 2026, Jelsoft Enterprises Ltd.