Ken Hutchinson
XLDnaute Occasionnel
Bonjour tout le monde,
J'ai créé une macro qui enregistre automatiquement un fichier excel en csv. Je ne veux pas que l'utilisateur aie a cliquer sur quoique ce soit. Le problème est qu'il y a un avertissement :
"VOULEZ VOUS ENREGISTRER LES MODIFICATIONS APPORTEES A NOM DU FICHIER"
par défaut c'est le OUI qui est sélectionné mais moi je voudrais que la macro dise non...
avec la mention
ça prend le oui par défaut... comment dire qu'on veut le NON ?
merci de votre aide...
Voici le code :
J'ai créé une macro qui enregistre automatiquement un fichier excel en csv. Je ne veux pas que l'utilisateur aie a cliquer sur quoique ce soit. Le problème est qu'il y a un avertissement :
"VOULEZ VOUS ENREGISTRER LES MODIFICATIONS APPORTEES A NOM DU FICHIER"
par défaut c'est le OUI qui est sélectionné mais moi je voudrais que la macro dise non...
avec la mention
Code:
Application.DisplayAlerts = False
ça prend le oui par défaut... comment dire qu'on veut le NON ?
merci de votre aide...
Voici le code :
Code:
Sub XLStoCSVall()
Dim MyDate
Dim MyTime
User = Application.UserName
MyDate = Date
MyTime = Time
Jour = Mid(MyDate, 1, 2)
mois = Mid(MyDate, 4, 2)
an = Mid(MyDate, 7, 4)
HeureH = Mid(MyTime, 1, 2)
HeureM = Mid(MyTime, 4, 2)
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs Filename:= _
"C:\Export\Export " & User & " " & Jour & "" & mois & "" & an & " " & HeureH & "" & HeureM & ".csv", FileFormat:=xlCSV, CreateBackup:=False
ActiveWindow.Close
Application.DisplayAlerts = True
End Sub