## example to convert an Excel xml file to tab delimited

input <- xmlToList("grid1_1cz1rlvt.xml")
for(row in input$Worksheet$Table){
    line <- c()
    for(cell in row){
        if("Data" %in% names(cell)){
            line <- c(line, cell$Data$text)
        }
    }
    cat(paste(line, collapse="\t"), "\n", file="output.csv", append=TRUE)        
}