2010-07-20 14:28:34 +0000 2010-07-20 14:28:34 +0000
57
57

Excelでセルを完全な正方形にするには?

Microsoft Excelでは、

最初の3行と最初の4列(左上の12個のセル)の高さを、これらのセルが正方形になるようにしたいのですが、どうすればいいでしょうか?どうすればいいのでしょうか?


意外にもExcelではこう書いてあります:

Row height: 15
Column width: 8.43

だから、これらは同じ縮尺ではありません。

回答 (21)

50
50
50
2012-08-26 00:38:19 +0000

もう一つの方法は…ビューをページレイアウトに変更することです。これにより、グリッドのスケールがインチに変更され、高さと幅の両方を同じ値(例えば25インチ)に設定することができます。IMO ページレイアウトは、スプレッドシートの外観を調整するのに最適な標準ビューだと思います。

15
15
15
2010-09-17 10:25:08 +0000

すべて(または必要な行/列)を選択し、ドラッグして希望のサイズにリサイズします。列ヘッダーの端をドラッグして、列の幅をリサイズします。ツールチップに正確なピクセル数が表示されます。ピクセル値を覚えておきましょう! 3. 行ヘッダの端をドラッグして行の高さを変更します。同じピクセル値にドラッグします。

8
8
8
2010-07-20 21:04:17 +0000

エクセルの列幅は、通常のスタイルでセルに収まるゼロ(0)の数で測ります。ポイント(行の高さの測り方)に変換するには、 http://www.dailydoseofexcel.com/archives/2004/06/01/column-widths-in-points/

正確に測る必要がない場合は、目視で測ってください。あなたが目測よりも近くにする必要がある場合は、あなたのシート上の図面ツールバーから正方形を配置し、それをサイズを設定します。あなたはそれを10 x 10にしたい場合は、このようなコードを使用してください:

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

その後、手動で正方形に合うように行と列のサイズを設定し、高さと列幅を読み取ることができます。

6
6
6
2013-05-23 01:44:59 +0000

VBAは、このような単純な結果には少しやりすぎのように思えます…。行/列のサイズを変更するためにドラッグに行ったときにクリックしたままにすると、ピクセル単位のサイズが括弧内に表示されます。これらの単位はスケーリングされていないので、行と列のサイズを等ピクセルに設定すると正方形になります。もちろん、これは手作業ですが… 等価なサイズを探して、行/列の範囲を選択して一度にすべてのサイズを設定することができます。

3
3
3
2019-03-05 07:42:49 +0000

次のコードは私のために働いた

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

結果:

3
3
3
2012-08-25 22:29:04 +0000

数学的に四角いものと視覚的に四角いものは違うということを意識する必要があります。すべてのモニターが同じように作られているわけではありません。一般的に、ピクセルは高さよりも幅が広いです。

次の画像を見てください:

それぞれの赤、緑、青のサブピクセルが全体のピクセルを構成しています。ご覧のように、3つの組み合わせは、1つのサブピクセルの高さよりも幅が広くなっています。ほとんどの場合、この違いは微妙なもので、ほとんどの人は気づかないかもしれません。しかし、場合によっては気づく人もいます。

2
2
2
2016-06-22 12:01:01 +0000

実は私も過去に同じ問題を抱えていました。私にとって最も効果的なのは、以下のVBAコードです。試行錯誤だけで線形関係を見つけました。

このコードは単一のセルに対しても動作しますが、選択範囲に対しても動作します。

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

これらのマクロをモジュールに入れて、クイックアクセスツールバーでボタンを割り当てることができます

フォントの種類やサイズを変更すると、(列の幅を変更することで)四角が消えることに注意してください。これは、Excel の列幅の計算方法によるものです。参照してください。 https://support.microsoft.com/en-us/help/214123/description-of-how-column-widths-are-determined-in-excel

2
2
2
2015-07-09 15:40:09 +0000

列幅1.0ポイントごとに7.25行の高さの比率で正方形が作れると判断しました。

2
2
2
2010-07-20 15:08:29 +0000

列見出しAの左側にあるボックスをクリックしてすべてのセルを選択し、列見出しの仕切りの1つをクリックして希望のサイズにドラッグして、結果のセル幅のピクセル数をメモしておきます(私はExcel 2007を使っていますが、これは表示されます)。これでシート内のすべてのセルがボックスになります。もちろん、これはあなたが尋ねたことではありませんが、私はこのトリックがセルのサブセットで動作することを期待していました。残念ながらそうはいきません。

