Bonjour tout le monde
Une énigme de plus , du moins pour moi.
J’essaye d expliquer …..
j aurais besoin, quand je clic dans la colonne « C »
(If Not Application.Intersect(Target, Range("c8:c100")) Is Nothing Then)
que la colonne Z vienne se positionner contre cette dernière pour obtenir visuellement A C
sans me renvoyer systématiquement en haut de page
j ai essayé avec
(Application.GoTo Reference:=ActiveSheet.Range("z2"), Scroll:=True
ou
Application.GoTo Reference:=ActiveCell.Offset(, 18), Scroll:=True)
mais le scroll me met tout en haut de la feuille , contre les » figer volets »
je souhaite juste attirer la colonne Z
j ai pensé à masquer les colonnes intermédiaires mais je pense qu il y a mieux à faire
Auriez vous une idée,
Merci pour vos sujétions
E et F
Re : Application.GoTo Reference:=ActiveSheet.Range("z1"), Scroll:=True
merci pour ta proosition , mais ça ne colle pas !
si je double clics C100 j attire bien la colonne Z mais je me retrouve sur la ligne A
et je voudrais resté sur la ligne 100 ,et juste attirer z100 contre la colonne C
merci pour tout
E et F
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Application.Intersect(Target, Range("c1:c100")) Is Nothing Then
Application.GoTo [Z2], Scroll:=True
End If
End Sub
Re : Application.GoTo Reference:=ActiveSheet.Range("z1"), Scroll:=True
Re
Si tu veux atteindre en colonne Z , la même ligne qu'en colonne C, alors utilises ceci
Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Application.Intersect(Target, Range("c1:c100")) Is Nothing Then
Application.GoTo Cells(Target.Row, "Z"), Scroll:=True
End If
End Sub
PS: Avant de tester, inhibes (ou supprimes) la procédure DoubleClick au préalable
Re : Application.GoTo Reference:=ActiveSheet.Range("z1"), Scroll:=True
Merci Pedrag31, Staple1600,Dranreb
C’est bien après un double clic dans la colonne C que l’événement doit se produire
et attirer la colonne Z contre elle
Donc la version de dranreb (Tout simplement ça peut être. bin oui ! lol) et très efficace
Je l ai adapté àmon classeur, le résultat est parfait
Un très grand MERCI à vous tous
Et une très bonne journée
E et F