![]() |
|
Forum
|
|
|
#1 (permalink) |
|
XLDnaute Occasionel
Date d'inscription: juillet 2006
Localisation: nancy
Version Excel : Excel XP (PC)
Messages: 486
|
Bonjour
Private Sub Worksheet_Change(ByVal Target As Range) UserForm1.Show End Sub ici l'action "UserForm1.Show" fonctionne des qu uin changement intervient dans la feuille !!!! comment faire la meme chose mais que si le changement intervient dans la colonne "E" ( plus precisement de E 3 à E 65636) merci d avance pour toutes vos aides E et F |
|
|
|
| ANNONCES | |||
|
|
|
|
#2 (permalink) |
|
Guest
Messages: n/a
|
Salut le forum
Essaye avec ceci Code:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Application.Intersect(Target, Range("E3:E65536")) Is Nothing Then
UserForm1.Show
End If
End Sub
Edition pour ajout lien exemple de Intersect http://www.excel-downloads.com/forum...s-xldiens.html Dernière modification par Mytå ; 08/04/2007 à 16h51. |
|
|
|
#3 (permalink) |
|
XLDnaute Occasionel
Date d'inscription: juillet 2006
Localisation: nancy
Version Excel : Excel XP (PC)
Messages: 486
|
et bien !!
re MERCI beaucoup Mytå j applique de suite !! merci pour ta rapidité......... a une prochaine avec plaisir . E et F |
|
|
|
| ANNONCES | |
![]() |
| Liens sociaux |
| Outils de la discussion | |
|
|
Discussions similaires
|
||||
| Discussion | Auteur | Forum | Réponses | Dernier message |
| Worksheet_SelectionChange(ByVal Target As Range) | PAD | Forum Excel | 2 | 18/04/2006 19h14 |
| VBA byval byref ?? | Hervé | Forum Excel | 10 | 13/03/2006 22h39 |
| Worksheet_Change(ByVal | fifi | Forum Excel | 8 | 04/10/2005 22h18 |
| Private Sub Worksheet_Change | Xtian du Québec | Forum Excel | 2 | 22/02/2005 02h52 |
| Private Sub Worksheet_Change(ByVal Target As Range) | Xtian (du Québec) | Forum Excel Downloads - Archives | 3 | 25/01/2005 23h12 |