Seite 1 von 1

"Gelöst" Zelle per Makro selektieren und anschließend einen Wert per Tastatur eintragen.

Verfasst: Do, 27.04.2023 16:23
von wasi
Hallo zusammen, bin hier neu und brauche Hilfe, bei einem simplen Problem. Zelle per Makro selektieren und anschließend einen Wert per Tastatur eintragen. Geht nicht! Mein Makro, teilweise aus OpenOffice.info entnommen.
Das Makro wir per Schaltfläche "Maustaste gedrückt" gestartet, dann möchte ich in die selektierte Zelle per Tastatur eine Zahl eintragen.
Die Zahl kann ich eintragen aber "Enter" geht nicht, sondern die Schaltfläche reagiert auf "Enter". :(
Gruß an alle die mir helfen können.

Code: Alles auswählen

sub zell_select
Dim oDoc As Object
Dim oSheet As Object
'#############
oDoc = ThisComponent
oSheet = oDoc.Sheets.getbyname("Tabelle3")
'#############
myView = oDoc.CurrentController
mycell =  oSheet.getCellByPosition(0,0)
myView.Select(mycell)
end sub

Re: Zelle per Makro selektieren und anschließend einen Wert per Tastatur eintragen.

Verfasst: Do, 27.04.2023 17:37
von F3K Total
Moin,
bearbeite die Eigenschaften der Schaltfläche, Reiter Allgemein, "Fokussieren bei Klick": Nein

Gruß R

Re: Zelle per Makro selektieren und anschließend einen Wert per Tastatur eintragen.

Verfasst: Do, 27.04.2023 19:48
von Karolus
Hallo
Man könnte auch die Schaltfläche nebst Makro im Restmüll entsorgen, und stattdessen:

Code: Alles auswählen

=HYPERLINK("#Tabelle3.A1")
nehmen.

Re: Zelle per Makro selektieren und anschließend einen Wert per Tastatur eintragen.

Verfasst: Fr, 28.04.2023 10:47
von wasi
F3K Total hat geschrieben: Do, 27.04.2023 17:37 Moin,
bearbeite die Eigenschaften der Schaltfläche, Reiter Allgemein, "Fokussieren bei Klick": Nein

Gruß R
Hallo F3K Total
Ich hoffe ich trage die Antwort hier richtig ein?
Danke für den Hinweis. Wie ich schon vermutet habe eine simple Sache. Aber man muss es eben wissen. Hat sofort funktioniert. :)
Tipp von Karolus kann ich noch nicht nachvollziehen. Aber werde es testen.

Wo trage ich jetzt ein, dass der Beitrag erledigt ist?
Gruß wasi