Bonjour,
soit la macro suivante qui me permet d'aller directement sur l'onglet
du meme nom que je tape dans la cellule L9:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = Range("L9").Address And _
Range("L9") <> "" Then
Sheets(Range("L9").Text).Select
End If
End Sub
Sur Excel 2000 ou Excel 2003,cela fonctionne tres bien.
Par contre sur 2003, si j'ouvre 2 fichiers Xl avec des liens entre
eux, cette macro ne fonctionne plus!
sur Excel 2000, c'est OK !
Est-ce que quelqu'un peut m'apporter son aide pour faire evoluer ce
code
afin qu'il fonctionne a chaque fois.
Merci par avance.
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
papou
Bonjour Effectivement ton code tel quel sur mon Excel 2003 ne fonctionne pas. Par contre ceci fonctionne sans problème sur Excel 2003: Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$L$9" And _ [L9] <> "" Then Sheets(Target.Value).Select End If End Sub
Cordialement Pascal a écrit dans le message de news:
Bonjour, soit la macro suivante qui me permet d'aller directement sur l'onglet du meme nom que je tape dans la cellule L9:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = Range("L9").Address And _ Range("L9") <> "" Then Sheets(Range("L9").Text).Select End If End Sub
Sur Excel 2000 ou Excel 2003,cela fonctionne tres bien. Par contre sur 2003, si j'ouvre 2 fichiers Xl avec des liens entre eux, cette macro ne fonctionne plus! sur Excel 2000, c'est OK !
Est-ce que quelqu'un peut m'apporter son aide pour faire evoluer ce code afin qu'il fonctionne a chaque fois. Merci par avance.
SD
Bonjour
Effectivement ton code tel quel sur mon Excel 2003 ne fonctionne pas.
Par contre ceci fonctionne sans problème sur Excel 2003:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$L$9" And _
[L9] <> "" Then
Sheets(Target.Value).Select
End If
End Sub
Cordialement
Pascal
<stef.dubois@club-internet.fr> a écrit dans le message de news:
58a7d735-d5c1-4135-848c-87d7c20ab736@e4g2000hsg.googlegroups.com...
Bonjour,
soit la macro suivante qui me permet d'aller directement sur l'onglet
du meme nom que je tape dans la cellule L9:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = Range("L9").Address And _
Range("L9") <> "" Then
Sheets(Range("L9").Text).Select
End If
End Sub
Sur Excel 2000 ou Excel 2003,cela fonctionne tres bien.
Par contre sur 2003, si j'ouvre 2 fichiers Xl avec des liens entre
eux, cette macro ne fonctionne plus!
sur Excel 2000, c'est OK !
Est-ce que quelqu'un peut m'apporter son aide pour faire evoluer ce
code
afin qu'il fonctionne a chaque fois.
Merci par avance.
Bonjour Effectivement ton code tel quel sur mon Excel 2003 ne fonctionne pas. Par contre ceci fonctionne sans problème sur Excel 2003: Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$L$9" And _ [L9] <> "" Then Sheets(Target.Value).Select End If End Sub
Cordialement Pascal a écrit dans le message de news:
Bonjour, soit la macro suivante qui me permet d'aller directement sur l'onglet du meme nom que je tape dans la cellule L9:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = Range("L9").Address And _ Range("L9") <> "" Then Sheets(Range("L9").Text).Select End If End Sub
Sur Excel 2000 ou Excel 2003,cela fonctionne tres bien. Par contre sur 2003, si j'ouvre 2 fichiers Xl avec des liens entre eux, cette macro ne fonctionne plus! sur Excel 2000, c'est OK !
Est-ce que quelqu'un peut m'apporter son aide pour faire evoluer ce code afin qu'il fonctionne a chaque fois. Merci par avance.