[VBA] Ισοκατανεμημένος διαμοιρασμός

[poulman]

Καλησπέρα σας

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

Έστω ότι έχουμε δύο πίνακες:

Στον πίνακα αριστερά εισάγουμε σε κάθε στήλη τα μήλα που πήρε κάθε μαθητής, διαχωρισμένα σε δύο κατηγορίες αυτά που πήρε κι έφαγε(πρώτη στηλη) κι αυτά που πήρε αλλά τα έχει ακόμη (δευτερη στηλη).
Έστω πως θέλουμε να μοιράσουμε ισόποσα τα μήλα σε όλους τους μαθητές, βασιζόμενοι στο μέσο όρο μήλων ανά μαθητή. Εννοείται πως δεν υπολογίζονται οι μαθητές που λείπουν (κενά κελιά).
Όμως, σε περίπτωση που κάποιος μαθητής πήρε μεν περισσότερα μήλα αλλά πρόλαβε και έφαγε τα πιό πολλά, θα μπορεί να δώσει μόνο αυτά που του έμειναν (δεν θα του μείνει χρέος-αρνητικός αριθμός).
Τα αποτελέσματα του διαμοιρασμού θα πρέπει να ανγράφονται στον δεύτερο πίνακα δεξιά με το όνομα αυτού που δίνει (πρωτη στήλη), τον αριθμό μήλων που δίνονται (δεύτερη στήλη) και το όνομα αυτού που παίρνει (τρίτη στηλη).
Έπειτα, θα πρέπει να ανανεώνεται ο πρώτος πίνακας στην δέυτερη στήλη του πρώτου πινακα με τα μήλα που έχει ο κάθε μαθητής μετά από τη μοιρασιά.
Μάλλον σας κάνω δύκολη και περίπλοκη ερώτηση, αλλά κάθε ιδέα θα εκτιμηθεί δεόντως.
Ευχαριστώ εκ των προτέρων