Discussion :

[jimbololo]

bonjour à tous !

voila j'ai un problème ! j'ai un classeur sur lequel je lance une macro .xla, qui n'est donc pas intégré au classeur.

Dans cette macro 2 classeurs vont etre manipulés : celui ou se trouve le bouton pour lancé la macro (BS 0614.XLS) et celui ou se trouve des données (ELEVEUR.XLS).

Seulement le problème c'est que BS 0614.XLS, ne s'appellera pas toujours comme sa, donc je dois récupérer le nom de ce classeur pour évité d'avoir à modifier ma macro à chaque fois. j'utilise alors :
classeur = ActiveWorkbook.name

Mais plus loin dans ma macro j'utilise : workbooks("ELEVEUR.XLS").Activate, ma variable classeur étant auparavant égale à "BS 0614.XLS" est maintenant égal à "ELEVEUR.XLS". donc sa fout un bordel monstrueux dans l'exécution de la macro.

ya t'il une solution possible à mon problème ? SVP merci

dites le si je ne suis pas assez clair !

[jimbololo]

personne peut m'aider ???

[pickwick_75]

si j'ais bien crompris... ce que je doute c'est qu'il te faut mettre en variable tes 2 classeurs

au niveaux de la déclaration
tu mes genre:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
dim wbBS as workbook
dim wbEleveur as workbook

quand tu est sure d'avoir les classeur activé tu fait
quand le classeur activé est BS 0614.XLS

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

set wbBS = ActiveWorkbook

et quand le classeur ELEVEUR.XLS et lui activé alors tu met:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

set wbEleveur = ActiveWorkbook

apres ca devien simple quand tu veux faire référence a un classeur plustot que de prendre la commance activeworkbook tu utilise soit wbBS soit wbEleveur

petite attention en plus:
a la fin de ton prog libère bien les objet en mettant:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
 
set wbBS = nothing
set wbEleveur =nothing

[jimbololo]

ok merci pour ton aide je vais essayé sa tout de suite ! merci beaucoup

[jimbololo]

merci a toi pickwick ! sa marche impeccable, wbbs garde bien la valeur du premier classeur !

bonne continuation et encore merci !

[tinmarbusir]

Une autre réponse si çà peut t'aider:
ThisWorkbook est le classeur ou se situe le code...
Il ne change pas suivant que l'un ou l'autre classeur soit activé...
çà t'évite le

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

set wbBS = Workbook("BS 0614.XLS")

ou le

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

set wbBS = ActiveWorkbook

en plus tu n'as pus à faire attention au nom du classeur.

[jimbololo]

je ne sais pas car quand je fais thisworkbook.name, sa me donne comme nom de classeur -> recupMAT.XLA (le nom de ma macro), donc je ne peut pas utilisé cette propriété, sauf si je n'ai pas bien compris ce que tu voulai me dire , en tout cas merci pour ta réponse

[tinmarbusir]

Okay je croyais que ton code et le bouton étaient dans le même classeur...
autant pour moi