Objet vba
Bulledanslair
Messages postés
10
Date d'inscription
samedi 21 janvier 2006
Statut
Membre
Dernière intervention
3 décembre 2008
-
28 janv. 2006 à 16:04
Gobillot Messages postés 3140 Date d'inscription vendredi 14 mai 2004 Statut Membre Dernière intervention 11 mars 2019 - 29 janv. 2006 à 22:19
Gobillot Messages postés 3140 Date d'inscription vendredi 14 mai 2004 Statut Membre Dernière intervention 11 mars 2019 - 29 janv. 2006 à 22:19
A voir également:
- Objet vba
- Objet requis vba ✓ - Forum Visual Basic 6
- Erreur 424 Objet requis Macro Excel ✓ - Forum Visual Basic
- Message d'erreur 424: objet requis ✓ - Forum VBA Office (Excel, Word ...)
- Doevents vba - Conseils pratiques -Visual Basic / VB.NET
- La référence d'objet n'est pas définie à une instance d'un objet ✓ - Forum C# / .NET
5 réponses
ScSami
Messages postés
1488
Date d'inscription
mercredi 5 février 2003
Statut
Membre
Dernière intervention
3 décembre 2007
24
28 janv. 2006 à 16:28
28 janv. 2006 à 16:28
Oui, il y a moyen.
Enjoy
<hr size="2" width="100%">
( Si une réponse vous convient, cliquez sur le bouton "Réponse acceptée". )
Enjoy
<hr size="2" width="100%">
( Si une réponse vous convient, cliquez sur le bouton "Réponse acceptée". )
cs_phBil
Messages postés
17
Date d'inscription
jeudi 13 février 2003
Statut
Membre
Dernière intervention
29 octobre 2006
29 janv. 2006 à 08:54
29 janv. 2006 à 08:54
en utilisant l'événement double clic du bouton
Private Sub CommandButton1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
MsgBox "double click"
End Sub
Private Sub CommandButton1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
MsgBox "double click"
End Sub
Gobillot
Messages postés
3140
Date d'inscription
vendredi 14 mai 2004
Statut
Membre
Dernière intervention
11 mars 2019
34
29 janv. 2006 à 20:46
29 janv. 2006 à 20:46
désolé il n'y a pas d'évênement _DblClick sur un bouton.
Private Declare Function GetTickCount Lib "kernel32" () As Long
Private Sub Command1_Click()
Static tps As Long
If tps = 0 Then
tps = GetTickCount
Else
If GetTickCount - tps < 250 Then
MsgBox "Double Click"
End If
tps = 0
End If
End Sub
Daniel
Private Declare Function GetTickCount Lib "kernel32" () As Long
Private Sub Command1_Click()
Static tps As Long
If tps = 0 Then
tps = GetTickCount
Else
If GetTickCount - tps < 250 Then
MsgBox "Double Click"
End If
tps = 0
End If
End Sub
Daniel
cs_phBil
Messages postés
17
Date d'inscription
jeudi 13 février 2003
Statut
Membre
Dernière intervention
29 octobre 2006
29 janv. 2006 à 22:14
29 janv. 2006 à 22:14
ben si en VBA Sous Excel 2000 ... l'événement double clic existe !!!
Phbil
Phbil
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Gobillot
Messages postés
3140
Date d'inscription
vendredi 14 mai 2004
Statut
Membre
Dernière intervention
11 mars 2019
34
29 janv. 2006 à 22:19
29 janv. 2006 à 22:19
ha bon
alors où est le problème ?
Daniel
alors où est le problème ?
Daniel