fermer classeurA qui ouvre classeur B par classeur B Résolu

Question

Bonjour, 
encore une fois je fais appelle a vous...
Voila j'ai deux classeurs:
classeur 1 s'appelle "lanceur"
classeur 2 : suivi de stage

dans le classeur 1 j'ai une macro qui lance le classeur 2:

Private Sub CommandButton1_Click()
Application.Workbooks.Open ThisWorkbook.Path & "\suivi de stage"
Workbooks("suivi de stage").Activate
End Sub

l pas de soucis, lorsque mon classeur suivi de stage s'ouvre j' ai un userform qui se lance automatiquement.. et je voudrais que "lanceur" se ferme en meme temps...
j'ai mis ce code mais ca ne marche pas

Private Sub Workbook_Open()

'masquer le menu(en plein ecran)
Application.DisplayFullScreen = True
Application.DisplayFormulaBar = False
ActiveWindow.DisplayHorizontalScrollBar = True
'masquer onglet
ActiveWindow.DisplayWorkbookTabs = True

CancelSortie = True
Sheets("bienv").Visible = False

accueilB2.Show

Dim lWorkbook As Workbook
Dim lFound As Boolean

lFound = False
For Each lWorkbook In Workbooks
If lWorkbook.Name = "lanceur.xlsm" Then
lFound = True
Exit For
End If
Next
If lFound Then
Workbooks("lanceur.xlsm").Close false
End If

End Sub


j'ai essayé plusieurs mode de fermeture mais le seul moment ou "lanceur" se ferme est lorsque j'accède a un onglet de "suivi de stage " si j'accède juste a des userforms de "suivi de stage" ca ne ferme pas" lanceur"..

merci pour votre aide
cordialement


Configuration: Windows 7 / Firefox 32.0

Patrice33740 · Answer

Bonjour,

Simplement :
Private Sub CommandButton1_Click()
Application.Workbooks.Open ThisWorkbook.Path & "\suivi de stage"
ThisWorkbook.Close False
End Sub

thivame · Answer

bonjour Patrice33740 
j'ai deja essayé cette version, mais tant que je n'ouvre pas un onglet qui se trouve dans "suivi de stage" cela ne ferme pas  "lanceur" 
Dans "suivi de stage", on peut se servir juste des userform sans ouvrir d'onglet.. donc du coup lanceur ne se ferme pas
cordialement

thivame · Answer

ok je vais verifier et essayer
merci par avance

thivame · Answer

bon mis sur false, le lanceur se ferme bien mais mon userfrom ne se lance plus tout seul

Fermer classeurA qui ouvre classeur B par classeur B

4 réponses

Discussions similaires

Newsletters