プログラミングのWord 2014テーブルの複数の行の選択

Question

は、私が試した赤

にMicrosoft Wordで大きなテーブル内のすべての偶数行のフォント（ほとんどのバージョン、私は2014を使用）を変更したいです単純なループ：

For ii=2 to ActiveDocument.Tables(1).Rows.Count step 2 
    ActiveDocument.Tables(1).Rows(ii).Select 
    Selection.Font.ColorIndex = wdRed 
Next 

これは時々、ハング時にはそれが動作しますが、時間かかります（私のテーブルには... 14000行を持つ）

その後、私は考えを持っていた：手動では、私は左で行を選択することができますその左側をクリックして、左側にCtrlキーを押しながら左クリックして、選択範囲に行を追加します。 そして、一度に選択したすべての行のフォントを変更できます。

プログラムで同じ処理を行う方が速いかどうかを見てみましょう。私は

ActiveDocument.Tables(1).Rows(2).Select 
For ii=4 to ActiveDocument.Tables(1).Rows.Count step 2 
    Selection.Add (ActiveDocument.Tables(1).Rows(ii)) 
Next 
Selection.Font.ColorIndex = wdRed 

のようなものを試してみましたが、追加の有効なSelectionオブジェクトのメンバーとして

を受け入れていない、誰かがそこに助けることができますか？

Answer 1

新しいスタイルを定義し、それをテーブルに適用する...何のVBAは

を必要としない、これは例のスタイル変更のマクロ記録である...あなたは

Selection.Tables(1).Style = "Grid Table 5 Dark - Accent 2" 

VBAを使用したい場合

また、新しいスタイル定義を行うためのマクロを記録してください....たくさんの良いものがあります