supprimer ce message ou ne plus le proposer

[justine62000]

bonjour
je fais une sauvegarde de 2 feuille excel vers un nouveau classeur et j'ai ce message(voir piece jointe)je dois juste cliquer sur oui pour que le reste de la macro fonctionne
mais j'aimmerais pouvoir le supprimer ou qu'il ne me le demande plus
merci justine

 

[justine62000]

Re : supprimer ce message ou ne plus le proposer

j'utilise cette macro pour sauvegarde
Worksheets(Array("PLANNING IMPRESSION", "mise a jour planning")).Copy
ChDir "C:\archive planning"
ActiveWorkbook.SaveAs chemin & [b2] & " " & [d2] & " " & "du" & " " & Format([u2], "ddd dd-mm-yyyy") & ".xls"

ActiveWorkbook.Close
Call Macro100

Call Macro8
Call Macro1
ActiveWorkbook.Save
et ce code pour e=interdire les doublon (c'est lui qui me bloque apparemment)
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Range("J20:J30"), Target) Is Nothing Then Exit Sub
If Application.WorksheetFunction.CountIf(Range("J20:J30"), Target) > 1 Then
MsgBox "cette personne figure deja dans le planning"
Target.ClearContents
End If
End Sub
comment faire pour faire la sauvegarde sans enregistrer ce code dans le nouveau classeur
justine

 

[Cousinhub]

Re : supprimer ce message ou ne plus le proposer

re,

comme proposé ici, il faut enregistrer au format xlsm

cependant, si tu veux enregistrer au format 2003, essai ce code :

ActiveWorkbook.SaveAs chemin & [b2] & " " & [d2] & " " & "du" & " " & Format([u2], "ddd dd-mm-yyyy") & ".xls", FileFormat:=xlExcel8

Normalement, tu n'auras plus ce message d'avertissement...

 

[justine62000]

Re : supprimer ce message ou ne plus le proposer

toujours le message