Bonjour,
Le nom d'une Feuille sélectionnée est obtenu par le code
Nom = ActiveSheet.Name
Quelle est la propriété qui donne son n° d'ordre ?
Par exemple :
Un classeur comporte 4 feuilles "B", "M", "F", "X"
Comment obtenir Numero = 3 quand "F" est sélectionnée ?
Merci
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
JB
Bonjour,
x = Sheets("feuil3").Index x = ActiveSheet.Index
JB http://boisgontierjacques.free.fr/
On 23 nov, 14:06, LANIMAL wrote:
Bonjour, Le nom d'une Feuille sélectionnée est obtenu par le code Nom = ActiveSheet.Name Quelle est la propriété qui donne son n° d'ordre ? Par exemple : Un classeur comporte 4 feuilles "B", "M", "F", "X" Comment obtenir Numero = 3 quand "F" est sélectionnée ? Merci
Bonjour,
x = Sheets("feuil3").Index
x = ActiveSheet.Index
JB
http://boisgontierjacques.free.fr/
On 23 nov, 14:06, LANIMAL <nore...@xxx.yy> wrote:
Bonjour,
Le nom d'une Feuille sélectionnée est obtenu par le code
Nom = ActiveSheet.Name
Quelle est la propriété qui donne son n° d'ordre ?
Par exemple :
Un classeur comporte 4 feuilles "B", "M", "F", "X"
Comment obtenir Numero = 3 quand "F" est sélectionnée ?
Merci
Bonjour, Le nom d'une Feuille sélectionnée est obtenu par le code Nom = ActiveSheet.Name Quelle est la propriété qui donne son n° d'ordre ? Par exemple : Un classeur comporte 4 feuilles "B", "M", "F", "X" Comment obtenir Numero = 3 quand "F" est sélectionnée ? Merci
michdenis
ActiveSheet.Index
Mais dans ton code, il est avantageux d'utiliser la propriété Name pour coder, car le nom de l'onglet de la feuille peut être modifiée sans affecter l'exécution de ton code
Dans l'éditeur de code, dans ton projet VBA, les objets de ton projet s'affiche....
Pour les feuilles : Feuil1(toto) Feuil1 = Propriété Name de l'objet de la feuille (toto) = Nom de l'onglet de la feuille
Dans ton code, au lieu d'utiliser
with worksheets("toto") 'Ton code End with
tu utilises :
With Feuil1 'Ton code End With
En conséquence, au lieu d'utiliser : ActiveSheet.index, tu aurais : x = Feuil1.Index par exemple.
"LANIMAL" a écrit dans le message de news:
Bonjour, Le nom d'une Feuille sélectionnée est obtenu par le code Nom = ActiveSheet.Name Quelle est la propriété qui donne son n° d'ordre ? Par exemple : Un classeur comporte 4 feuilles "B", "M", "F", "X" Comment obtenir Numero = 3 quand "F" est sélectionnée ? Merci
ActiveSheet.Index
Mais dans ton code, il est avantageux d'utiliser la propriété
Name pour coder, car le nom de l'onglet de la feuille
peut être modifiée sans affecter l'exécution de ton code
Dans l'éditeur de code, dans ton projet VBA, les objets
de ton projet s'affiche....
Pour les feuilles :
Feuil1(toto)
Feuil1 = Propriété Name de l'objet de la feuille
(toto) = Nom de l'onglet de la feuille
Dans ton code, au lieu d'utiliser
with worksheets("toto")
'Ton code
End with
tu utilises :
With Feuil1
'Ton code
End With
En conséquence, au lieu d'utiliser : ActiveSheet.index,
tu aurais : x = Feuil1.Index par exemple.
"LANIMAL" <noreply@xxx.yy> a écrit dans le message de news:
OoubAxWTJHA.4452@TK2MSFTNGP03.phx.gbl...
Bonjour,
Le nom d'une Feuille sélectionnée est obtenu par le code
Nom = ActiveSheet.Name
Quelle est la propriété qui donne son n° d'ordre ?
Par exemple :
Un classeur comporte 4 feuilles "B", "M", "F", "X"
Comment obtenir Numero = 3 quand "F" est sélectionnée ?
Merci
Mais dans ton code, il est avantageux d'utiliser la propriété Name pour coder, car le nom de l'onglet de la feuille peut être modifiée sans affecter l'exécution de ton code
Dans l'éditeur de code, dans ton projet VBA, les objets de ton projet s'affiche....
Pour les feuilles : Feuil1(toto) Feuil1 = Propriété Name de l'objet de la feuille (toto) = Nom de l'onglet de la feuille
Dans ton code, au lieu d'utiliser
with worksheets("toto") 'Ton code End with
tu utilises :
With Feuil1 'Ton code End With
En conséquence, au lieu d'utiliser : ActiveSheet.index, tu aurais : x = Feuil1.Index par exemple.
"LANIMAL" a écrit dans le message de news:
Bonjour, Le nom d'une Feuille sélectionnée est obtenu par le code Nom = ActiveSheet.Name Quelle est la propriété qui donne son n° d'ordre ? Par exemple : Un classeur comporte 4 feuilles "B", "M", "F", "X" Comment obtenir Numero = 3 quand "F" est sélectionnée ? Merci
isabelle
bonjour Lanimal,
copie cette macro sur la page code de ThisWorkBook,
Private Sub Workbook_SheetActivate(ByVal Sh As Object) For Each f In Sheets x = x + 1 If Sh.Name = f.Name Then MsgBox x Next End Sub
isabelle
LANIMAL a écrit :
Bonjour, Le nom d'une Feuille sélectionnée est obtenu par le code Nom = ActiveSheet.Name Quelle est la propriété qui donne son n° d'ordre ? Par exemple : Un classeur comporte 4 feuilles "B", "M", "F", "X" Comment obtenir Numero = 3 quand "F" est sélectionnée ? Merci
bonjour Lanimal,
copie cette macro sur la page code de ThisWorkBook,
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
For Each f In Sheets
x = x + 1
If Sh.Name = f.Name Then MsgBox x
Next
End Sub
isabelle
LANIMAL a écrit :
Bonjour,
Le nom d'une Feuille sélectionnée est obtenu par le code
Nom = ActiveSheet.Name
Quelle est la propriété qui donne son n° d'ordre ?
Par exemple :
Un classeur comporte 4 feuilles "B", "M", "F", "X"
Comment obtenir Numero = 3 quand "F" est sélectionnée ?
Merci
copie cette macro sur la page code de ThisWorkBook,
Private Sub Workbook_SheetActivate(ByVal Sh As Object) For Each f In Sheets x = x + 1 If Sh.Name = f.Name Then MsgBox x Next End Sub
isabelle
LANIMAL a écrit :
Bonjour, Le nom d'une Feuille sélectionnée est obtenu par le code Nom = ActiveSheet.Name Quelle est la propriété qui donne son n° d'ordre ? Par exemple : Un classeur comporte 4 feuilles "B", "M", "F", "X" Comment obtenir Numero = 3 quand "F" est sélectionnée ? Merci
Philippe.R
Bonjour, Comme ceci :
Sub rang_feuille() For i = 1 To ThisWorkbook.Sheets.Count If Sheets(i).Name = ActiveSheet.Name Then MsgBox "Cette feuille est la numéro " & i Exit Sub End If Next i End Sub -- Avec plaisir http://dj.joss.free.fr/trombine.htm http://jacxl.free.fr/mpfe/trombino.html Philippe.R Pour se connecter au forum : http://www.excelabo.net/mpfe/connexion.php News://news.microsoft.com/microsoft.public.fr.excel "LANIMAL" a écrit dans le message de news:
Bonjour, Le nom d'une Feuille sélectionnée est obtenu par le code Nom = ActiveSheet.Name Quelle est la propriété qui donne son n° d'ordre ? Par exemple : Un classeur comporte 4 feuilles "B", "M", "F", "X" Comment obtenir Numero = 3 quand "F" est sélectionnée ? Merci
Bonjour,
Comme ceci :
Sub rang_feuille()
For i = 1 To ThisWorkbook.Sheets.Count
If Sheets(i).Name = ActiveSheet.Name Then
MsgBox "Cette feuille est la numéro " & i
Exit Sub
End If
Next i
End Sub
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/mpfe/connexion.php
News://news.microsoft.com/microsoft.public.fr.excel
"LANIMAL" <noreply@xxx.yy> a écrit dans le message de
news:OoubAxWTJHA.4452@TK2MSFTNGP03.phx.gbl...
Bonjour,
Le nom d'une Feuille sélectionnée est obtenu par le code
Nom = ActiveSheet.Name
Quelle est la propriété qui donne son n° d'ordre ?
Par exemple :
Un classeur comporte 4 feuilles "B", "M", "F", "X"
Comment obtenir Numero = 3 quand "F" est sélectionnée ?
Merci
Sub rang_feuille() For i = 1 To ThisWorkbook.Sheets.Count If Sheets(i).Name = ActiveSheet.Name Then MsgBox "Cette feuille est la numéro " & i Exit Sub End If Next i End Sub -- Avec plaisir http://dj.joss.free.fr/trombine.htm http://jacxl.free.fr/mpfe/trombino.html Philippe.R Pour se connecter au forum : http://www.excelabo.net/mpfe/connexion.php News://news.microsoft.com/microsoft.public.fr.excel "LANIMAL" a écrit dans le message de news:
Bonjour, Le nom d'une Feuille sélectionnée est obtenu par le code Nom = ActiveSheet.Name Quelle est la propriété qui donne son n° d'ordre ? Par exemple : Un classeur comporte 4 feuilles "B", "M", "F", "X" Comment obtenir Numero = 3 quand "F" est sélectionnée ? Merci