essaye ca
Dim x As New Excel.Application
Workbooks.Open FileName:="C:\mondossier.xls"
/* ici tu mets à la place de d10 ta colonne et ta ligne"
/* éventuellement sous la forme variable1 & variable2
Sheets("ma feuille").Select

/* ici tu mets à la place de d10 ta colonne et ta ligne"
/* éventuellement sous la forme variable1 & variable2
Range("C3").Select
ActiveCell.FormulaR1C1 = "salut ma poule"
/* tu templace salut ma poule par moncontrole.text
ActiveWorkbook.Save
ActiveWorkbook.Close
Set x = Nothing