Forum

Forum (https://www.ms-office.gr/forum/)
-   Excel - Ερωτήσεις / Απαντήσεις (https://www.ms-office.gr/forum/excel-erotiseis-apantiseis/)
-   -   [VBA] Όριο γραμμων σε TextBox (https://www.ms-office.gr/forum/excel-erotiseis-apantiseis/5166-orio-grammon-se-textbox.html)

Spirosgr 23-02-19 09:30

Για να αποδώσουμε τα του Καίσαρος τω Καίσαρι,
να πούμε ότι η λύση του Χρήστου, είναι καλή και δουλεύει αν...

Εξήγηση:
Η λύση με το συμβάν Change που έδωσα,
είναι μια άλλου είδους λύση που θα μπορούσε κανείς να χρησιμοποιήσει.

Όμως, αν για κάποιο λόγο, δεν μπορούμε να χρησιμοποιήσουμε το Change, τί θα γίνει;

Το σφάλμα με την συνέχεια των γραμμών στον κώδικα του Χρήστου,
εμφανίζεται αν, αντί Enter, χρησιμοποιήσει κανείς το Tab πλήκτρο.

Αν όμως βάλουμε στο Initialize και
Κώδικας:

.TabKeyBehavior = False
τότε θα λειτουργήσει μια χαρά.

Ακόμα θα μπορούσε κανείς να αλλάζει γραμμές με Shift + Enter
και να μην έχει στο Initialize, καμία ιδιότητα, αν βάλει στο KeyDown:
Κώδικας:

If TextBox1.LineCount >= 5 And KeyCode = 13 Or KeyCode = 9 Then KeyCode = 0
Όλα αυτά είναι θεωρίες και εναλλακτικές, για να χρησιμοποιήσει κανείς
και να αποφασίσει τι τελικά θα κάνει, αν βέβαια γνωρίζει και τον υπόλοιπο κώδικα της φόρμας,
την συμπεριφορά και χρήση του TextBox, του τι θέλει ο χρήστης, αν τον βολεύει πληκτρολόγιο ή ποντίκι...κ.ά
πράγματα που δεν γνωρίζουμε.

gfevran 24-02-19 12:07

Καλησπέρα,
Σε’ Ευχαριστώ Σπύρο για άλλη μια φορά για όλες αυτές τις εναλλακτικές λύσεις,
Έχεις το χάρισμα να μεταδίδεις τη γνώση με πολύ απλή και κατανοητή περιγραφή.

Σε’ Ευχαριστώ πολύ.
Να’ σαι καλά.

Με εκτίμηση Γιώργος

Spirosgr 24-02-19 13:11

Καλή συνέχεια Γιώργο, ευχαριστώ για τα καλά λόγια.


Η ώρα είναι 05:49.

Ms-Office.gr - ©2000 - 2026, Jelsoft Enterprises Ltd.


Search Engine Optimization by vBSEO 3.3.2