Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

non affichage de page...

  • Initiateur de la discussion Initiateur de la discussion castorjunior
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

C

castorjunior

Guest
Bonjour à tous,

je me suis remis à mon vba de débutant, j'ai quasiment fini une appli 😛 et a part un sombre problème de "port already open" (mscomm1), j'ai un petit souci.

application
lorsque ma macro s'exécute, je créé une nouveau classeur, je copie des donnée dedans, et j'enregistre la page en CSV.

souci:
à chaque boucle, j'ai un visu de la nouvelle page créée, et de la copie puis je reviens sur ma page initiale.

Avez vous une astuce pour éviter ceci ?

Code:
Sheets(page_extraction).Cells.Copy
    Workbooks.Add 'c'est à partir d'ici que cela m'ennuie
    ActiveSheet.Paste
    'Range("J2").Select
    Application.CutCopyMode = False
    ActiveWorkbook.SaveAs Filename:="C:\Users\XXX\Documents\zzz\" & page_extraction & "_" & cache_date & ".csv", FileFormat:=xlCSVMSDOS, _
        CreateBackup:=False
        ConflictResolution = xlLocalSessionChanges
    ActiveWorkbook.Close SaveChanges:=False

merci, par avance !
 
Re : non affichage de page...

bonsoir à tous,

Je pense qu'en ajoutant Application.ScreenUpdating = false juste avant ton ajout de workbook, puis en le repassant en = true après la fermeture de ton workbook, ça devrait marcher. Du moins, à tester 🙂

Bonne soirée,
Saya
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…