Excel - テーブルフォーマットを含む行マクロを挿入

Question

現在、私のExcelスプレッドシートには、選択した行の下に行を挿入できません。スプレッドシートの最後に新しいチケットが追加されるので、新しいチケットを追加するには、TOTALS行の前の行をクリックして挿入をクリックしますが、選択した行の上に新しい行が挿入されます。ここで

スクリーンショットは、私は、セル33を選択し、挿入をクリック示すが、新しい行が上に添加した：

Iマクロコードを使用する場合、それは完全に行を追加：

を

ただし、新しい行はありませんテーブルと一致するようにフォーマットされています。私はテーブルフォーマットに基づいて新しい行をフォーマットするためにマクロを調整したいと思うでしょう（この場合は青で強調表示され、正しい行があるはずです）。二重上部のセルラインは、同様に全行に留まるべきである。ここで

は、以下の私のmecroです：

Sub InsertRowBelow() 

    Application.ScreenUpdating = False 

    ActiveCell.Offset(1, 0).EntireRow.Insert 
    ActiveCell.EntireRow.Copy 
    ActiveCell.Offset(1, 0).Select 
    Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _ 
     SkipBlanks:=False, Transpose:=False 
    Application.CutCopyMode = False 

Application.ScreenUpdating = True 

End Sub 

私は明確ではないです場合は私に知らせてください。ヒント/ガイド/チュートリアルは参考になります。

Answer 1

あなたはちょうどその使用テーブルに新しい行を追加したい場合は、次の

ActiveWorkbook.Worksheets(1).ListObjects(1).ListRows.Add