Sélection de plusieurs feuilles déclarés

Bonjour, j'ai déclaré plusieurs feuilles en "worksheet", quand je veux sélectionner 2 feuilles du classeurs, il ne fonctionne pas. Le message d'erreur est "Erreur d'éxécution 13 : Incompatibilité de type"

Sub MÀJ_AGENTS()

Dim ficcc As Workbook

Set ficcc = ActiveWorkbook

Dim menscc As Worksheet

Set menscc = ficcc.Worksheets("Global Mensuel")

Dim cptcc As Worksheet

Set cptcc = ficcc.Worksheets("CPT RENDU")

Dim actcc As Worksheet

Set actcc = ficcc.Worksheets("actions")

ficcc.Activate

Sheets(Array(cptcc, actcc)).Select

ActiveWindow.SelectedSheets.Visible = False

End Sub

Quelqu'un peut m'aider ?

Bonjour

dans Sheets(Array(cptcc, actcc)).Select , Sheets "attend" des noms de feuille, pas les feuilles elles-mêmes (cptcc et actcc étant des objets feuilles).

Dans le array utiliser cptcc.Name et actcc .Name, et ça devrait fonctionner.

A+