Need Some Help Please

[MarkT]

This should get you the values of the row being deleted. I think you can figure out how to write them to your file during the delete process.

Sub deleteRow(row)

   Dim oTbl, oRow
   Set oTbl=document.getElementById("mytable")
   Dim cinput
   Dim indx
   
   indx = 1
    set cinput=document.getElementsByTagName("input")
    for i=0 to cinput.length-1
        if cinput(i).type="button" then
            if instr(cinput(i).name, "end") then
                indx = indx + 1
                if cinput(i).name = "end" & row then
                    exit for
                end if
            end if
        end if
    next


   if indx > 1 then
    MsgBox  oTbl.childNodes( 0 ).childNodes( indx ).childNodes( 0 ).innerText & vbCrLf & _
        oTbl.childNodes( 0 ).childNodes( indx ).childNodes( 1 ).innerText & vbCrLf & _
        oTbl.childNodes( 0 ).childNodes( indx ).childNodes( 2 ).innerText & vbCrLf & _
        oTbl.childNodes( 0 ).childNodes( indx ).childNodes( 3 ).innerText & vbCrLf & _
        oTbl.childNodes( 0 ).childNodes( indx ).childNodes( 4 ).innerText
    
    oTbl.deleteRow(indx)
   end if


End Sub