| Home  | Υλικό υπολογιστών  | Δικτύωση  | Προγραμματισμός  | λογισμικό  | ερώτηση  | συστήματα  |  
Προγραμματισμός  
  • C /C + + Προγραμματισμός

  • Προγραμματισμός Υπολογιστών Γλώσσες

  • Δελφοί Προγραμματισμός

  • Προγραμματισμός Java

  • JavaScript Προγραμματισμός

  • PHP /MySQL Προγραμματισμός

  • Perl Προγραμματισμός

  • Python Προγραμματισμός

  • ρουμπίνι Προγραμματισμός

  • Visual Βασικά Προγραμματισμός
  •  
    Γνώση Υπολογιστών >> Προγραμματισμός >> Visual Βασικά Προγραμματισμός >> Content
    Πώς να αφαιρέσει ένα κενό πλαίσιο κειμένου στον VBA
    Αφαίρεση κενά πλαίσια κειμένου στο Microsoft Excel με τη χρήση της Visual Basic for Applications ( VBA) δεν είναι τόσο περίπλοκο όπως μπορείτε να σκεφτείτε . Στην VBA , μπορείτε να χρησιμοποιήσετε το όνομα του φύλλου εργασίας και το όνομα του πλαισίου κειμένου για να αποκτήσετε πρόσβαση αξία του . Χρησιμοποιήστε το " OLEObject " αντικείμενα για να αφαιρέσετε ένα αντικείμενο , όπως ένα πλαίσιο κειμένου από ένα φύλλο εργασίας . Αυτό το αντικείμενο αντιπροσωπεύει ένα στοιχείο ελέγχου ActiveX σε ένα φύλλο εργασίας , περιέχει το "Διαγραφή " περιουσιακών στοιχείων που μπορούν να χρησιμοποιηθούν για την αφαίρεση του ελέγχου . Τα πράγματα που θα χρειαστείτε για Microsoft Excel
    Η Εμφάνιση Περισσότερες οδηγίες
    Η 1

    Εκκίνηση του Microsoft Excel , κάντε κλικ στην καρτέλα "Προγραμματιστής " και κάντε κλικ στο εικονίδιο "Εισαγωγή" βρίσκεται στους Ελέγχους παράθυρο . Κάντε κλικ στο " Πλαίσιο κειμένου " παρακάτω στοιχεία ελέγχου ActiveX και κάντε κλικ σε οποιοδήποτε κελί όπου θέλετε να εισαγάγετε το πλαίσιο κειμένου . Προσθέστε ένα νέο κουμπί , χρησιμοποιώντας την ίδια τεχνική . 2

    Κάντε κλικ στο " μακροεντολών " και πληκτρολογήστε " removeBlankTxtBox " κάτω από το όνομα της μακροεντολής και κάντε κλικ στο κουμπί "Δημιουργία " για να δημιουργήσετε μια νέα μακροεντολή .
    Η < br > 3

    Πληκτρολογήστε το παρακάτω για να συλλάβει τυχόν σφάλματα :

    On Error GoTo Err_removeBlankTxtBox :
    Η 4

    Προσθέστε τον ακόλουθο κώδικα για να ελέγξετε αν το πλαίσιο κειμένου είναι κενό και αφαιρέστε το αν είναι αλήθεια : .

    Εάν ActiveSheet.TextBox1.Value = " " τότε

    Sheet1.OLEObjects ( " textBox1 " ) Διαγραφή

    End If
    < br > 5

    Προσθέστε τον ακόλουθο κώδικα για να χειριστεί τυχόν λάθη :

    Exit_removeBlankTxtBox :

    Exit Sub

    Err_removeBlankTxtBox :

    Συνέχιση Exit_removeBlankTxtBox :

    6

    Επιστρέψτε στο Microsoft Office Excel και κάντε δεξί κλικ στο κουμπί . Κάντε κλικ στο κουμπί " Αντιστοίχιση μακροεντολής ... " και κάντε κλικ στο " removeBlankTxtBox . " Κάντε κλικ στο κουμπί "OK". Κάντε κλικ στο " Κουμπί 1 " για να εκτελέσετε τη μακροεντολή σας και αφαιρέστε το πλαίσιο κειμένου, εάν είναι κενή .
    Η
    εικόνων

    Previous :

    next :
      Σχετικά Άρθρα
    ·Πώς να αλλάξετε ρυθμίσεις χρώματος σε Visual Bas…
    ·Πώς να χρησιμοποιήσετε το SSL με VB6 
    ·Vb Καθαρή SQL Server Tutorial 
    ·Πώς να χρησιμοποιήσετε το αντικείμενο VBScript …
    ·Πώς να Εμφάνιση Εργαλειοθήκη στοιχείων ελέγ…
    ·Μπορεί Visual Basic Script Ακούστε σε Port Telnet 
    ·Tutorial Βάση δεδομένων για τη Visual Basic 2008 
    ·Πώς να γράψετε ένα αρχείο δέσμης για να αντι…
    ·Πώς να κάνει το Custom των Windows μηνύματα λάθους 
    ·Πώς να γράψετε μια λίστα των βασικών ζευγών …
      Προτεινόμενα άρθρα
    ·Πώς να δημιουργήσετε PHP σε IIS 6.0 
    ·Πώς μπορώ να Ενσωμάτωση δεδομένων σε ένα Pytho…
    ·Πώς να προσαρμόσετε το χρώμα στο NetBeans 
    ·Πώς να ξεκινήσετε MySQL υπηρεσία των Windows 
    ·Πώς να δημιουργήσετε ένα πρόγραμμα που Αντι…
    ·Πώς να προσθέσετε ένα άλλο τηλέφωνο σε μια δ…
    ·Πώς να εξαγάγετε MySQL δεδομένων στο Excel σε λει…
    ·Πόσο ανά ώρα Do PHP προγραμματιστές Βεβαιωθείτ…
    ·Πώς να προσθέσετε ένα υδατογράφημα Χρησιμοπ…
    ·Τα καλύτερα σημεία για να Βάλτε NET Logs Application 
    Copyright © Γνώση Υπολογιστών http://el.wingwit.com