
03-06-13, 01:38
|
 | Διαχειριστής Όνομα: Τάσος Φιλοξενιδης Έκδοση λογισμικού Office: Ms-Office 365 Γλώσσα λογισμικού Office: Ελληνική, Αγγλική, Γερμανική | | Εγγραφή: 21-10-2009
Μηνύματα: 2.035
| |
Καλημέρα!
Τζίμη, αφού δώσεις στην ιδιότητα της φόρμας "ShowModal" την τιμή False, πέρασε στη φόρμα τον παρακάτω κώδικα και δοκίμασε: Κώδικας: Option Explicit
Private WState As Long
Private Sub UserForm_Initialize()
WState = Application.WindowState
Application.WindowState = xlMinimized
End Sub
Private Sub UserForm_Terminate()
Application.WindowState = WState
End Sub
Καλή συνέχεια!
Με εκτίμηση
Τάσος
__________________ Ms-Office Development Team Ανάπτυξη επαγγελματικών εφαρμογών |