Forcer une fenetre via macro excel

[Imperium]

Bonjour à tous,

J'aimerai savoir si via un code vb inséré dans une macro, il était possible de forcer cette fenetre (qui apparait en plein milieu de l'execution de ma macro) sur "Supprimer".

Merci !!

 

[Pierrot93]

Re : Forcer une fenetre via macro excel

Bonjour,

peut être en utilisant ceci, mais bon avec le peu d'info que tu nous donne... pas sûr....

Application.DisplayAlerts = False
'l'instruction déclenchant l'alerte
Application.DisplayAlerts = True

bonne soirée
@+

 

[Imperium]

Re : Forcer une fenetre via macro excel

Merci, à priori ça ne marche pas :/

Voilà mon code dans lequel j'ai essayé d'insérer le tien :

Sheets("contrat rédigé").Select
ActiveWindow.SelectedSheets.Delete
Sheets("contrat rédigé (2)").Select
Sheets("contrat rédigé (2)").Move Before:=Sheets(3)
Sheets("contrat rédigé (2)").Select
Sheets("contrat rédigé (2)").Name = "contrat rédigé"
Sheets("BASE CONTRAT").Select
ActiveWindow.SmallScroll Down:=-72

Je suppose que je devais le mettre après : " ActiveWindow.SelectedSheets.Delete" mais la fenetre n'est pas zappée :/

 

[Robert]

Re : Forcer une fenetre via macro excel

Bonjour Imperium, Pierrot, bonjour le forum,

Essaie comme ça :

Sub Macro2()
Application.DisplayAlerts = False
Sheets("contrat rédigé").Delete
With Sheets("contrat rédigé (2)")
    .Move Before:=Sheets(3)
    .Name = "contrat rédigé"
End With
Sheets("BASE CONTRAT").Select
ActiveWindow.SmallScroll Down:=-72
Application.DisplayAlerts = True
End Sub

 

[Imperium]

Re : Forcer une fenetre via macro excel

C'est bon ne fait j'ai mis ton instruction en début de macro et l'autre à la fin J'avais pas compris le fonctionnement ! mais merci !