Tabela Excela jako papier w kratkę - Makro VBA

Spisie treści

Utwórz nową tabelę za pomocą makra, w którym wszystkie komórki są sformatowane jako małe kwadraty, dzięki czemu powstaje papier w kratkę

Przydaje się papier w pudełku. Możesz go używać nie tylko w obliczeniach matematycznych, ale także do innych zadań.

Ze względu na strukturę komórek arkusz kalkulacyjny Excela w zasadzie nadaje się do wyglądu kwadratowego papieru.

Odpowiednie formatowanie możesz wykonać ręcznie. Łatwiej jest z makro. Następujące makro VBA tworzy nowy skoroszyt i formatuje pierwszy arkusz w tym skoroszycie za pomocą małych kwadratów:

Sub UtwórzCatchedPaper ()
Przyciemnij róg As Integer
Z Workbooks.Add.Worksheets (1) .Cells
.Wysokość Wiersza = 12
.Szerokość kolumny = 1,5
Dla narożnika = 7 do 12
Z .Borders (narożnik)
.Waga = xlLinia włosów
.ColorIndex = xlAutomatic
.LineStyle = xlCiągły
Kończyć z
Następny róg
Kończyć z
Napis końcowy

Poniższy rysunek pokazuje, jak wygląda pasująca tabela programu Excel. Wygląda jak strona z polami podobnymi do tych używanych na lekcjach matematyki.

Aby wprowadzić makro, naciśnij ALT F11 w programie Excel, aby wywołać edytor VBA. Wybierz polecenie WSTAW - MODUŁ w edytorze VBA i wprowadź makro. Aby uruchomić makro, aktywuj kombinację klawiszy ALT F8 w programie Excel. Dwa skróty klawiaturowe działają we wszystkich wersjach programu Excel.

Będziesz pomóc w rozwoju serwisu, dzieląc stronę ze swoimi znajomymi

wave wave wave wave wave