ブック全体のすべての行を調整する

Question

100枚以上のブックが送付されました。何らかの理由で私が見積もることができないので、私がチェックした各シートのすべての行が、行の高さが4.5になるように設定されているため、その内容をそれほど見ることは不可能です。すべてのシートのすべてのセルについて、フォントサイズも2に設定されています。

可能な場合はVBAを使用しないで、すべての行のセルの高さとブックの各シート内のすべてのセルのフォントを一度に調整する方法はありますか？

1枚で簡単にできますが、100回以上繰り返す必要はありません。必要に応じてVBAソリューションも高く評価されますが、私は別のものを好むでしょう。

Answer 1

多分このようなVBAのようなものが役立つでしょう。

Sub reformat() 
    Dim ws As Worksheet 
    For Each ws in Sheets 
    ws.Cells.Font.Name="Arial" 
    ws.Cells.Font.Size=10 
    ws.Columns.AutoFit 
    ws.Rows.AutoFit 
    Next 
End Sub