2
2
2
2012-08-18 10:46:07 +0000

こちらは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
1
1
1
2014-04-23 17:32:44 +0000

私は、行の高さと列の幅の比率を5-1/3にしています。

例えば、行の高さを53.33にして列の幅を10にしたり、106.66と20にしたりすると、役所の仕事には十分に近い状態になります。

1
1
1
2010-07-20 14:45:36 +0000

まず、リサイズしたいセルを選択します。次に、「Home」タブの「Cells」ボックスに移動し、「Format」オプションをクリックします。ここでは、選択したセルのRow HeightColumn Widthを好きなように変更することができます。

1
1
1
2019-04-12 21:02:13 +0000

私はこれが最もシンプルな解決策であると信じています…

この方法はExcelの定規を利用しているので、より分かりやすく、より簡単で正確な行と列の寸法を表示します。

  • リボン上のViewを選択
  • ワークブックのビュー内でPage Layoutを選択
  • 定規が表示されない場合は、Showグループ内のRulerチェックボックスを選択してください。
  • すべて選択ボタン(ネームブックの下の左上隅)をクリックします。列を右クリックして繰り返します。結果は、視覚的に完璧な正方形として表示されます。Excelオプションの詳細設定タブの表示グループ内の測定単位を変更するオプションもあります。これが最も有用であることを願っています :)
1
1
1
2012-03-13 18:45:21 +0000

私はソーイングプロジェクトのための完璧な正方形のグリッドを作りたいと思っていたし、この質問のためのすべての種類の奇妙な答えを取得し続けたので、私はそれを把握するために自分自身でそれを再生することにしました。私はそれが完全な正方形を取得することは不可能であることを発見したが、私はあなたが得ることができるように近い、ちょうど一片のオフに来ました。フォーマットタブに移動します。列の幅を12.43にフォーマットします。75.00にセルの高さをフォーマットします。

定規を使用して、私は7と10インチの長さでちょうど端数をオフにしていたことがわかりました。これが役立つことを願っています。

1
1
1
2013-05-04 11:43:44 +0000

これはVBAを使ってかなりきれいにトリックを実行します。一様な rowHeight を設定し、 Width プロパティ (列のサイズをポイントで返す) を使用して、 RowHeight をそれで割って、単位のない高さ/幅の比率を得ます。すべてを正方形にするために、元の ColumnWidth の倍の新しい ColumnWidth を作成します。

0
0
0
2010-07-20 14:35:18 +0000

行と行の間の境界線をクリックしてドラッグします。一度に複数の列/行のサイズを変更するには、すべてを選択して右クリックして「行の高さ…」をクリックし、行の幅と同じ高さに設定します。

0
0
0
2014-07-07 06:47:18 +0000

簡単な解決策

  • すべてのセルを選択
  • 列を希望のピクセルサイズにドラッグします (列をドラッグしてサイズを変更すると、ポイントとピクセルの両方で列のサイズが表示されます)
  • 行に対して繰り返します (同じピクセル数を選択)
  • これでワークシート全体で完璧な正方形サイズのセルが得られるはずです。
0
0
0
2014-09-08 23:12:32 +0000

Excel 2010 ページレイアウトビューで調整した後、通常ビューに戻してもうまくいきません。描画ツールを使って、通常表示で完全な正方形を作って検証してみました。これが一番簡単な方法で、どんな大きさの正方形でも作ることができます。

列幅=2.71行高さ=18です。

0
0
0
2018-08-17 06:06:31 +0000
  • Select All - Ctrl+A
  • 任意の列ヘッダーを右クリックして列幅を選択
  • Enter value = 4 > Ok
  • そこには、すべてのセルが完全な正方形の形で表示されます。
0
0
0
2010-07-20 14:46:42 +0000
  • 列を選択します(A列をクリックし、シフトしたままもう一方の端をクリックします)

  • 列を右クリックし、列の幅をクリックして新しい値を入力します。

0
0
0
2013-11-25 10:25:55 +0000

行と列を正方形にしたい場合は、正方形にしたいセルをすべて選択して、行の高さを28.8に、列の幅を4.56に変更してください。