Hej Hej, Hej, Hej Det finns API funktioner för det.Sv: Mus klick
Varför i hela fridens namn skall man behöva göra det ?
Måste finnas bättre sätt att komma åt den Sub man önskar aktivera.
tycker
SvenSv: Mus klick
<br><br>
Jag vet ju inte riktigt hur du har tänkt dig, men om du vill simulera ett musklick på t ex en knapp, så kan du anropa det event som triggas när man klickar på knappen.
<code>
' Simulera knapptryckning
Command1_Click
Private Sub Command1_Click()
' Do stuff
End Sub
</code>
mvh /ThomasSv: Mus klick
<br><br>
Då blir det till att använda lite API...
<code>
Private Const MOUSEEVENTF_LEFTDOWN = &H2 ' left button down
Private Const MOUSEEVENTF_LEFTUP = &H4 ' left button up
Private Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)
Private Declare Function GetMessageExtraInfo Lib "user32" () As Long
'Mouse Down
mouse_event MOUSEEVENTF_LEFTDOWN, 0, 0, 0, GetMessageExtraInfo()
'Mouse Up
mouse_event MOUSEEVENTF_LEFTUP, 0, 0, 0, GetMessageExtraInfo()
</code>
<br><br>
mvh /Thomas
<br><br>
PS. Om du får detta att fungera, så tycker jag att du är skyldig SvenPon (och mig också) en förklaring till vad du skall använda detta till (inget oetiskt hoppas jag) DS.Sv: Mus klick
>Jag vill att musen klickar där muspekaren är.
Har du fel på pekfingret,skall du initiera klicket med tankekraft
DSSv: Mus klick
Kolla upp Mouse_event eller nåt sånt på sidan www.vbapi.com eller www.allapi.net så står det där, du kan också simulera att du rör musen.