OpenOffice.info

[quote]Danke und Grüße an den Meister[/quote]

als "Der Meister" wird, im Zusammenhang mit StarBasic-Programmierung i.A. Andrew Pitonyak bezeichnet:

Webseite:
http://www.pitonyak.org/

Bild:
http://www.hentzenwerke.com/images/au_pitonyak_andrew.jpg


Gruß
Stephan

Hi,
genauso! Einfacher als ich dachte.
Merkwürdig ist nur, dass bei mir until und while in der Funktion vertauscht ist.

Danke und Grüße an den Meister

Dim halt As Boolean

Sub Mouse_left_down
    halt = 0
    Do
          REM Mein Makro ausführen
    Loop while halt = True
End Sub

Sub Anhalten()
	halt = 1
End Sub

z.B. ein Zweites Makro und eine öffentliche Variable, und das zweite Makro dem Ereignis "Maustaste loslassen" zuordnen:

[code]Dim halt As Boolean

Sub Mouse_left_down
halt = 0
Do
REM Mein Makro ausführen
Loop while halt = True
End Sub

Sub Anhalten()
halt = 1
End Sub
[/code]

Gruß
Stephan

Was ist Dein Anwendungsfall? Was willst Du erreichen?

Das Ereignis (wo: bei einem Formular?) wird nur einmal ausgelöst...
Und: während ein Makro läuft kann keine andere Aktion durchgeführt werden.

Sub Mouse_left_down

    Do
    		REM Mein Makro ausführen
 	Loop while <>  ?Mouse button pressed?
End Sub

Hi,
ich brauche ein Code, der bei gedrückter Maustaste ausgeführt wird.
Es gibt das Maus-Ereignis "Mouse button pressed", finde aber keine Erklärung wir das angewandt wird. Aufgerufen wird das Makro über eine Schaltfläche und soll den Code bis zum Loslassen ausführen.

[code]Sub Mouse_left_down

Do
REM Mein Makro ausführen
Loop while <> ?Mouse button pressed?
End Sub[/code]

Grüße