
09-07-19, 11:04
|
 | Συντονιστής Όνομα: Σπύρος Τσιλιγιάννης Έκδοση λογισμικού Office: Ms-Office 2003, Ms-Office 2007, Ms-Office 2010, Ms-Office 2013, Ms-Office 2016, Ms-Office 365 Γλώσσα λογισμικού Office: Ελληνική, Αγγλική | | Εγγραφή: 22-11-2011 Περιοχή: Αθήνα
Μηνύματα: 2.321
| |
Καλημέρα
Η πρόταση μου για την περίπτωση, είναι να αποφύγουμε
την ενσωματωμένη =RandBetween() και την χρήση του F9
και να βάλουμε σε μια Module, ένα μικρό κώδικα, που κάνει την δουλειά...
Στον κώδικα, θα συμπληρώσουμε κάποιες σταθερές, βασικές ή optional
και θα μπορούμε να έχουμε τα αποτελέσματα, οπουδήποτε θέλουμε.
Ο κώδικας έχει δυνατότητα, να αποθηκεύει τυχαία αποτελέσματα
από δεδομένο εύρος τιμών (Integer) αλλά και ημερομηνία ή και ώρα
που παρήγαγε τον τυχαίο αριθμό.
Για να ενεργοποιήσετε όλες τις δυνατότητες,
ενεργοποιήστε τις Optional Consts και
τις γραμμές του κώδικα, που είναι απενεργοποιημένες.
|