VBA : Sélectionner un classeur avec une date qui change

Dranreb

XLDnaute Barbatruc

• 15 Février 2017

• #2

Bonjour.
Ben ne l'activez pas, tout simplement. Ça ne sert à rien, en général, dans les macros, d'activer des classeurs.
Par contre c'est très utile de noter par des Set ce qu'on a sous la main à un moment donné dans des variable objets déclarées As Workbook, As Worksheet, As Range.

 

Vote positif 0 Vote négatif

M

Mister

Guest

• 15 Février 2017

• #3

Je sais pas faire ça.
Le fait est que quand je clique sur le bouton tout se passe comme voulu.
Je veux juste changer le nom "Fichier20170215" en fichierAAAAMMDD.
Pour que ça marche à chaque fois sans changer le code.

Comment procéder ?

 

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 15 Février 2017

• #4

Apprenez à le faire alors.
Vous l'ouvrez bien à un moment donné ce classeur je suppose, puisqu'ensuite vous cherchez à l'activer ?
Pourquoi en avez vous activé un autre entre temps, d'ailleurs, soit dit en passant.

 

Vote positif 0 Vote négatif

M

Mister

Guest

• 15 Février 2017

• #5

J'ai utilisé l'enregistreur c'est pour ça.
Du coup, je voudrais juste modifier la ligne qui permet d'activer la fenêtre/le classeur.

 

Vote positif 0 Vote négatif

M

Mister

Guest

• 15 Février 2017

• #6

J'ai peut être mal exprimé le truc.

J'ai un fichier type avec la macro dedans.
J'ouvre deux fichiers.
Je fais des opérations avec ces fichiers, donc je vais et viens entre les deux fichiers ouverts.
Au fur et à mesure le fichier type avec la macro se rempli, puis, une fois fini, la macro ouvre une nouvelle feuille, donc cette feuille se rempli avec les éléments de la feuille type avec la macro.
Ensuite ça s'enregistre et les fichiers se ferme.
Je ferme le fichier excel avec la macro et je fais "ne pas enregistrer les modifications".

Voilà pourquoi j'ai besoin d'activer. Un des deux fichiers comporte une date.
Cette date n'est pas celle d'aujourd'hui forcément.
D'où mon idée d'inputbox pour demander la date et la coller au fichier.
Mais ça marche pas...

Donc voilà

 

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 15 Février 2017

• #7

Il n'est pas nécessaire d'activer les classeurs pour faire ça.
Optimisez la macro en contractant les suites MachinChose.Select suivis de Selection.FaireUnTruc en MachinChose.FaireUnTruc
Et utilisez des variables objets c'est plus simple.

 

Vote positif 0 Vote négatif

M

Mister

Guest

• 16 Février 2017

• #8

J'ai utilisé set wb as workbook en mettant le nom de mon fichier avec & dateJ.
Avec dateJ = inputbox machin.
Bref ça fonctionne

 

Vote positif 0 Vote négatif