1 Ανοίξτε το Microsoft Excel . 2
Τοποθετήστε κάποιο κείμενο στο κελί " A1 " στο φύλλο εργασίας του Excel .
Εικόνων 3
Κάντε κλικ στο " Εργαλεία ", " Macro " και στη συνέχεια κάντε κλικ στο κουμπί " Visual Basic ". Αυτό θα ανοίξει το πρόγραμμα επεξεργασίας VBA .
Η
4 Κάντε κλικ στο κουμπί "Εισαγωγή " και στη συνέχεια " ενότητα ". Πρέπει τώρα να έχετε μια κενή λειτουργική μονάδα κώδικα
5
Πληκτρολογήστε ή αντιγράψτε και επικολλήστε τον ακόλουθο κώδικα στη λειτουργική μονάδα κώδικα : .
Sub Check_For_Text ( )
Εάν Εφαρμογή . WorksheetFunction.IsText ( Range ( "A1" ) ) Στη συνέχεια
MsgBox " είναι το κείμενο "
Else
MsgBox " δεν είναι το κείμενο "
End Αν
End Sub
Η
6 Πατήστε το πλήκτρο " F5 " για να εκτελέσετε το πρόγραμμα . Ο κωδικός θα ελέγξει περιοχή κελιών A1 στο φύλλο εργασίας σας για μια τιμή κειμένου . Εάν το κείμενο είναι στο κελί , ένα μήνυμα θα πει " Είναι το κείμενο . " Αν όχι , ένα μήνυμα θα πει " Δεν είναι το κείμενο . "
Η
εικόνων
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα