Lets us open an excel sheet and try to read and write data into it.
Set Excel = CreateObject("Excel.Application")
Set Book = Excel.Workbooks.Open("Path")
Set Sheet = Book.Worksheets("Global")
For Row = 1 to 4
For Col = 1 to 3
msgbox Sheet.Rows(Row).Columns(Col)
Next
Next
For Row = 1 to 4
For Col = 1 to 3
Sheet.Rows(Row).Columns(Col).value = Row+Col
Next
Next
No comments:
Post a Comment