
25-10-12, 17:40
|
 | Διαχειριστής Όνομα: Τάσος Φιλοξενιδης Έκδοση λογισμικού Office: Ms-Office 365 Γλώσσα λογισμικού Office: Ελληνική, Αγγλική, Γερμανική | | Εγγραφή: 21-10-2009
Μηνύματα: 2.028
| |
Καλησπέρα σε όλους!
H VBA δεν μας δίνει τη δυνατότητα μορφοποίησης ενός Msgbox εκτός και αν καλέσουμε API των Windows (ξεφεύγουμε από το Office όμως).
Το Msgbox που παρέχεται στη VBA έχει τη δυνατότητα να εμφανίζει χαρακτηριστικά εικονίδια
που μπορεί να ορίσει ο προγραμματιστής αναλόγως το περιεχόμενο του κειμένου.
Για παράδειγμα: Κώδικας: Sub testMsgbox()
MsgBox "Ερώτηση", vbYesNo + vbQuestion + vbDefaultButton2, "Τίτλος"
MsgBox "Ερώτηση", vbYesNoCancel + vbQuestion + vbDefaultButton1, "Τίτλος"
MsgBox "Ερώτηση", vbAbortRetryIgnore + vbQuestion + vbDefaultButton3, "Τίτλος"
MsgBox "Ερώτηση", vbInformation + vbRetryCancel, "Τίτλος"
MsgBox "Πληροφορία", vbInformation, "Τίτλος"
MsgBox "Πληροφορία", vbInformation + vbSystemModal, "Πάντα σε πρώτο πλάνο του συστήματος"
MsgBox "Γκρίνια", vbExclamation, "Τίτλος"
MsgBox "Επικίνδυνο σφάλμα", vbCritical, "Τίτλος"
End Sub
Οτιδήποτε άλλο χρησιμοποιηθεί στη θέση του κλασικού Msgbox, πίστεψε με δεν θα θεωρηθεί επαγγελματικό.
Ωστόσο μπορείς στη θέση του MsgBox να χρησιμοποιήσεις UserForm και να μορφοποιήσεις τα περιεχόμενα του όπως επιθυμείς.
Φιλικά
Τάσος
__________________ Ms-Office Development Team Ανάπτυξη επαγγελματικών εφαρμογών |