Bonjour à tous,
Je suis débutant en VB6 et je déjà trouvé pas mal de réponse à mes questions sur ce site.
Cependant, je ne trouve pas de solution pour ceci :
Mon code sauvegarde une dès feuilles de mon classeur avec un chiffre aléatoire.
L'enregistrement se passe bien mais la feuille enregistrée apparaît à l'écran.
Je souhaiterai pouvoir enregistrer la feuille sans l'ouvrir à la fin.
Voici mon code :
[i]Sub Save_Donnees()
Dim chiffre
Cheminacces = "mon chemin d'accès"
Randomize
chiffre = Int((999999 * Rnd) + 1)
Sheets("Résultat").Copy
ActiveWorkbook.SaveAs Filename:=Cheminacces & "résultat" & chiffre & ".xls"
End Sub
/i
Merci pour votre aide