Πίνακας Excel ως τετράγωνο χαρτί - μακροεντολή VBA

Πίνακας περιεχομένων

Δημιουργήστε έναν νέο πίνακα χρησιμοποιώντας μια μακροεντολή, στον οποίο όλα τα κελιά διαμορφώνονται ως μικρά τετράγωνα και έτσι καταλήγουν σε τετράγωνο χαρτί

Το χαρτί κουτιού έρχεται σε πρακτικό. Όχι μόνο μπορείτε να το χρησιμοποιήσετε σε μαθηματικούς υπολογισμούς, αλλά μπορείτε επίσης να το χρησιμοποιήσετε για άλλες εργασίες.

Λόγω της δομής του κελιού, ένα υπολογιστικό φύλλο Excel είναι βασικά κατάλληλο για να πάρει την όψη του τετράγωνου χαρτιού.

Μπορείτε να κάνετε την κατάλληλη μορφοποίηση με μη αυτόματο τρόπο. Είναι πιο εύκολο με μια μακροεντολή. Η ακόλουθη μακροεντολή VBA δημιουργεί ένα νέο βιβλίο εργασίας και διαμορφώνει το πρώτο φύλλο εργασίας σε αυτό το βιβλίο εργασίας με μικρά τετράγωνα:

Sub CreateCatchedPaper ()
Χαμηλή γωνία ως ακέραιος
Με βιβλία εργασίας. Προσθήκη. Φύλλα εργασίας (1). Κελιά
.RowHeight = 12
.Πλάτος στήλης = 1,5
Για γωνία = 7 έως 12
Με .Borders (γωνία)
.Βάρος = xlHairline
.ColorIndex = xlΑυτόματο
.LineStyle = xlΣυνέχεια
Τέλος με
Επόμενη γωνία
Τέλος με
Τέλος υπο

Το παρακάτω σχήμα δείχνει πώς μοιάζει ο αντίστοιχος πίνακας Excel. Μοιάζει με μια σελίδα με πλαίσια όπως αυτά που χρησιμοποιούνται στα μαθήματα μαθηματικών.

Για να εισαγάγετε τη μακροεντολή, πατήστε ALT F11 στο Excel για να εμφανιστεί ο επεξεργαστής VBA. Επιλέξτε την εντολή INSERT - MODULE στον επεξεργαστή VBA και εισαγάγετε τη μακροεντολή. Για να ξεκινήσετε τη μακροεντολή, ενεργοποιήστε τον συνδυασμό πλήκτρων ALT F8 στο Excel. Οι δύο συντομεύσεις πληκτρολογίου λειτουργούν σε όλες τις εκδόσεις του Excel.

Θα βοηθήσει στην ανάπτυξη του τόπου, μοιράζονται τη σελίδα με τους φίλους σας

wave wave wave wave wave