Public Function toto(param1 as string, param2 as string)
Range("D14").Select
ActiveCell.FormulaR1C1 = param1
Range("D8").Select
Selection.EntireRow.Insert
Range("D11").Select
Selection.EntireRow.Insert
Range("E22").Select
ActiveCell.FormulaR1C1 = param2
Range("D24").Select
End Function
mais par contre le code fonctionne si j'appelle la fonction "toto(param1, param2) dans une macro et que je lance cette macro...mais c pas ce que je souhaite donc help !!!