PDA

View Full Version : Inserting Row above filtered data



Rlb53
03-26-2012, 01:10 PM
The code below provides me with a filtered range of information at Row 8:

Rows("8:8").Select
Selection.AutoFilter
ActiveSheet.Range("$A$8", Range("a" & Rows.Count)).End(xlUp).AutoFilter Field:=2, Criteria1:=Me.Plant_No.Value


Following this, I'm stuck. I'd like to Insert a row at the top of the filtered data and insert new information within each cell.

Could you provide me the code to insert this row?

Also, could you provide me the code to identify the inserted row so I may transfer the information correctly. Something like ???? :

emptyrow=range("a8" ,range("a" & rows.count).end(xlup)

Rlb53
03-26-2012, 02:26 PM
I have a Cross Post for this Inquiry:

http://www.ozgrid.com/forum/showthread.php?t=163778&p=601628#post601628