Sende data mellem to excelark

Hvordan laver jeg denne kode om så data også gemmes i en anden excelfil f.eks. excel-filen C:\test.xls? Det skal stadigvæk være under arket "Data".

ActiveWorkbook.Sheets("Data").Activate
    Range("A1").Select
    Do
    If IsEmpty(ActiveCell) = False Then
        ActiveCell.Offset(1, 0).Select
    End If
    Loop Until IsEmpty(ActiveCell) = True
    ActiveCell.Value = txtDato.Value
    ActiveCell.Offset(0, 1) = cboKlok.Value
    ActiveCell.Offset(0, 2) = cboMaskine.Value
    ActiveCell.Offset(0, 3) = txtVarenummer.Value
    ActiveCell.Offset(0, 4) = txtPlade.Value
    ActiveCell.Offset(0, 5) = txtPladeordre.Value
    ActiveCell.Offset(0, 6) = txtOrdrenummer.Value
    ActiveCell.Offset(0, 7) = txtArbejdsnr.Value
    ActiveCell.Offset(0, 8) = txtArbejdsnr2.Value
    ActiveCell.Offset(0, 9) = txtEmner.Value
    ActiveCell.Offset(0, 10) = txtKasserede.Value
    ActiveCell.Offset(0, 11) = cboFejltype.Value
    ActiveCell.Offset(0, 12) = txtBemaerkning.Value
    ActiveCell.Offset(0, 13) = "Mekanik"
    ActiveCell.Offset(0, 14) = "PC XX"
    Range("A1").Select