bonjour à tous

Je vous donne deux morceaux de code. Le premier s'arrête à la ligne en gras avec la mention "erreur 438 propriété ou méthode non gérée par cet objet" alors que l'autre fonctionne. Les deux écritures ne sont donc pas équivalentes mais en quoi?

code 1

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
Dim bilan As Workbook
Dim feuilleE As Worksheet
Dim feuilleB As Worksheet

'variables pour traitement des données
Dim nbligne As Long          'nb total de lignes dans le fichier
Dim nbcolonne As Long           'nb total de colonnes dans le fichier


Set bilan = Workbooks("bilan M2.xlsx")
Set feuilleE = bilan.Sheets("Etudiant")
nbligne = bilan.feuilleE.Range("B1").End(xlDown).Row
nbcolonne = bilan.feuilleE.Range("A1").End(xlToRight).Column
code 2
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
'variables pour traitement des données
Dim nbligne As Long          'nb total de lignes dans le fichier
Dim nbcolonne As Long           'nb total de colonnes dans le fichier
 
nbligne = Workbooks("bilan M2.xlsx").Sheets("Etudiant").Range("B1").End(xlDown).Row
nbcolonne = Workbooks("bilan M2.xlsx").Sheets("Etudiant").Range("A1").End(xlToRight).Column
Je vous remercie d'éclairer ma lanterne. Il y a des nuances que je ne saisis pas.