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

Hallo *,

ich bin einen Schritt weitergekommen. Ich kann jetzt die genaue 
Zell-Adresse bestimmen lassen (vFound.AbsoluteName)
Jetzt fehlt nur noch der Sprung in diese Zelle. hat da jemand einen Tipp 
für mich?

Gruß

Jochen


sub Suchen_Ersetzen()
 oSheet =ThisComponent.sheets(0)
 Dim vDescriptor
 Dim vFound
 vDescriptor = oSheet.createSearchDescriptor()
 With vDescriptor
    .SearchString = "Heim"
        'msgBox .SearchString
    .SearchWords = false
    .SearchCaseSensitive = false
    .SearchBackwards = false
  End With
  vFound = oSheet.findFirst(vDescriptor)
        msgBox vFound.AbsoluteName 'Zell-Adresse
End Sub

--
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