Macro de suppression à l'ouverture help svp???

Bonjour karamasof,

'----------------
Private Sub Workbook_Open()

With Worksheets("NomDeLaFeuille")
With .Range("'Fiche de commande'!D18")
.Value = .Value + 1
End With

'Efface valeur et format
.Range("AdresseDeTaPlage").Clear

'Efface seulement le contenu
.Range("AdresseDeTaPlage").ClearContents

ActiveWorkbook.Save

End Sub
'----------------


Salutations!

"karamasof" <karamasof@discussions.microsoft.com> a écrit dans le message de news:
70EF8F71-CF1A-4801-B8D7-D4B0BC7F97AE@microsoft.com...
Salut à tous,

J'ai une question au sujet d'une macro que j'aimerais faire dans excel.
Je vous explique mon but. Je désire supprimer tout ce qui ce trouve dans un
tableau qui va de AB27 à I48 é l'ouverture du fichier excel. Et comme je suis
complétement nul en VBA, pourriez-vous me donner les ligne de code VBA a
tapper???

J'ai déjà une macro qui s'effectue à l'ouverture du fichier, je suppose que
je doit pouvoir juste ajouter une ligne pour pouvoir supprimé ma zone... Ma
macro qui s'éffectue à l'ouverture est comme suit:

Private Sub Workbook_Open()

With Range("'Fiche de commande'!D18")
.Value = .Value + 1
End With
ActiveWorkbook.Save

End Sub

Merci d'avance de votre aide

bonjour,

sheets("toto").range("I27:AB48").clear

effacera tout y compris les formats

A+

Salut à tous,

J'ai une question au sujet d'une macro que j'aimerais faire dans excel.
Je vous explique mon but. Je désire supprimer tout ce qui ce trouve dans un
tableau qui va de AB27 à I48 é l'ouverture du fichier excel. Et comme je suis
complétement nul en VBA, pourriez-vous me donner les ligne de code VBA a
tapper???

J'ai déjà une macro qui s'effectue à l'ouverture du fichier, je suppose que
je doit pouvoir juste ajouter une ligne pour pouvoir supprimé ma zone... Ma
macro qui s'éffectue à l'ouverture est comme suit:

Private Sub Workbook_Open()

With Range("'Fiche de commande'!D18")
.Value = .Value + 1
End With
ActiveWorkbook.Save

End Sub

Merci d'avance de votre aide