function fnAutomateExcel(){
	var oXL = new ActiveXObject("Excel.Application")   
	oXL.Visible = false

	var oWB = oXL.Workbooks.Add()
	var oSheet = oWB.ActiveSheet

	mybody=document.getElementsByTagName("body").item(0)
	mytable=mybody.getElementsByTagName("table").item(0)
	mytablebody=mytable.getElementsByTagName("tbody").item(0)
		
	for(var i = 0;i<mytablebody.getElementsByTagName("tr").length;i++){
		myrow=mytablebody.getElementsByTagName("tr").item(i)
		if(i == 0){
			for(var x = 1;x<myrow.getElementsByTagName("th").length;x++){
				mycel=myrow.getElementsByTagName("th").item(x)
				oSheet.Cells(i+1, x).Value = mycel.childNodes.item(0).data
				oSheet.Cells(i+1, x).Font.Bold = true
			}
		} else {
			if(myrow.getElementsByTagName("td").length != 0){
				for(var x = 1;x<myrow.getElementsByTagName("td").length;x++){
					try{
						mycel=myrow.getElementsByTagName("td").item(x)
						oSheet.Cells(i+1, x).Value = mycel.getElementsByTagName("input").item(0).value
					}
					catch(error){
						try{
							mycel=myrow.getElementsByTagName("td").item(x)
							oSheet.Cells(i+1, x).Value = mycel.childNodes.item(0).data
						} catch(error) {
							//this error means null value
							oSheet.Cells(i+1, x).Value = ""
						}
					}
				}
			} else {
				for(var x = 1;x<myrow.getElementsByTagName("th").length;x++){
					mycel=myrow.getElementsByTagName("th").item(x)
					oSheet.Cells(i+1, x).Value = mycel.childNodes.item(0).data
					oSheet.Cells(i+1, x).Font.Bold = true
				}
			}
		}
			
	}
		
	oSheet.Range(oSheet.Cells(1,1),oSheet.Cells(i,x)).EntireColumn.AutoFit
		
	oXL.Visible = true
	oXL.UserControl = true
}