Excel Downloads Forums - Afficher un message - Worksheet_SelectionChange(ByVal Target As Range)

pierrejean · 18/04/2006, 18h59

bonjour PAD

teste cela

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row = 1 Then Cells(10, 1).Select
End Sub

a +

18/04/2006, 18h59	#2 (permalink)
pierrejean XLDnaute Barbatruc Date d'inscription: janvier 2006 Localisation: 69400 LIMAS Version Excel : Excel 2000 (PC) Messages: 6 087	Re:Worksheet_SelectionChange(ByVal Target As Range) bonjour PAD teste cela Private Sub Worksheet_Change(ByVal Target As Range) If Target.Row = 1 Then Cells(10, 1).Select End Sub a +