I'm using the following code to insert a new row in a table.
Sheets(ToSheet).Range(ToTable).Rows(CursorTableRow Num) _
.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
This copies all formating from the above row to the new row.

How do I change/add code to avoid copying any row format info and just set
cols 1,2,6 & 7 to General format, col 3 to numeric, no decimals, and col 4&5
to date mm/dd/yy format, while everything else sets to a default cell format.

I appreciate your help, -John