Di Microsoft Excel,

Saya ingin membuat ketinggian tiga baris pertama dan empat kolom pertama (12 sel di sudut kiri atas) sehingga sel-sel ini berbentuk bujur sangkar. Bagaimana ini bisa dilakukan?

Anehnya, Excel mengatakan:

Row height: 15
Column width: 8.43

Jadi, ini tidak pada skala yang sama.

Membuat keduanya 8.43 memberi saya ini:

Sekarang, apa yang harus saya lakukan?

Satu lagi cara ... ubah tampilan Anda ke Tata Letak Halaman. Ini mengubah skala kisi menjadi inci, dan kemudian Anda dapat secara khusus mengatur tinggi dan lebar untuk nilai yang sama (mis. 25 inci). Tata letak halaman IMO adalah tampilan standar terbaik untuk mengerjakan tampilan spreadsheet.

Berikut ini contoh dengan dimensi sebenarnya untuk kedua tampilan:

Pilih semua (atau baris / kolom yang Anda butuhkan), lalu seret untuk mengubah ukuran ke ukuran yang Anda inginkan.

1. Seret tepi tajuk kolom untuk mengubah ukuran lebar kolom. Tip alat muncul dengan jumlah piksel yang tepat.
2. Ingat nilai pikselnya!
3. Seret tepi judul baris untuk mengubah ukuran ketinggian baris, ini bekerja dengan cara yang sama.
4. Seret ke nilai piksel yang sama.

Selesai!

Lebar kolom Excel diukur dengan jumlah nol (0) yang dapat ditampung dalam sel dengan gaya Normal. Untuk mengonversi ke titik (bagaimana tinggi baris diukur), lihat

http://www.dailydoseofexcel.com/archives/2004/06/01/column-widths-in-points/

Jika Anda tidak perlu tepat, saksikan saja. Jika Anda memang harus lebih dekat daripada melihat bola mata, letakkan kotak dari toolbar Drawing di lembar Anda dan ukurlah. Jika Anda menginginkannya 10 x 10, gunakan kode seperti ini:

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

Kemudian Anda dapat secara manual mengukur baris dan kolom Anda agar sesuai dengan persegi dan membaca tinggi dan lebar kolom.

VBA tampaknya sedikit berlebihan untuk hasil sederhana seperti itu .. Jika Anda mengklik dan menahan ketika Anda pergi untuk menarik untuk mengubah ukuran baris / col, ukuran dalam piksel ditunjukkan dalam tanda kurung. Unit-unit ini tidak diskalakan dan dengan demikian jika Anda mengatur ukuran baris dan kolom ke piksel yang sama, mereka akan menjadi persegi. Tentu saja, ini adalah proses manual .. tetapi Anda dapat menemukan ukuran yang setara dan kemudian memilih berbagai baris / kolom dan mengatur semua ukurannya sekaligus.

Jika Anda ingin melakukannya untuk seluruh lembar, Anda bisa menggunakan trik ini - yang mungkin bisa membantu: klik kotak di sebelah kiri kolom judul A untuk memilih semua sel; klik dan seret salah satu pembagi tajuk kolom ke ukuran yang Anda inginkan, perhatikan jumlah piksel untuk lebar sel yang dihasilkan (Saya menggunakan Excel 2007, yang menunjukkan ini); lakukan hal yang sama untuk salah satu pembagi label baris, mencocokkannya dengan lebar kolom dengan piksel. Ini harus membuat semua sel dalam kotak sheet. Yang tentu saja bukan yang Anda tanyakan, tetapi saya berharap trik ini akan berhasil dengan subset sel. Sayangnya tidak.

Anda perlu menyadari bahwa apa yang secara matematis kotak dan apa yang secara visual kotak berbeda. Tidak semua monitor dibuat dengan cara yang sama. Biasanya piksel lebih lebar daripada tingginya.

Lihatlah gambar berikut:

Setiap subpiksel merah, hijau, dan biru membentuk keseluruhan piksel. Seperti yang Anda lihat, kombinasi 3 lebih lebar dari ketinggian 1 subpiksel. Dalam kebanyakan kasus, perbedaannya tidak kentara, dan kebanyakan orang mungkin tidak menyadarinya. Namun, dalam beberapa kasus, orang-orang melakukannya.

Saya menentukan persegi dapat dibuat dengan rasio tinggi 7,25 baris untuk setiap 1,0 titik lebar kolom.

Sebenarnya, saya memiliki masalah yang sama di masa lalu. Apa yang terbaik bagi saya adalah kode VBA berikut. Saya menemukan hubungan linier hanya dengan coba-coba.

Kode ini berfungsi untuk sel tunggal, tetapi juga untuk seleksi. Dalam kasus terakhir, kotak didasarkan pada lebar atau tinggi pemilihan total.

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

Anda dapat meletakkan makro ini di Modul dan menetapkan tombol untuknya di bilah alat akses cepat

