Discussion :

[abeilles26]

bonjour à tous,

Un problème qui semble embêter pas mal de monde est de montrer un workbook qui était précédement en mode "hidden". Je sais que le code est censé être le suivant:

Code :

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

1
2
3
4
5
6
7
8
 
 
dim xlOff As New Excel.Application
dim OffWb As New Excel.Workbook
 
Set OffWb = xlOff.Workbooks.Open("\\BEPROD01.eoc.net\OffShare\funds_common\03.Client Services\Fundsettle client services\Planning\Planning_details\planning_offs.xls")
 
xlOff.Windows("planning_offs.xls").Visible = True

Maheureusement, lorsque je lance le code il fonctionne mais n'affiche pas le workbook demandé. Je dois fermer ma session excel et la réouvrir pour qu'il apparaisse.

Avec un peu de chance, est-ce que quelqu'un aurait la solution? A noter que le workbook est le plus souvent utiliser en mode "hidden" et ne doit apparaitre que et uniquement lorsque la macro est lancée (à l'aide d'un bouton)

J'espère être suffisament claire et merci d'avance,

Isabelle

[Daniel.C]

Bonjour,

Code :

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

1
2
3
4
5
6
7
Dim xlOff As New Excel.Application
Dim OffWb As New Excel.Workbook
 
Set OffWb = xlOff.Workbooks.Open("C:\Users\Daniel\Documents\Donnees\Daniel\mpfe\130303.xlsm")
 
xlOff.Windows("130303.xlsm").Visible = True
xlOff.Visible = True

Ou même :

Code :

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

1
2
3
4
5
6
Dim xlOff As New Excel.Application
Dim OffWb As New Excel.Workbook
 
Set OffWb = xlOff.Workbooks.Open("C:\Users\Daniel\Documents\Donnees\Daniel\mpfe\130303.xlsm")
 
xlOff.Visible = True

[abeilles26]

Bonjour Daniel

T'es un chef

La deuxieme solution ouvre seulement la nouvelle session excel mais la premiere montre le workbook aussi.

Merci