Seite 1 von 1

scrollRow

Verfasst: Fr, 23.02.2007 15:38
von toni
Hallo zusammen,

in meinem Sheet befindet sich in Zeile 300 ein Button, der eine Plausiprüfung macht.
Wenn z.B. in Zelle A1 ein falscher Wert eingetragen wurde gibts eine Meldung. Ich möchte nun, dass die Zelle selektiert wird und die entsprechende Zelle für den Anwender sichtbar wird (scrollen in Zeile 1).
In VBA geht das mit:

Code: Alles auswählen

ActiveWindow.ScrollRow = ActiveWindow.ActiveCell.Row
Wie bekomme ich das mit Starbasic hin?

Gruss

Thomas

Verfasst: So, 25.02.2007 11:37
von hawkhunter2002
Ich denke, dass dir dieser Linke auf die Seite der StarBasic-Faq von Dannehöfer helfen müsste 8)

http://www.dannenhoefer.de/faqstarbasic ... Zelle.html

Sollte genau das machen was du willst.

Gruß hawk

Verfasst: Fr, 02.03.2007 16:26
von toni
Hallo hawk,

habe gerade deine Antwort gelesen.
Grundsätzlich klappt das auch bei mir.
Ich habe aber folgendes Problem:
Neben der Selektion der Zelle muss noch eine Meldung angezeigt werden:

Code: Alles auswählen

Sub sel
    Dim osheet, oZelle
      oSheet = ThisComponent.CurrentController.ActiveSheet    
      oZelle = oSheet.getCellRangeByName("A1")
      ThisComponent.CurrentController.Select(oZelle)          
      MsgBox "Meldung"
End Sub
Wenn ich diesen Code per Button ausführe (Button liegt z.B. in Zeile 100), springt die Anzeige nach Schließen der msgBox wieder in die Zeile 100, wo der Button liegt.
Ich möchte aber die Sicht auf Zeile 1 behalten.

Weiß jemand Rat?

Gruß

Thomas

Verfasst: Di, 06.03.2007 21:12
von hawkhunter2002
Hallo Thomas,

du musst einfach bei den Eigenschaften (rechte Maustaste Kontrollfeld) des Buttons - Reiter Allgemein - die Eigenschaft
"Fokussieren bei Klick" auf NEIN setzen. :)

Gruß

Hawk

Verfasst: Mi, 07.03.2007 08:38
von toni
Danke, klappt!

Gruss

Thomas