Sumproduct-Example.xlsx

<div>
hi<br />
<br />
try this<br />
<br />
Sub InsertMania()<br />
<br />
'Insert row above active cell<br />
ActiveCell.EntireRow.Inser<wbr />t<br />
<br />
'Insert row below active cell<br />
ActiveCell.Offset(1).Entir<wbr />eRow.Inser<wbr />t<br />
<br />
'Insert column to the left of the active cell<br />
ActiveCell.EntireColumn.In<wbr />sert<br />
<br />
'Insert column to the right of the active cell<br />
ActiveCell.EntireColumn.Of<wbr />fset(0, 1).Insert<br />
<br />
End Sub<br />
by<br />
kumaresan
</div>


hi

try this

Sub InsertMania()

'Insert row above active cell
ActiveCell.EntireRow.Insert

'Insert row below active cell
ActiveCell.Offset(1).EntireRow.Insert

'Insert column to the left of the active cell
ActiveCell.EntireColumn.Insert

'Insert column to the right of the active cell
ActiveCell.EntireColumn.Offset(0, 1).Insert

End Sub
by
kumaresan

<div>
<div class="content wysiwyg-content">
I have a spreadsheet with 12 columns, the last column is a date. &nbsp;I want to scan down this column and when the date changes, i want to insert an empty row. &nbsp;The empty row will be used to sum the columns for that day.
</div>
</div>


I have a spreadsheet with 12 columns, the last column is a date.  I want to scan down this column and when the date changes, i want to insert an empty row.  The empty row will be used to sum the columns for that day.

Excel 2010 VBA macro

Microsoft Excel topics include formulas, formatting, VBA macros and user-defined functions, and everything else related to the spreadsheet user interface, including error messages.