Seite 1 von 1

Eingabebestätigung automatisieren

Verfasst: Fr, 18.01.2008 21:16
von dkledi
Hallo,
ich habe gerade mittels OOo Basic ein Makro für das Calc-Modul geschrieben. Dabei muss der Anwender in eine Zelle einen Wert eingeben und anschließend über einen Button das Makro starten. Das klappt alles so, wie ich es mir vorstelle.
Allerdings ist es auf Dauer nervtötend, das der eingegebene Wert erst mittels Eingabetaste bestätigt werden muss. Jetzt suche ich nach einer Möglichkeit, das im Makro zu automatisieren, also bevor das eigentliche große Rechnen beginnt.
Hat jemand eine Umsetzungsidee?

MfG - dkledi

Re: Eingabebestätigung automatisieren

Verfasst: Fr, 18.01.2008 23:35
von Karolus
Hallo
Setze folgende Aufzeichnung der Tastenfolge ↓↑ an den Anfang deines Codes:

Code: Alles auswählen

sub godown_goup
' Recorded by Karo
' Date: Fri Jan 18 23:10:58 2008
' get access to the document
	oFrame = ThisComponent.getCurrentController().Frame
	oDispatcher = CreateUnoService("com.sun.star.frame.DispatchHelper")
	Dim mArgs3(1) As New com.sun.star.beans.PropertyValue
	mArgs3(0).Name = "By"
	mArgs3(0).Value = 1
	mArgs3(1).Name = "Sel"
	mArgs3(1).Value = False
	oDispatcher.executeDispatch(oFrame, ".uno:GoDown" ,"" ,0 ,mArgs3())
	oDispatcher.executeDispatch(oFrame, ".uno:GoUp" ,"" ,0 ,mArgs3())
end sub
Gruß Karo

Re: Eingabebestätigung automatisieren

Verfasst: Sa, 19.01.2008 10:55
von dkledi
Hallo Karo,
vielen Dank für Deinen Tip. Es ist genau das, was ich gesucht habe. Es funktioniert tadellos.
Also nochmals vielen Dank

MfG - dkledi