Message Excel en cours de Macro
#1
Régulier XLPages

Inscription: 24/08/2011

Messages: 54

Système d'exploitation:
PC
Version Excel utilisée:
OFFICE EXCEL 2007
Posté le : 05-09-2011 14h56


Bonjour à tous, grace à vous tous j'ai fait des progrés avec les macros et VBA. Encore merci.

J'ai un petit souci à résoudre.
1 )  en partant su classeur1 feuil1 avec une macro je vais dans le classeur2 feuil1 sur mon disque G.

2 ) je fait une copy de toutes les cellules de A1:G2000

3 ) je retourne dans le classeur1 feuil1 pour faire un coller

     Mais au moment ou je quitte le classeur2 Excel m'envoi le message  suivant :

Enregistrer le presse-papier oui non ou annuler.

C'est gênant  car je ne veut pas que l'utilisateur final ai ce message.

Comment dévérouiller le message ou qu'il n'apparaisse pas.

Merci beaucoup pour votre réponse.
une copie de ma macro
Sub testcopy1()
'
' testcopy1 Macro
' Macro enregistrée le 05/09/2011 par Silca
'

'
    Sheets("Feuil3").Select
    Range("A1").Select
    Workbooks.Open Filename:= _
        "G:\Gestion équipe\Commun EEC\MEP EEC\PREVISIONS_EEC_MEP_MVS_et_OPEN.xls"
    Range("A2:Q3000").Select
    Selection.Copy
    Windows("projetDE.xls").Activate
    Range("A1").Select
    ActiveSheet.Paste
    Windows("PREVISIONS_EEC_MEP_MVS_et_OPEN.xls").Activate
    ActiveWindow.Close
   
    '
    Columns("B:B").Select
    Application.CutCopyMode = False
    Selection.Delete Shift:=xlToLeft
    Selection.Delete Shift:=xlToLeft
    Columns("C:C").Select
    Selection.Delete Shift:=xlToLeft
    Columns("D:G").Select
    Selection.Delete Shift:=xlToLeft
    Columns("G:I").Select
    Selection.Delete Shift:=xlToLeft
    Range("A1").Select
    '
    Columns("G:G").Select
    Selection.Sort Key1:=Range("G1"), Order1:=xlAscending, Header:=xlGuess, _
        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortNormal
         Range("A1").Select
    '
   
        Sheets("Feuil1").Select
    Range("D3:K6").Select
    Sheets("feuil1").Protect
    '
    End Sub

  

Hors Ligne
Rapport   Haut 

Re: Message Excel en cours de Macro
#2
Régulier XLPages

Inscription: 24/08/2011

Messages: 54

Système d'exploitation:
PC
Version Excel utilisée:
OFFICE EXCEL 2007
Posté le : 05-09-2011 15h07

Rebonjour, si j'avais bien regarder sur le forum j'avais la réponse, désolé

Donc il faut mettre en début de macro :

Application.DisplayAlerts = False

Et a la fin :
Application.DisplayAlerts = true

Je vais donc m'autocloturer

Bon courage à tous

Hors Ligne
Rapport   Haut 


Vous pouvez voir les sujets.
Vous ne pouvez pas débuter de nouveaux sujets.
Vous ne pouvez pas répondre aux contributions.
Vous ne pouvez pas éditer vos contributions.
Vous ne pouvez pas effacez vos contributions.
Vous ne pouvez pas ajouter de nouveaux sondages.
Vous ne pouvez pas voter en sondage.
Vous ne pouvez pas attacher des fichiers à vos contributions.
Vous ne pouvez pas poster sans approbation.

[Recherche avancée]


Qui consulte actuellement ce sujet ?   1 Utilisateur(s) anonymes