Εμφάνιση ενός μόνο μηνύματος
  #2  
Παλιά 25-10-12, 17:40
Το avatar του χρήστη Tasos
Tasos Ο χρήστης Tasos δεν είναι συνδεδεμένος
Διαχειριστής
Όνομα: Τάσος Φιλοξενιδης
Έκδοση λογισμικού 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
Ανάπτυξη επαγγελματικών εφαρμογών
Απάντηση με παράθεση