Re: [de-users] Calc -> Formular-Steuerelement -> Schaltfläche -> Zuweisung einer Tastenkombination

Am 18.12.2011 22:34, schrieb Jochen:
> Hallo,
>
> ich habe fertig (Quellcode s. unten).
> Mittels dieses Makro kann ein bestimmte Begriff (hier: "Suchbegriff")
> gefunden werden.
> Der Suchbegriff kann noch in einer InputBox zuvor abgefragt werden.
>
> Gruß
>
> Jochen
>
>
> sub Suchen_Ersetzen()
> oSheet =ThisComponent.sheets(0)
> Dim vDescriptor
> Dim vFound
> vDescriptor = oSheet.createSearchDescriptor()
> With vDescriptor
> .SearchString = "Heim"
> .SearchWords = false
> .SearchCaseSensitive = false
> .SearchBackwards = false
> End With
> vFound = oSheet.findFirst(vDescriptor)
> myDoc = thisComponent
> myView = myDoc.CurrentController
> Reihenzahl = vFound.getCellAddress.Row
> Spaltenzahl = vFound.getCellAddress.Column
> mycell = oSheet.getCellByPosition(Spaltenzahl,Reihenzahl)
> myView.Select(mycell)
> End Sub

Soll der Benutzer gezwungen sein, vorwärts zu suchen? Soll er gezwungen 
sein, auf Groß- und Kleinschreibung zu verzichten? Soll er gezwungen 
sein, auf ganze Zellen zu prüfen? Soll er bei einer weiteren Suche den 
Suchbegriff wieder neu in eine InputBox eingeben? Und was ist mit 
regulären Ausdrücken, Ähnlichkeitssuche und Suche nach Vorlagen?

Ich würde mich beschweren, wenn ich so bevormundet würde. Gut, ein 
Mausklick ist ein weiterer Weg zur Sehnenscheidenentzündung. Aber 
dagegen wurde ja die Tastenkombination erfunden.

Kopfschüttel.

Tschüss
Volker

--
Informationen zum Abmelden: E-Mail an users+help@de.libreoffice.org
Probleme? http://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
Tipps zu Listenmails: http://wiki.documentfoundation.org/Netiquette/de
Listenarchiv: http://listarchives.libreoffice.org/de/users/
Alle E-Mails an diese Liste werden unlöschbar öffentlich archiviert