Dovendo salvare dei dati in determinate celle in un foglio excel ho usato questo codice:
codice:
Private Sub Form_Load()
Dim xlAppl As Object
Dim xlWorksheet
Set xlAppl = CreateObject("excel.application")
Set xlWorksheet = GetObject("d:\Nomecartella1\Nomecartella2\FILE.xls")
xlWorksheet.Sheets("Foglio1").Range("A1").Value = Text1
xlWorksheet.Sheets("Foglio1").Range("B1").Value = Text2
xlWorksheet.Sheets("Foglio1").Range("C1").Value = Text3
xlWorksheet.Sheets("Foglio1").Range("D1").Value = Text4
xlWorksheet.Sheets("Foglio1").Range("E1").Value = Text5
xlAppl.save "d:\Nomecartella1\Nomecartella2\FILE.xls"
Form1.Show
End Sub
Il problema è che il "comando" che ho usato per salvare il file excel nn è corretto. Mi sapete dire come fare?
Io devo "solamente" riuscire a salvare le modifiche apportate al file excel.
Grazie mille a tutti!