Bonjour Gentlemen,

Je voudrai vous demander deux lignes de code.
Je voudrais que cette petite formule insert la date dans de cellules sélectionnées et pas seulement dans active cell.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Sub insert_date()
'
' insert_date Macro
' Macro enregistrée le 01/11/2011 par Jeremy
'
 
'
    ActiveCell.FormulaR1C1 = "=TODAY()-1"
End Sub
Merci d'avance pour votre aide.