Πώς να κάνει τα πάντα Κεφαλαία στο Excel

Ενώ η λειτουργία του Excel 2010 " ΠΑΝΩ " θα μετατρέψει μια συμβολοσειρά κειμένου σε κεφαλαία , η λειτουργία καταφέρνει μόνο στη δημιουργία ενός νέου κυττάρου με το κεφαλαίο κείμενο , αντί για τη μετατροπή ενός υπάρχοντος κυττάρου . Για να αλλάξετε όλο το κείμενο σε ολόκληρο το φύλλο εργασίας σε κεφαλαία , θα πρέπει να χρησιμοποιήσετε τη Visual Basic for Applications ( VBA ) , η οποία είναι μια γλώσσα προγραμματισμού που έρχεται πακέτο με το Excel . VBA να δημιουργήσετε μια μακροεντολή που θα αλλάζουν κάθε κομμάτι του κειμένου σε κεφαλαία με το πάτημα ενός κουμπιού . Οδηγίες
Η

1 Ανοίξτε το φύλλο εργασίας του Excel . 2

Πατήστε Alt και F11 για να εμφανιστεί το Excel 2010 κονσόλα VBA . Μόλις η κονσόλα ανοίγει , βρείτε το όνομα του βιβλίου εργασίας σας στη λίστα στην αριστερή πλευρά της οθόνης . Κάντε δεξί κλικ στο όνομα του βιβλίου εργασίας , μετακινήστε το ποντίκι σας πάνω από "Εισαγωγή" και επιλέξτε " Ενότητα ". Κάντε διπλό κλικ στη λειτουργική μονάδα που εμφανίζεται .
Εικόνων 3

Κάντε κλικ οπουδήποτε στο κενό λευκό χώρο στη δεξιά πλευρά της κονσόλας VBA . Πληκτρολογήστε το ακόλουθο κείμενο : " Sub UpperCaseConvert ( ) " και πατήστε Enter . VBA θα εισάγει αυτόματα την εντολή " End sub" στο κάτω μέρος του κώδικα .
Η 4

Πληκτρολογήστε "Dim x As Range" στη γραμμή ακριβώς κάτω από τη γραμμή " Sub" . Αυτό θα δημιουργήσει μια μεταβλητή , "x ", που θα χρειαστεί αργότερα στον κώδικα VBA . Πατήστε το πλήκτρο Enter για να μεταβείτε στον επόμενο γραμμή
5

Εισάγετε τον παρακάτω κωδικό στην κονσόλα VBA : .

Για κάθε x Σε Cells.SpecialCells ( xlConstants , xlTextValues ​​)

x.Formula = UCase ( x.Formula )

Επόμενο

Αυτό θα πάει ένα -ένα μέσα από κάθε κελί που περιέχει το κείμενο στο φύλλο εργασίας σας και να το μετατρέψετε σε κεφαλαία . Κάντε κλικ στο " Χ " στην επάνω δεξιά γωνία της κονσόλας VBA για να το κλείσετε .
Η

6 Κάντε κλικ στην καρτέλα "Προγραμματιστής " στην κορυφή της οθόνης του Excel . Κάντε κλικ στο κουμπί "Macro " , το οποίο βρίσκεται στον "Κώδικα " περιοχή της κορδέλας . Επιλέξτε " UpperCaseConvert " από τη λίστα των μακροεντολών και κάντε κλικ στο " Run".
Η
εικόνων