Perhatikan bahwa kotak menghilang (dengan lebar kolom yang berubah) ketika Anda mengubah jenis atau ukuran font. Ini karena cara Excel menghitung lebar kolom. Lihat: https://support.microsoft.com/en-us/help/214123/description-of-how-column-widths-are-determined-in-excel

Kode berikut ini berfungsi untuk saya

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

Hasil:

Berikut ini adalah solusi 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

Pertama, pilih sel yang ingin Anda ubah ukurannya. Kemudian pada Hometab, buka Cellskotak dan klik Formatopsi. Di sini Anda dapat mengubah Row Heightdan Column Widthsel yang dipilih seperti yang Anda inginkan.

Saya ingin membuat kotak persegi yang sempurna untuk proyek menjahit dan terus mendapatkan semua jenis jawaban aneh untuk pertanyaan ini, jadi saya memutuskan untuk bermain sendiri untuk mencari tahu. Saya menemukan itu tidak mungkin untuk mendapatkan kotak yang sempurna, tapi saya datang sedekat mungkin, hanya sepotong.

1. Sorot kotak yang ingin Anda format.
2. Buka tab format.
3. Format lebar kolom di 12,43
4. Kemudian format tinggi sel menjadi 75,00.

Menggunakan penggaris saya menemukan saya hanya sebagian kecil dari 7 dan 10 inci panjangnya. Semoga ini membantu.

Saya menggunakan rasio 5-1 / 3, tinggi baris ke lebar kolom.

Misalnya, buat baris 53,33 tinggi, dan lebar kolom 10, atau 106,66 dan 20, masing-masing, dan Anda akan cukup dekat untuk pekerjaan pemerintah.

Saya percaya ini menjadi solusi paling sederhana ...

Metode ini menggunakan penggaris Excel sehingga dimensi baris & kolom lebih mudah dipahami / lebih mudah & akurat.

• Pilih Lihat pada Ribbon
• Di dalam Tampilan Buku Kerja pilih Tata Letak Halaman
• Jika penggaris tidak ditampilkan, pilih kotak centang Penggaris dalam grup Perlihatkan.
• Tekan tombol Pilih Semua (sudut kiri atas di bawah buku nama)
• Klik kanan Baris, pilih opsi penyesuaian ukuran & kemudian masukkan nilai pengukuran yang diinginkan. Klik kanan & ulangi untuk Kolom.

Itu benar-benar. Hasilnya adalah apa yang tampak sebagai kotak yang secara visual sempurna. Bahkan ada opsi untuk mengubah unit pengukuran dalam grup Display dari tab Advanced di Opsi Excel. Semoga ini akan sangat membantu! :)

Klik dan seret di perbatasan antara baris. Untuk mengubah ukuran lebih dari satu kali kolom / baris sekaligus, pilih semuanya, klik kanan dan klik "Tinggi Baris ..." dan atur ke ketinggian yang sama dengan baris lebar.

• Pilih kolom (klik kolom A, lalu tahan shift dan klik ujung lainnya)

• Klik kanan pada salah satu kolom, klik Lebar Kolom dan kemudian masukkan nilai baru.

• Anda dapat melakukan hal yang sama dengan satu baris, lalu klik Tinggi Baris untuk mendapatkan tinggi baris.

Jika Anda ingin membuat baris & kolom terlihat persegi, pilih semua sel yang ingin Anda buat persegi dan ubah tinggi baris menjadi 28,8 DAN ubah lebar kolom menjadi 4,56.

Solusi sederhana

• pilih semua sel
• seret kolom ke ukuran piksel yang diinginkan (Anda akan melihat ukuran kolom di kedua titik dan piksel saat Anda menyeret dan mengubah ukuran kolom)
• ulangi untuk baris (memilih jumlah piksel yang sama)
• ini akan memberi Anda sel berukuran persegi sempurna di lembar kerja

Excel 2010 Menyesuaikan dalam tampilan Tata Letak Halaman dan kemudian beralih kembali ke tampilan Normal tidak berfungsi. Saya dapat memvalidasi dengan menggunakan alat menggambar dan membuat kuadrat sempurna dalam tampilan Normal. Ini adalah metode termudah untuk membuat kotak dengan ukuran berapa pun.

Lebar Kolom = 2.71 Tinggi Baris = 18.

• Pilih Semua - Ctrl + A
• Klik kanan sembarang tajuk kolom dan pilih Lebar kolom
• Masukkan nilai = 4> Oke
• Di sana Anda akan melihat semua sel dalam bentuk persegi sempurna.

Ini cukup efektif menggunakan VBA. Atur seragam rowHeight, lalu gunakan Widthproperti (kembalikan ukuran kolom dalam poin) dan bagi RowHeightdengan itu untuk mendapatkan rasio tinggi / lebar unit-kurang. Jadikan yang baru sebagai ColumnWidthkali yang orisinal ColumnWidthuntuk membuat segalanya menjadi persegi.

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