How to change data in Excel using VB

[nigel_chong98]

How do i transfer one data from a cell to another but
retaining the original using VB in Excel and everytime the data changes, a copy of the result will be copied to another place? Thanks for the help.

[Nitro]

Hi Nigel!

[/b]Here is a start for you in VB.[/b]

Private Sub cmdGetObject1_Click()
  'Reference "Microsoft Excel 9.0 Library"
  Dim xlsWorkBook As Excel.Workbook
  Dim xlsWorkSheet As Excel.Worksheet
  
  Set xlsWorkBook = GetObject("C:\Charts.xls")
  Set xlsWorkSheet = xlsWorkBook.Worksheets("C")
  Text1.Text = xlsWorkSheet.Cells(1, 1).Value

 'OR

 ' Text1.Text = xlsWorkSheet.Range("A1").Value
  xlsWorkBook.Close
End Sub