[VBA] 2 Combobox επιλογή ενός κελιού.

[stelios79]

Καλησπερα σε ολους ,

πρωτο ποστ , πρωτη ερωτηση. Ευχαριστω εκ των προτερων.



Εχω φτιαξει σε ενα excel ενα κοστολογιο ενος προιοντος.Δινω το μεγεθος ( Μηκος-Πλατος) και μου επιστρεφει το κοστος.

Επειτα σε ενα αλλο φυλλο εβαλα ενα "πινακα" ο οποιος στα οριζοντια εχει το μηκος και στα καθετα το πλατος.

Προσπαθω μεσα απο την VBA οποτε δινω το μεγεθος(Μηκος - ΠΛατος ) να μου εμφανιζεται η τιμη αλλα να πηγαινει και στον πινακα μου , στην συγκεκριμενη θεση.

Μεσα απο 2 combobox ενα για το μηκος και ενα για το πλατος καταφερα να παιρνω την τιμη που θελω αλλα δεν μπορω να την τοποθετησω αυτοματα στον πινακα μου.

Θα ηθελα να μαθω αν γινεται σε ενα φυλλο του excel να κανω επιλογη καποιου συγκεκριμενου κελιου με 2 combobox γιατι για να το πετυχω εχω κανει ενα εκτρωμα

If axonas = 250 And provoli = 250 Then
Worksheets("Τιμες").Range("b5") = τιμη

και το εχω γραψει αυτο για την καθε τιμη ,448 φορες.....

[Spirosgr]

Καλησπέρα
Στέλιο καλώς ήρθες στην παρέα
Αν κατάλαβα το ζητούμενο πρέπει να γίνετε αλλά...
καλό είναι όλοι όσοι έχουν κάποιο ζητούμενο να ανεβάζουν ένα υπόδειγμα της δουλειάς τους
ώστε να είναι ευκολότερο να δοθεί λύση
Για να φτάσουμε να "λύσουμε" το πρόβλημα πρέπει να φτιάξουμε πίνακες, ονομασίες, combobox και άλλα που και χρονοβόρα είναι και κινδύνους εμπεριέχουν να μην είναι ίδια με του χρήστη και να καταλήγουν σε λάθος αποτελέσματα
Ελπίζω στην κατανόησή σας...

[stelios79]

Εχω ενα βιβλιο excel , με μερικα φυλλα οπως φαινεται στην εικονα.

Συμφωνα με τα μετρα που δινω εγω απο τα combobox , γινονται οι καταλληλες πραξεις μεσα στα φυλλα , προστιθενται και μου δινουν ενα αποτελεσμα που ειναι η τιμη κοστους καποιου προιοντος.

Αυτη η τιμη οπως εμφανιζεται ,καταχωρειται και στον πινακα του φυλλου Τιμες.

Για να το πετυχω αυτο εκανα κατι ανορθοδοξο , εγραψα απο ενα if - elseif για την καθε περιπτωση.
Θα ηθελα να μαθω , αν φυσικα γνωριζετε, αν υπαρχει καποιος τροπος ετσι ωστε ο συνδιασμος των δυο combobox να μου επιλεγουν το συγκεκριμενο κελι.

Ευχαριστω.

[Spirosgr]

Καλησπέρα και πάλι
Η πρόταση μου με βάση ότι μπορώ να διακρίνω από τις φωτογραφίες.
Στο φύλλο που ακολουθεί αν δώσουμε Μήκος Πλάτος παίρνουμε
1. την Διεύθυνση του κελιού (με Address)
2. το Κόστος ενώ
3. το επιλεγμένο κελί χρωματίζεται
Μπορούμε να προσαρμόσουμε τα Linkcells σε δικά μας Combobox χωριστά ή σε φόρμα
Γενικά ο τρόπος είναι αναλυτικός και εύκολα προσαρμόζεται στις ανάγκες μας
Τα Selections του κώδικα δεν μπορούμε να τα αποφύγουμε τελείως
γιατί το ζητούμενό μας βασικά είναι η Επιλογή
Καλή συνέχεια!

[Thanosp]

Καλησπέρα
αντί για υπολογισμό μέσω CommandButton ο τύπος σε ένα κελί =INDIRECT(ADDRESS(Y3;Y1))
Θανάσης

[Spirosgr]

Γεια σας και πάλι
Αν δεν υπάρξουν τα Combobox δεν υπάρχουν και τα Linkcells W1 W3 και φυσικά δεν υπάρχουν και τα Y1 Y3 τα οποία "παίρνουν" από εκεί με συνέπεια δεν υφίσταται ADDRESS
Άρα δεν είναι εφικτό...
Η Σκέψη για INDIRECT είναι καλή υπό προϋποθέσεις τις οποίες δεν μπορώ να μαντέψω όσο τα φύλλα του Στέλιου παραμένουν "κρυφά"

[stelios79]

Καλησπερα σας ,

Σπυρο σε ευχαριστω παρα πολυ για την βοηθεια σου.
Με τις οδηγιες σου και κατι μικροαλλαγες εκανα ακριβως αυτο που ηθελα.

[Spirosgr]

Καλησπέρα
Να' σαι καλά Στέλιο
Καλή συνέχεια!