Discussion :

[sharox]

Bonjour a tous,

J'ai une petit soucis de programme, avec mon programme fonctionnais très bien mais j'ai fait des modifications et il ne fonctionne plus ;(
Voici le bout de code :

Code :

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

1
2
3
4
5
6
7
8
 'Ouverture du fichier de prix (en caché)
        Dim xlApp As Object
        Set xlApp = CreateObject("Excel.Application")
        Dim xlWk As Workbook
        Set xlWk = xlApp.Workbooks.Open(Chemin_dossier_sources & Dossier_sources)
        Dim xlWs As Worksheet
        Set xlWs = xlWk.Worksheets(1)
        xlApp.Visible = True 'rend la deuxième fenêtre visible

Et le problème c'est que la feuille que je veux sélectionner n'est pas la (1)
mais la feuille4 et elle s'appel DRT

Comment puis-je faire svp ? j'ai chercher sur internet mais je ne trouve rien pour l'instant

Merci

[Invité]

Code :

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

 Set xlWs = xlWk.Worksheets("DRT")

[sharox]

Bonjour,

Effectivement il me met aucune erreur mais il m'ouvre pas mon classeur sur la bonne page

[Invité]

il l'ouvre sur la page sélectionné l'hors de l'enregistrement du classeur!

Code :

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

xlWs.select

mais c'est pas important , tu rends visible le dixième excel, je ne voie pas l'intérêt d'une autre session excel si tu ne veux pas masquer le contenu; un open dans la même session suffis menfin.

[sharox]

ha oui merci bien !