Jeszcze jeden sposób… zmień widok na układ strony. W ten sposób zmienisz skalę siatki na cale, a następnie możesz ustawić wysokość i szerokość na tę samą wartość (np. 25 cali). Układ strony IMO jest najlepszym standardowym widokiem do pracy nad wyglądem arkusza kalkulacyjnego.

Oto przykład z rzeczywistymi wymiarami dla obu widoków:

Wybierz wszystkie (lub potrzebne rzędy/kola), a następnie przeciągnij, aby zmienić rozmiar na żądany.

1. 1. Przeciągnij brzeg nagłówka kolumny, aby zmienić jej szerokość. Pojawi się etykieta z dokładną liczbą pikseli.
2. Zapamiętaj wartość pikseli!
3. Przeciągnij krawędź nagłówka wiersza, aby zmienić jego wysokość.
4. Przeciągnij do tej samej wartości pikseli.

Gotowe!

Szerokość kolumny programu Excel jest mierzona liczbą zer (0), które mogą zmieścić się w komórce w stylu Normal. Aby przeliczyć na punkty (jak mierzona jest wysokość rzędu), zobacz http://www.dailydoseofexcel.com/archives/2004/06/01/column-widths-in-points/

Jeśli nie musisz być dokładny, po prostu go oko. Jeśli musisz być bliżej niż gałka oczna, umieść kwadrat z paska narzędzi do rysowania na arkuszu i zwymiaruj go. Jeśli chcesz mieć go 10 x 10, użyj takiego kodu jak:

sheet1.Shapes(1).Height = 10
sheet1.Shapes(1).Width = 10
sheet1.Shapes(1).Top = sheet1.Shapes(1).TopLeftCell.Top
sheet1.Shapes(1).Left = sheet1.Shapes(1).TopLeftCell.Left

Wtedy możesz ręcznie zwymiarować swój rząd i kolumnę, aby dopasować je do kwadratu i odczytać wysokość i szerokość kolumny.

VBA wydaje się trochę przesadzone jak na tak prosty rezultat… Jeśli klikniesz i przytrzymasz przy przeciąganiu, aby zmienić rozmiar wiersza/kola, rozmiar w pikselach zostanie pokazany w nawiasach. Jednostki te nie są skalowane, więc jeśli ustawisz rozmiar wiersza i kolumny na równe piksele, będą one kwadratowe. Oczywiście jest to proces ręczny… ale możesz znaleźć odpowiadające im rozmiary, a następnie wybrać zakres wierszy/kolumn i ustawić wszystkie ich rozmiary na raz.

Następujący kod działał dla mnie

Sub Grid_Squares()
    With Cells(1, 1)
        Cells.RowHeight = .Width
        Cells.ColumnWidth = .ColumnWidth
    End With
End Sub

Wynik:

Musisz mieć świadomość, że to, co matematycznie jest kwadratem, a co wizualnie jest kwadratem, jest inne. Nie wszystkie monitory są zrobione w ten sam sposób. Zazwyczaj piksele są szersze niż wysokie.

Spójrz na następujący obrazek:

Każdy czerwony, zielony i niebieski subpiksel tworzą cały piksel. Jak widać, kombinacja 3 jest szersza niż wysokość 1 subpiksela. W większości przypadków różnica jest subtelna i większość ludzi może jej nie zauważyć. Jednakże, w niektórych przypadkach ludzie zauważają.

Właściwie, to miałem w przeszłości tę samą sprawę. To, co dla mnie najlepsze, to następujący kod VBA. Znalazłem liniową zależność po prostu metodą prób i błędów.

Kod działa dla pojedynczych komórek, ale także dla selekcji. W tym drugim przypadku kwadraty są oparte na całkowitej szerokości lub wysokości zaznaczenia.

Sub MakeCellSquareByColumn()
    Selection.RowHeight = Selection.Width / Selection.Columns.Count
    Selection.ColumnWidth = (((Selection.Width / Selection.Columns.Count) / 0.75 - 5) / 7)
End Sub

Sub MakeCellSquareByRow()
    Selection.ColumnWidth = (((Selection.Height / Selection.Rows.Count) / 0.75 - 5) / 7)
    Selection.RowHeight = Selection.Height / Selection.Rows.Count
End Sub

Możesz umieścić te makra w module i przypisać do nich przyciski na pasku narzędzi szybkiego dostępu

Zauważ, że kwadraty znikają (przez zmianę szerokości kolumny) po zmianie typu czcionki lub rozmiaru. Wynika to ze sposobu, w jaki Excel oblicza szerokość kolumny. Zobacz: https://support.microsoft.com/en-us/help/214123/description-of-how-column-widths-are-determined-in-excel

Ustaliłem, że kwadrat może być wykonany w stosunku 7,25 wysokości rzędu na każde 1,0 punktu szerokości kolumny.

Jeśli chcesz zrobić to dla całego arkusza, możesz skorzystać z tej sztuczki - która i tak może być pomocna: kliknij pole po lewej stronie nagłówka kolumny A, aby zaznaczyć wszystkie komórki; kliknij i przeciągnij jeden z przekładek nagłówka kolumny do wybranego rozmiaru, odnotowując liczbę pikseli dla wynikowej szerokości komórki (używam programu Excel 2007, który to pokazuje); zrób to samo dla jednego z przekładek etykiet wierszy, dopasowując go do szerokości kolumny o piksele. Powinno to spowodować, że wszystkie komórki w polach arkusza będą miały taką samą liczbę pikseli. Co oczywiście nie jest tym, o co prosiłeś, ale miałem nadzieję, że ta sztuczka będzie działać z podzbiorem komórek. Niestety, nie działa.

Oto rozwiązanie VBA.

Private Sub MakeSquareCells()

