Bonjour,
Je souhaiterais faire passe une feuille excel dans un sub mais je cale.

Pourriez vous m'aider ?

Merci d'avance,

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
 
AppExcel = New OXL.Application
xlWorkbook = AppExcel.Workbooks.Add
xlWorkSheetOne = CType(xlWorkbook.Worksheets(1), Microsoft.Office.Interop.Excel.Worksheet)
AppExcel.Visible = True
test(xlWorkSheetOne)
xlWorkbook.SaveAs("c:\a")
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
 
Sub test(x As OXL.Worksheet)
x.Cells(10, 10) = "xxxxx"
End Sub