Save String content in Excel File how?

Imports Microsoft.Office.Interop
Imports System.Runtime.InteropServices

Public Class Form_Main

Public MyExcel As New Excel.Application
public VarYourString1 as string = "your value"


sub Write_Data()
 MyExcel.Visible = True ' this will show the workbook in MS Excel
MyExcel.Sheets(Sheet1).Select() ' Sheet1, Sheet2, Sheet3 See this is Excel they need to be the same.



MyExcel.Range("A1048575").End(Excel.XlDirection.xlUp).Select() ' Select Last Used cell in A## ,    1048576 Max Rows

MyExcel.ActiveCell.Offset(1, 0).Select()' move down 1 cell
MyExcel.ActiveCell.Offset(0, 2).Select() move right 2 cells
MyExcel.ActiveCell.Offset(0, -1).Select() move left 1 cell


MyExcel.ActiveCell.Offset("A1").Select()' i havent tested this one



' you are looking for something like this
MyExcel.ActiveCell.Value = VarYourString1 ' this will enter "Your Value"
MyExcel.ActiveCell.Offset(1, 0).Select()' move down 1 cell

MyExcel.Workbooks.Close()' closes the Excel File

End Sub
End Class