'// Create graph paper in Excel see http://www.erlandsendata.no/english/index.php?d=envbawssetrowcol if you want cm or inches

    Set Cursheet = ActiveSheet

    'don't drive the person crazy watching you work
    UpdateScreen = Application.ScreenUpdating
    Application.ScreenUpdating = False
    With wksToHaveSquareCells
        .Columns.ColumnWidth = 5 '// minimum 2, max 400 ; above 7 --> zoom doesn't work nice
        .Rows.EntireRow.RowHeight = .Cells(1).Width
        '// ActiveWindow.Zoom = true
    End With

    Application.ScreenUpdating = UpdateScreen
    Cursheet.Activate '// Reactivate sheet that has been active at entrance of this subroutine

End Sub

Używam stosunku 5-1/3, wysokość rzędu do szerokości kolumny.

Na przykład, zrób rządowy rząd o wysokości 53,33 i szerokości kolumny odpowiednio 10, lub 106,66 i 20, i będziesz wystarczająco blisko do pracy rządowej.

Najpierw wybierz komórki, których rozmiar chcesz zmienić. Następnie na zakładce Home, przejdź do pola Cells i kliknij na opcję Format. Tutaj możesz zmienić Row Height i Column Width wybranych komórek, jak chcesz.

Uważam, że jest to najprostsze z rozwiązań…

Metoda ta wykorzystuje linijkę Excela, dzięki czemu wymiary wierszy i kolumn są bardziej zrozumiałe/łatwiejsze i dokładniejsze.

• Wybierz View na wstążce
• W widokach skoroszytu wybierz Układ strony
• Jeśli linijka nie wyświetla się, zaznacz pole wyboru Ruler w grupie Pokaż.
• Naciśnij przycisk Wybierz wszystko (lewy górny róg pod nazwą książki)
• Kliknij prawym przyciskiem myszy wiersz, wybierz opcję regulacji rozmiaru, a następnie wprowadź żądaną wartość pomiaru. Kliknij prawym przyciskiem myszy i powtórz dla kolumny.

To jest to. Wynikiem jest to, co pojawia się jako wizualnie idealne kwadraty. Istnieje nawet opcja zmiany jednostek miary w grupie Wyświetlanie w zakładce Opcje zaawansowane w programie Excel. Mam nadzieję, że to będzie najbardziej pomocne! :)

Chciałam zrobić idealną kwadratową siatkę do projektu szycia i ciągle otrzymywałam na to pytanie różne dziwne odpowiedzi, więc postanowiłam sama się nim bawić, aby go rozwiązać. Odkryłam, że nie da się uzyskać idealnego kwadratu, ale zbliżyłam się do niego tak blisko, jak tylko mogłam.

1. Zaznacz kwadraty, które chcesz sformatować.
2. Przejdź do zakładki formatowania.
3. Formatuj szerokość kolumny na 12.43
4. Następnie sformatuj wysokość komórki na 75,00.

Za pomocą linijki znalazłem tylko ułamek odstępu na długości 7 i 10 cali. Mam nadzieję, że to pomoże.

To robi sztuczkę całkiem zgrabnie używając VBA. Ustaw uniform rowHeight, następnie użyj właściwości Width (zwraca rozmiar kolumny w punktach) i podziel RowHeight przez nią, aby uzyskać jednostkowy stosunek wysokości do szerokości. Zrób nowy ColumnWidth, który jest dwukrotnie większy od oryginalnego ColumnWidth, aby uczynić wszystko kwadratowym.

Sub makeSquares() 
Cells.RowHeight = 20
With Cells(1, 1)
W = .ColumnWidth
HWratio = .RowHeight / .Width
Cells.ColumnWidth = W * HWratio
End With
End Sub

Kliknij i przeciągnij granicę między wierszami. Aby zmienić rozmiar więcej niż jednej kolumny/wiersza naraz, zaznacz je wszystkie, kliknij prawym przyciskiem myszy i kliknij “Wiersz Wysokość…” i ustaw na taką samą wysokość, jak szerokie są wiersze.

Proste rozwiązanie

• zaznacz wszystkie komórki
• przeciągnij kolumny do żądanego rozmiaru pikseli (zobaczysz rozmiar kolumny zarówno w punktach, jak i w pikselach podczas przeciągania i zmiany rozmiaru kolumn)
• powtórz dla wierszy (wybierając tę samą liczbę pikseli)
• powinno to dać Ci doskonałe kwadratowe komórki w całym arkuszu roboczym

Program Excel 2010 Korekta w widoku układu strony, a następnie powrót do widoku Normalny nie działa. Byłem w stanie zatwierdzić za pomocą narzędzi rysunkowych i zrobić idealny kwadrat w widoku normalnym. Jest to najprostsza metoda tworzenia kwadratów dowolnej wielkości.

Szerokość kolumny = 2,71 Wysokość rzędu = 18.

• Wybierz All - Ctrl+A
• kliknij prawym przyciskiem myszy dowolny nagłówek kolumny i wybierz Column width
• wpisz wartość = 4 > Ok
• tam zobaczysz wszystkie komórki w idealnym kształcie kwadratu.

• Wybierz kolumny (kliknij kolumnę A, następnie przytrzymaj przesunięcie i kliknij drugi koniec)

• Kliknij prawym przyciskiem myszy na jedną z kolumn, kliknij szerokość kolumny, a następnie wprowadź nową wartość.

• To samo możesz zrobić z wierszem, a następnie kliknij Wysokość rzędu, aby uzyskać wysokość rzędu.

Jeśli chcesz, aby wiersz i kolumna wyglądały na kwadratowe, wybierz wszystkie komórki, które mają być kwadratowe i zmień wysokość wiersza na 28,8 oraz zmień szerokość kolumny na 4,56.