Test sur feuille excel Résolu

Question

Bonjour,  

Je voudrais savoir quelle est l'erreur dans ce code: 


If sheets(1).selected then 

msgbox ("C'est la première page") 

End If

Je vous remercie d'avance :) 

PS: Je veux réaliser une macro qui balaye jusqu'à la première page. 
Je n'ai pas pu mettre un test juste sur le nom de la première page actuelle par exemple: 


If Activesheet.Name = "feuil1" Then 
msgbox("C'est la première page") 
End If

Car, j'ai la première page qui peut être variable et donc elle ne garde pas le même nom. 




Configuration: Windows 7 / Safari 535.11

lermite222 · Answer

Bonjour,
Sub test()
    If ActiveSheet.Index = 1 Then
        MsgBox "C'est la première feuille"
    Else
        MsgBox "Ce n'est pas la première feuille"
    End If
End Sub
A+

Socheu · Answer

Merci lermite222 ça marche parfaitement!

Très bonne journée :)

Test sur feuille excel

2 réponses

Votre réponse

Discussions similaires