Inserer une autre action dans une macro

M

Mike

Guest
Re le forum,

J ai une macro qui copie une feuille et qui la copie dans une autre feuille :

Option Explicit
Sub Export()
Dim Ws As Worksheet
Dim RSource As Range, RCible As Range
Application.ScreenUpdating = False
Set RSource = Sheets('SAUVEGARDE JOURNEE').Cells
Worksheets.Add
With ActiveSheet
Set RCible = .Range('A1')

RSource.Copy Destination:=RCible
End With
Sheets('SAUVEGARDE JOURNEE').Select
MsgBox 'Operation Terminée'
Application.ScreenUpdating = True
End Sub


J aimerai inclure dans cette macro une autre action, a savoir effacer la feuille d origine. Est ce possible?
 

Discussions similaires

Statistiques des forums

Discussions
312 305
Messages
2 087 088
Membres
103 461
dernier inscrit
dams94