Discussion :

[tibomar]

Bonjour,

J'ai besoin d'enregistrer un feuille d'un autre classeur dans une variable :

Code :

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

1
2
3
4
5
    Dim wbsource As Workbooks
   Dim fsource As Worksheet
 
    Set wbsource = Workbooks("Interventions")
    Set fsource = wbsource.Worksheets("Feuil3")

et la ça bloque
J'ai aussi essayé directement

Code :

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

Set fsource = Workbooks("Interventions").Worksheets("Feuil3")

Sachant que le classeur Interventions est bien ouvert

En vous remerciant

[issoram]

Bonjour,

Dans ce code juste un "s" de trop

Code :

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

1
2
3
4
5
Dim wbsource As Workbook
Dim fsource As Worksheet
 
Set wbsource = Workbooks("Interventions")
Set fsource = wbsource.Worksheets("Feuil3")

Dans l'autre

Code :

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

Set fsource = Workbooks("Interventions").Worksheets("Feuil3")

je ne vois pas d'erreur de syntaxe. Es-tu sûr du nom de ton classeur et de ta feuille? Quel est le message d'erreur?
Par contre un classeur sans extension ("Interventions"), est ce bien le cas?

[nanousik]

Tu dois ajouter le type de fichier pour "Interventions" par exemple si c'est un fichier .xls tu dois écrire

Code :

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

Set fsource = Workbooks("Interventions.xls").Worksheets("Feuil3")

[tibomar]

Tu dois ajouter le type de fichier pour "Interventions" par exemple si c'est un fichier .xls tu dois écrire

Code :

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

Set fsource = Workbooks("Interventions.xls").Worksheets("Feuil3")

ça a l'air de fonctionner maintenant avec cela.
Il me semblais pourtant avoir testé toutes ces solutions
Merci (vraiment ) beaucoup
Bonne journée