erreur de syntaxe sur workbook.worksheet...

V

viniboy

Guest
Bonjour à toutes et à tous,

Code:
Sub test5()
Dim Wb As Workbook
Dim Ws As Worksheet
Set Wb = Workbooks(1)
Set Ws = Sheets(1)
MsgBox Wb.Ws.Name
end sub


Je vous le dis franchement, je comprend pas du tout pourquoi ca bug. Chaque syntaxe commencant par Wb.Ws buge chez moi.
'erreur 438 propriété ou méthode non gérée par cet objet.'

Si quelqu'un voit, ca m'interesserait beaucoup.

Merci d'avance
Cordialement,
Vincent
 
V

viniboy

Guest
Bonjour Michel,

Je viens de trouver:
Code:
Sub test7()

Dim Wb As Workbook
Dim Ws As Worksheet
Set Wb = Workbooks('Palmares.xls')
Set Ws = Wb.Sheets(2)
MsgBox Ws.Name

End Sub
alors que ca
Code:
Sub test6()

Dim Wb As Workbook
Dim Ws As Worksheet
Set Wb = Workbooks(1)
Set Ws = Worksheets(1)
MsgBox Wb.Ws.Name

End Sub
ca marche pas.

Je débute et j'ai du mal,
Merci de ton aide,
Vincent
 

Discussions similaires

Statistiques des forums

Discussions
312 927
Messages
2 093 674
Membres
105 781
dernier inscrit
Dominique G.