Contrôle de la souris sur un commentaire

[VIARD]

Bonjour à toutes et à tous

Question: J'ai une feuille de présentation avec plein de commentaires.

A l'activation de la feuille, je désire contrôler le pointeur de la souris par macro, afin de faire apparaître un commentaire bien précis en début de présentation.
Ensuite je reprend la main. (ce commentaire contient les instructions d'utilisation de la feuille)

Ou, si ce n'est possible faire apparaître ce commentaire pendant quelques secondes.

Je n'ai pas encore trouvé d'info sur le sujet dans le forum.

En vous remerciant par avance
Amicalement
Jean-Paul

 

[VIARD]

Re : Contrôle de la souris sur un commentaire

Salut Masterdisco

Je te remercie, je vais regarder

Jean-Paul

 

[VIARD]

Re : Contrôle de la souris sur un commentaire

Bonjour Masterdisco

J'ai quelque peu modifié le programme.
Telle qu'il était, il avait du mal à fonctionner.
voici le code:
[highlight]Sub Bouton1_QuandClic()
Dim Durée%

Durée = CInt([c3].Value)
Range("B6").Select
ActiveCell.Comment.Visible = True
Call Tempo(Durée)
Range("b6").Comment.Visible = False
Range("A1").Select

End Sub
'====================
Sub Tempo(Durée)
Dim Start As Variant

Start = Timer
Do While Timer < Start + Durée
DoEvents
Loop
End Sub
'===================[/code]

De cette façon le programme ok.

Mais, il m'aurait plus de pouvoir utilisé le pointeur de la souris.

Je te remercie, cela m'a permis d'aller plus avant.

Cordialement

Jean-Paul

 

[PMO2]

Re : Contrôle de la souris sur un commentaire

Bonjour,

Une piste avec le code suivant à copier dans un module standard

Private Declare Function SetCursorPos& Lib "user32" (ByVal x As Long, ByVal y As Long)

Sub CursorOnRange()
Dim R As Range
Set R = ActiveSheet.[b6]
With ActiveWindow
  SetCursorPos .PointsToScreenPixelsX(R.Left) + 30, .PointsToScreenPixelsY(R.Top) + 30
End With
End Sub

RESTRICTION
Si la feuille est zoomée il faudra affiner les réglages + 30
Même chose si les lignes ou les colonnes sont de différentes dimensions

Cordialement.

PMO
Patrick Morange

 

[VIARD]

Re : Contrôle de la souris sur un commentaire

Bonjour PMO2

merci pour ta solution.
Je vais regarder.

Salutation

Jean-Paul

 

[VIARD]

Re : Contrôle de la souris sur un commentaire

Bonjour PMO2

Ta solution est absolument génial.
Déjà j'entrevoie un tas d'application.

Merci encore et bonne continuation.

Salutation

Jean-Paul