XL 2021 Alléger, simplifier et optimiser un fichier excel

  • Initiateur de la discussion Initiateur de la discussion momo27
  • 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 !

momo27

XLDnaute Junior
Bonjour tout le monde,
voici un classeur excel contenant des macros, je vous demande de l'alléger et l'optimiser pour une meilleure efficacité.
 

Pièces jointes

J'ai cherché et j'ai trouvé l'erreur : la personne qui a créé la macro avait déclaré en String la variable nommée fichier.

Correction (qui devrait fonctionner chez toi aussi, j'espère) :
VB:
Sub store()
'
Dim fichier, n As Long

    fichier = Application.GetSaveAsFilename(fileFilter:="Fichier excel (*.xlsx), *.xlsx")

    If fichier <> False Then
        If [T_fichier].Item(1, 1) <> "" Then n = [T_fichier].Rows.Count + 1 Else n = 1
        [T_fichier].Item(n, 1) = Range("C3")
        [T_fichier].Item(n, 2) = fichier
        Sheets("Facture").Copy
        ActiveWorkbook.SaveAs Filename:=fichier, FileFormat:=xlOpenXMLWorkbook
        ActiveWorkbook.Close
    End If

End Sub




N'est-ce pas déjà mis en place ?
Bonjour à tous.
Je me permets de vous soumettre le fichier ci-dessous.
Il pourrait répondre à la demande.
Pour l'archivage du PDF, il faut créer un dossier dans le répertoire , copier le chemin et modifier la sub Archivage en conséquence.
Merci de vos retour.
Le bonjour à TooFatBoy.
 

Pièces jointes

Bonjour
Si saisi dans contient ne trouve pas lancement de usf_stock
Correction du numéro de stock

A+ François
Bonjour, François.
Dans l’onglet "FACTURE", je souhaite mettre en place une automatisation permettant d’ajouter de nouveaux articles.
Une macro VBA insérera automatiquement, sous le dernier article, une ligne déjà formatée avec les formules prêtes à l’emploi




Bonjour
Si saisi dans contient ne trouve pas lancement de usf_stock
Correction du numéro de stock

A+ François


Bonjour
Si saisi dans contient ne trouve pas lancement de usf_stock
Correction du numéro de stock

A+ François
Bonjour, François.
Dans l’onglet "FACTURE", je souhaite mettre en place une automatisation permettant d’ajouter de nouveaux articles.
Une macro VBA insérera automatiquement, sous le dernier article, une ligne déjà formatée avec les formules prêtes à l’emploi
 

Pièces jointes

Dans l’onglet "FACTURE", je souhaite mettre en place une automatisation permettant d’ajouter de nouveaux articles.
Une macro VBA insérera automatiquement, sous le dernier article, une ligne déjà formatée avec les formules prêtes à l’emploi
Je sais que c'est n'est pas à moi que tu t'adresses, mais ça m'intrigue, alors je te pose de nouveau la question : quelle est la différence de fonctionnement vu par l'utilisateur, entre la macro actuelle et ce que tu demandes là ?
 
Dernière édition:
Bonjour
J'ai ajouté un bouton sur le formulaire de commande

A+ François
Bonjour à tous.
Ce "Monsieur" est gonflé quand même. TooFatBoy si tu veux mon avis laisse tomber. Il ose te dire de faire des propositions, alors que quand on lui en fait des propositions, il ne prend même pas la peine "d'accuser réception" de ce que l'on lui transmet. Je eu l'occasion d'intervenir sur un autre de ces fils et c'est comme si je n'existais pas.
Peut-être que j'étais à côté de la plaque, mais à minima on ouvre le fichier, et si on ne comprend pas on demande des explications. Certains oublient qu'on est là pour aider, juste aider quelqu'un qui demande de l'aide. Moi, ça a été mon cas et je profite de l'occasion pour tous vous remercier. Vous vous reconnaîtrez.

Je signe "Piment" (j'ai un souci, je ne retrouve pas mon compte). 974RE est le tout premier compte lors de ma 1ère intervention. Si David passe par là...

Claude dit Piment.
 
- 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

Discussions similaires

Réponses
6
Affichages
170
Réponses
3
Affichages
334
Réponses
7
Affichages
140
Réponses
5
Affichages
103
Réponses
10
Affichages
149
Réponses
4
Affichages
109
Retour