すべてのWordテーブルの列幅を一度に変更する方法


4

Wordには同じレイアウト(2列、6行)のテーブル(200以上)がたくさんあります。

すべての列の幅を調整する必要があります。これを自動化する方法はありますか?

回答:


6

VBAマクロを使用して、すべてのテーブルのサイズを変更できます。

WordでALT+ F11を押し、Project»ThisDocumentの下にマクロを挿入します
でコードを実行するF5

Sub resizeTables()    
  For Each Table In ActiveDocument.Tables
    On Error Resume Next
    Table.Columns(1).Width = 200
    Table.Columns(2).Width = 300
    On Error GoTo 0
  Next    
End Sub
  • Columns(2) すべてのテーブルの列2を表します
  • Width = 300は、ピクセル単位の希望の幅です。ニーズに合わせて変更してください
  • テーブルの列がVBAマクロより少ない場合、例外が発生します。このため、On Error Resume Nextエラーを無視し、On Error GoTo 0このエラー処理を停止するように追加しました
弊社のサイトを使用することにより、あなたは弊社のクッキーポリシーおよびプライバシーポリシーを読み、理解したものとみなされます。
Licensed under cc by-sa 3.0 with attribution required.