Discussion :

[jackfred]

Bonjour,

Que je vous exmplique en qques mots

- j'ai un classeur "A" qui est ouvert sur un onglet "A2".
Je clique sur un lien qui m'ouvre le classeur "B".

- Dans "B" j'ai un bouton "Fermer", qui ferme ce classeur sans enregistrer.

Je souhaite, en cliquant sur mon bouton "Fermer" du classeur B que l'on tombe sur l'onglet "A1".


J'ai essayé qque chose du style :

-----

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
Sub Fermer()
Dim vFile As String
Dim vSheet As String
 
'Ferme le fichier actif
ActiveWorkbook.Close SaveChanges:=False
 
'Pour aller sur "A1"
vFile = ("C:\Documents and Settings\blabla\A.xls")
vSheet = ("A1")
Workbooks.Open vFile
Sheets(vSheet).Select
End Sub

----------------

A priori, je pense qu'à la fermeture il ne retient pas les informations de vfile et de vsheet. Du coup ca ne marche pas.
Du moins je pense

Qq'un aurait une idée?

Merci

Fred

[Invité]

Bonjour Jackfred,

Je pense qu'il faut organiser votre macro autrement :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
Sub Fermer()
Dim vFile As String
Dim vSheet As String
 
 
'Pour aller sur "A1"
vFile = ("C:\Documents and Settings\blabla\A.xls")
vSheet = ("A1")
Workbooks.Open vFile
Sheets(vSheet).Select
Workbooks("B.XLS").Close SaveChanges:=False
End Sub

amicalement.