20/03/2014, 15:54
|
| | Fecha de Ingreso: marzo-2014
Mensajes: 3
Antigüedad: 10 años, 9 meses Puntos: 0 | |
remplazar un valor de textbox en una una casilla de excel buenas tardes, estoy haciendo un programa informatico como soporte para mi proyecto de mecanica.... i necesitaria relacionar unos textbox con unas casillas de excel un documento que ya tengo....
lo que tengo es lo siguiente:
Private Sub Button12_Click(sender As Object, e As EventArgs) Handles Button12.Click
Dim oExcel As Object
Dim oBook As Object
Dim oSheet As Object
'Start a new workbook in Excel
oExcel = CreateObject("Excel.Application")
oBook = oExcel.Workbooks.add
'Add data to cells of the first worksheet in the new workbook
oSheet = oBook.Worksheets(3)
oSheet.Range("c3").Value = "TextBox4"
oSheet.Range("c5").Value = "TextBox3"
oSheet.Range("c7").Value = "TextBox2"
oSheet.Range("c9").Value = "textbox1"
TextBox1 = oSheet.range ("c19")
'Save the Workbook and Quit Excel
oBook.SaveAs("e:\miquel\grado superior\2º\projecte\programa\definitivo\definitiv o\calculs clio III.xls")
oExcel.Quit()
oExcel.Visible = True
oExcel.UserControl = True
pero asi consigo que me haga un docuemnto nuevo.... como puedo hacerlo para que me sustituya valores?????? |