[VBA] Υπολογισμός Καρτεσιανού Γινομένου

[kapetang]

Δημιουργός: Γιώργος Καπετανόπουλος (έτος 2012)
Περιβάλλον: Excel 2007, 2010

Στο συνημμένο αρχείο παρουσιάζονται τέσσερες μέθοδοι προσδιορισμού και εμφάνισης των στοιχείων ενός καρτεσιανού γινομένου.

Αν έχουμε Κ στήλες και πάρουμε από κάθε στήλη μια τιμή, θα σχηματιστεί μια διαταγμένη ομάδα με Κ τιμές (Κ-άδα).

Το σύνολο των Κ-άδων είναι αυτό που (στα μαθηματικά) λέμε καρτεσιανό γινόμενο.

Αν το πλήθος των τιμών (στοιχείων) στις στήλες είναι Ν1, Ν2, ...,Νκ, αντίστοιχα, Το πλήθος των Κ-άδων δίνεται από το γινόμενο: Ν1*Ν2*...*Νκ.

Ο Θανάσης (gr8styl) στο μήνυμά του δίνει λύση χωρίς κώδικα.

Αντίθετα στο επισυναπτόμενο αρχείο οι λύσεις υλοποιούνται με κώδικα.

Η πρώτη (1) μέθοδος χρησιμοποιεί ειδικό αλγόριθμο που βασίζεται σε ένθετους βρόχους.

Οι υπόλοιπες (2, 3, 4) αξιοποιούν τη δυνατότητα της γλώσσας των ερωτημάτων SQL να δημιουργεί καρτεσιανά γινόμενα πινάκων.

Οι τελευταίες μέθοδοι είναι πιο σύνθετες παρουσιάζουν όμως ενδιαφέρον γιατί δείχνουν πως μπορούμε να αξιοποιήσουμε την SQL στο Ecxel για να κάνουμε ταξινομήσεις, αναζητήσεις, ομαδοποιήσεις και να πάρουμε μοναδικές τιμές.

Περισσότερες λεπτομέρειες δίνονται στο συνημμένο αρχείο.

Τελειώνοντας θα πρέπει να ευχαριστήσω τον Τάσο (διαχειριστή) για την ανάπτυξη της τέταρτης μεθόδου και τη συνδρομή του στις δοκιμές των μεθόδων.