[VBA] Αλλαγή χρώματος κελιών υπό προϋποθέσεις με vb

[kapetang]

Καλημέρα
Φίλε Θανάση, επειδή η μορφοποίηση που δημιουργεί ο πρόσθετος κώδικάς σου δεν εξαρτάται από τις τιμές των κελιών της στήλης C, έχω τη γνώμη ότι θα πρέπει να είναι μετά τη δομή Select ...End Select και όχι μέσα σ’ αυτήν.
Φιλικά/Γιώργος

[GEORGE1]

Αρχική Δημοσίευση από kapetang

Καλημέρα
Φίλε Θανάση, επειδή η μορφοποίηση που δημιουργεί ο πρόσθετος κώδικάς σου δεν εξαρτάται από τις τιμές των κελιών της στήλης C, έχω τη γνώμη ότι θα πρέπει να είναι μετά τη δομή Select ...End Select και όχι μέσα σ’ αυτήν.
Φιλικά/Γιώργος

Καλημέρα συνονόματε,

Αν βοηθά : Όλα έχουν σαν κριτήριο την αναφερόμενη αξία στην στήλη C.
Ανάλογα με την αξία αυτή, γίνεται η αλλαγή Χρώματος κελιού και γραμματοσειράς.

Φιλικά

Γιώργος

[kapetang]

Καλησπέρα

Συνονόματε Γιώργο, αν κατάλαβα καλά, η μορφοποίηση των γραμμών με σύνολα («Σύνολα Σελίδας», «Σε Μεταφορά», «Από Μεταφορά», «Γενικά Σύνολα») η μορφοποίηση δεν εξαρτάται από την τιμή της στήλης C (<0, 0,1 >1), γι’ αυτό πιστεύω ότι ο σχετικός κώδικας πρέπει να είναι κάτω από τη δομή Select.
Πάντως, στο σύνολο σχεδόν των περιπτώσεων ο κώδικας του φίλου Θανάση δίνει σωστά αποτελέσματα (οπότε μπορείς να τον χρησιμοποιείς) και αν χρειαστεί κάποια τροποποίηση πιστεύω θα την κάνει ο ίδιος.

Φιλικά/Γιώργος

[Tasos]

Καλησπέρα σε όλους!

Η Excel 2003 μας δίνει 3 μορφοποιήσεις υπό όρους + την στάνταρτ μορφοποίηση του κελιού δηλ. 4 στο σύνολο.
Στην περίπτωση του Γιώργου, μπορούμε να τις χρησιμοποιήσουμε και σε συνδυασμό με λίγο κώδικα VBA να φτάσουμε στο επιθυμητό αποτέλεσμα.

Μπορείτε να δείτε αυτή την προσέγγιση στο συνημμένο παράδειγμα παρακάτω.

Φιλικά

Τάσος

[gr8styl]

Καλησπέρα σας
Θα ήθελα να πω ότι πολύ σωστά παρατήρησε ο Γιώργος (kapetang), ότι η IF των 7 γραμμών πρέπει να μπει αμέσως ΜΕΤΑ την End Select για να είμαστε 100% σωστοί.
Αν και δεν νομίζω να υπάρξει περίπτωση να έχουμε γραμμές με "Σύνολα" ή "Μεταφορά" που η στήλη C να έχει τιμή μικρότερη ή ίση του 1 το σωστό είναι σωστό ευχαριστώ Γιώργο.

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

Τα λέμε.
Θανάσης

[Tasos]

Καλησπέρα Θανάση!

Η μορφοποίηση για πράσινο φόντο είναι η στάνταρ μορφοποίηση των κελιών A1, B1, C1
και επικολλάται στις αντίστοιχες στήλες κατά την εκτέλεση της Μακροεντολής.

Αν χρειαστεί, με το τρόπο που επιλέγονται οι περιοχές του φύλλου από τον κώδικα,
θα είναι πολύ εύκολο να προσθέσει κανείς μια γραμμή στον κώδικα για να χρωματίσει ότι και
όπως θέλει!

Τα λέμε...

Φιλικά
Τάσος

[gr8styl]

Αρχική Δημοσίευση από Tasos

Η μορφοποίηση για πράσινο φόντο είναι η στάνταρ μορφοποίηση των κελιών A1, B1, C1
και επικολλάται στις αντίστοιχες στήλες κατά την εκτέλεση της Μακροεντολής.

Σωστά Τάσο
το λάθος είναι δικό μου, γιατί όταν δοκίμασα το αρχείο σου, αφαίρεσα το χρώμα φόντου σε ολόκληρες τις στήλες Α, Β και C, με αποτέλεσμα να μην μου δώσει πράσινες γραμμές.

Είναι πράγματι πολύ καλό. Δεν μου λες η περιοχή a1:c1 θα πρέπει να κατασκευάζεται κάθε φορά ?
Όπως είπε ο Γιώργος το αρχείο που ανέβασε είναι το output της εφαρμογής του.
Έχεις καμιά πρόταση για εισαγωγή των δεδομένων από το xls output της εφαρμογής του Γιώργου ?

Τα λέμε.
Θανάσης

[GEORGE1]

Καλημέρα,

Συνεχίζετε να με εκπλήσσετε ευχάριστα …

Ένα μεγάλο ευχαριστώ σε όλους …

Φιλικά

Γιώργος

[Tasos]

Καλημέρα Γιώργο μας!
Να είσαι καλά, σ ευχαριστούμε για τα καλά σου λόγια!
Ο Θανάσης αναφέρθηκε στο "output" της εφαρμογής σου.
Αλήθεια, πως μεταφέρονται τα δεδομένα στο εν λόγω φύλλο;
Στο παράδειγμα σου τουλάχιστον φαίνεται ότι είναι απλή επικόλληση (χειροκίνητα ή προγραμματιστικά).

Θανάση, η περιοχή a1:c1 φτιάχνεται μια φορά ή όποτε χρειαστούν αλλαγές στις μορφοποιήσεις από το χρήστη.
Θα μπορούσαμε να χτίσαμε τις μορφοποιήσεις αυτές προγραμματιστικά.
Ωστόσο, με τον τρόπο δεν θα παρέχεται πια η δυνατότητα στο χρήστη να κάνει τυχόν αλλαγές στις μορφοποιήσεις.
Συνήθως σε μεταφορά δεδομένων από κάποια εξωτερική πηγή χρησιμοποιείται ο OLDB Provider ή κάποια σύνδεση ODBC.

Τα λέμε...

Φιλικά/Τάσος