12-30-2009, 10:46 AM
see the piece of code below
I have assumed each row in your excel contains details of one user
let me know how it goes.
I have assumed each row in your excel contains details of one user
Code:
RowCnt = wb.Worksheets(sheetname).UsedRange.rows.Count
For nRow = 1 To RowCnt
list_value = wb.Worksheets(sheetname).Cells(nRow,1).value
Browser("Browser").Page("Add User").WebEdit("User Name").Set list_value
list_value = wb.Worksheets(sheetname).Cells(nRow,2).value
Browser("Browser").Page("Add User").WebEdit("User Name").Set list_value
Next