XL 2016 Fichier et onglet à partir de variable (résolu)

[fabbe69]

Bonjour à tous,

J'essaie de récupérer des données d'un autre fichier excel dont le nom et l'onglet sont des variables dans la feuille ou se trouve le code.

J'arrive bien à ouvrir le fichier mais cela bloque (erreur d'execution '9' ) lorque je lui demande de sélectionner l'onglet.

Je ne réussi pas à trouver de solution dans les différents fils.

Quelqu'un pour m'aider ?

Merci d'avance

Sub maj()

Dim w1 As Workbook

Dim s1 As String


s1 = ThisWorkbook.Sheets("Renseignement").Range("B23").Value

 Set w1 = Application.Workbooks.Open(Sheets("Renseignement").Range("B22"), local:=True)
 
 w1.Activate
 
 Worksheets(s1).Select
 
 Cells.Select
 

End Sub

 

[sousou]

Bonjour
worksheets(s1).activate

 

[fabbe69]

Bojour

Merci pour le retour mais l'erreur est toujours présente.

 

[job75]

Bonjour fabbe69, sousou,

A condition que la feuille de calcul dont le nom est stocké dans s1 existe dans le fichier w1 :

w1.Worksheets(s1).Select

A+

 

[fabbe69]

Bonjour job75,

Merci de ton retour. Le problème semblait venir de ma variable qui était une concaténation.

A+

Bonjour fabbe69, sousou,

A condition que la feuille de calcul dont le nom est stocké dans s1 existe dans le fichier w1 :

w1.Worksheets(s1).Select

A+