nextRow = ActiveSheet.UsedRange.Row + _
ActiveSheet.UsedRange.Rows.Count
ActiveSheet.Cells(nextRow, 1).Value = NewColumn1Value
ActiveSheet.Cells(nextRow, 2).Value = NewColumn2Value
Does this answer your question? - Pikus
---
Message posted from
http://www.ExcelForum.com/