word内の表のタイトル行のフォントを統一したい

Question

docxファイルに複数の表があります。

この複数の表のタイトル行のフォントを統一させたいのですが、
一括で変換する方法があるのでしょうか？

Comments

[meli]

プログラミングに関係のない質問です

[amatsuno]

質問の意図としては、上記の内容をVBAでできないのか、という意図でした

Answer 1

タイトル行を定義する必要があります。
例えば、タイトル行は表の1行目である、ということであれば、以下の方法で可能です。
（ここではフォントを「ＭＳ Ｐゴシック」としています。）

Dim tbl As Table
For Each tbl In ActiveDocument.Tables
    tbl.Rows.First.Range.Font.Name = "ＭＳ ゴシック"
Next

Comments

[kenshirou]

よく見たら、だいぶ前の質問でしたね。
もうここは見ないかな？あるいは解決済みかな？

[amatsuno]

ありがとうございます。
やり方がうまくわからなくて、手動で実施していました

今後はこちらを参考に実施させていただきます