Θέμα: Γενικά σύμπτυξη κελιων

Εμφάνιση ενός μόνο μηνύματος
  #4  
Παλιά 04-12-18, 12:12
kapetang Ο χρήστης kapetang δεν είναι συνδεδεμένος
Όνομα: Γιώργος
Έκδοση λογισμικού Office: Ms-Office 2010
Γλώσσα λογισμικού Office: Ελληνική, Αγγλική
 
Εγγραφή: 18-06-2010
Μηνύματα: 3.674
Προεπιλογή

Καλησπέρα

Αν κατάλαβα το ζητούμενο, θέλεις να συνενώσεις τις τιμές της στήλης "ΕΡΓΑΣΙΑ", που το αντίστοιχο κελί στη στήλη "ΑΠΑΝΤΗΣΗ" έχει τιμή "ΝΑΙ".

Στις εκδόσεις πριν από την 2013 (πχ 2010, 2007, 2003) δεν υπάρχει βολική ενσωματωμένη συνάρτηση για την υλοποίηση του ζητούμενου.

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

MyConcat(rngSource As Range, rngCriteria As Range, strSep As String) As String.

Η συνάρτηση παίρνει 3 ορίσματα και επιστρέφει μια συμβολοσειρά.

1) Το όρισμα rngSource είναι η περιοχή στήλης ή γραμμής με τις τιμές που θα συνενωθούν
2) Το όρισμα rngCriteria είναι η αντίστοιχη περιοχή με τα 'ΝΑΙ' (περιοχή κριτηρίων).
3) Το όρισμα είναι η συμβολοσειρά που θέλουμε να διαχωρίζει τις τιμές που θα συνενωθούν.

Δες το συνημμένο

ΥΓ Πρέπει οι μακροεντολές να είναι ενεργοποιημένες.
Συνημμένα Αρχεία
Τύπος Αρχείου: xlsm MyConcat.xlsm (18,2 KB, 19 εμφανίσεις)
Απάντηση με παράθεση