OpenOffice.info

Hi Komma4,

Dir natürlich auch ein [size=150][b][color=#008000]dickes Danke[/color][/b][/size] für die ausführliche Antwort

die werde ich dann gleich noch umsetzen und ausprobieren

Hallo
[quote]
ist das dann die universal "standard" abfrage/ adressierung für die niederwertigste Zelladresse eines Bereiches
und ist das auch gültig für den selten Fall das von recht nach links oder von unten nach oben markiert wurde ?[/quote]

Ja und ja.

Karo

Moin Karolus,

erst einmal Danke für die Antwort

und wie könnte es anders sein gleich noch zwei Nachfragen :lol:

ist das dann die universal "standard" abfrage/ adressierung für die niederwertigste Zelladresse eines Bereiches
und ist das auch gültig für den selten Fall das von recht nach links oder von unten nach oben markiert wurde ?

[quote]Du hast selbst erst kürzlich ein bis zwei Threads gestartet indem .startcolumn und .startrow verwendet wurden, wieso verwendest du diese Informationen nicht ? [/quote]
weil das auch nur "[b]geliehener[/b]" Code war und ich noch nicht beurteilen kann ob das der allgemein gültig Weg ist oder ob es andere Funktionen gibt die einfacher/besser oder schneller sind.

Zu eurem Leidwesen gehöre ich zu denen, die wenn schon,
dann aber auch ganz genau wissen wollen wie wo was geht .......
ich hoffe ihr verkraftet das noch eine Weile :lol:

Public Const cEinzelZelle   = "com.sun.star.sheet.SheetCell"
Public Const cVieleBereiche = "com.sun.star.sheet.SheetCellRanges"
Public Const cEinzelBereich = "com.sun.star.sheet.SheetCellRange"

' Zelle / Bereich / mehrere Bereiche ?
If	oSelection.supportsService( cEinzelZelle ) Then
' single cell
    DateTime_setZelle( oSelection )
ElseIf _
	oSelection.supportsService( cVieleBereiche ) Then
	' mehrere Bereiche
    For i = 0 To oSelection.getCount() - 1
      oEinBereich = oSelection.getByIndex(i)
      DateTime_setCalc( oEinBereich )
    Next
ElseIf _
	oSelection.supportsService( cEinzelBereich ) Then
' 	ein Bereich von Zellen
    DateTime_set1Bereich( oSelection )
End If

aZeilenNamen= split( Thiscomponent.getcurrentcontroller().getselection().RowDescriptions(0), " ") 
Print ThisComponent.getCurrentController().getSelection().getColumns().ElementNames(0) & aZeilenNamen(1)

sRow=oCelle.Row
sColumn=oCelle.column

Schau Dir doch mal den Code meiner Extension [url=http://extensions.services.openoffice.org/project/DateTime2]DateTime2[/url] an.


Zunächst habe ich dort die unterstützenden Services per Konstanten-String definiert
[code]
Public Const cEinzelZelle = "com.sun.star.sheet.SheetCell"
Public Const cVieleBereiche = "com.sun.star.sheet.SheetCellRanges"
Public Const cEinzelBereich = "com.sun.star.sheet.SheetCellRange"
[/code]

In der Bearbeitung stelle ich dann fest, ob eine Zelle, ein Bereich oder mehrere Bereich zu bearbeiten sind
[code]
' Zelle / Bereich / mehrere Bereiche ?
If oSelection.supportsService( cEinzelZelle ) Then
' single cell
DateTime_setZelle( oSelection )
ElseIf _
oSelection.supportsService( cVieleBereiche ) Then
' mehrere Bereiche
For i = 0 To oSelection.getCount() - 1
oEinBereich = oSelection.getByIndex(i)
DateTime_setCalc( oEinBereich )
Next
ElseIf _
oSelection.supportsService( cEinzelBereich ) Then
' ein Bereich von Zellen
DateTime_set1Bereich( oSelection )
End If
[/code]


Die erste Zelle (links oben) eines markierten Bereichs (unabhängig, welche Zelle mit dem Cursor aktuell markiert ist), erhälst Du bspw. mit:
[code]
aZeilenNamen= split( Thiscomponent.getcurrentcontroller().getselection().RowDescriptions(0), " ")
Print ThisComponent.getCurrentController().getSelection().getColumns().ElementNames(0) & aZeilenNamen(1)
[/code]


Noch ein Wort zu Namensgebung meiner Variablen.

Der erste Buchstabe des Variablennamens zeigt mir gleich, von welchem Typ die Variable ist:


[list]a Array
c Konstante (const)
i Integer
l Long/Double
o Objekt
s Zeichenkette (string)
[/list]



In Deinem Code [code]
sRow=oCelle.Row
sColumn=oCelle.column[/code]

ist das "s" irreführend, da hier kein STRING besetzt wird, sondern Objekte.

with thiscomponent.currentselection.rangeaddress
      erste_Spalte = .StartColumn
      erste_Zeile = .StartRow
end with

Hallo
1. Bei Dannenhöfer nachschauen und [url]http://www.dannenhoefer.de/faqstarbasic/CheckRange.html#CheckRange[/url] finden

2. Falls ..currentselection() [u]ein[/u] Zellbereich ist:
[code]with thiscomponent.currentselection.rangeaddress
erste_Spalte = .StartColumn
erste_Zeile = .StartRow
end with[/code]

Du hast selbst erst kürzlich ein bis zwei Threads gestartet indem .startcolumn und .startrow verwendet wurden, wieso verwendest du diese Informationen nicht ?

Gruß Karo

oCelle=oDoc.getCurrentSelection().getCellAddress()
sRow=oCelle.Row
sColumn=oCelle.column

"com.sun.star.sheet.SheetCellRange"

Hallo Komma4

werde ich dann auch gleich installieren
ich befürchte allerdings, so eine ProfiHilfe kann meine Basic SAU Fragen oft nicht verstehen und damit auch nicht beantworten :?

darum frage ich gern hier den Menschen :)

1.
die einzelne Zelle die durch den Rahmen markiert ist liest man mit
[code]oCelle=oDoc.getCurrentSelection().getCellAddress()
sRow=oCelle.Row
sColumn=oCelle.column[/code]
wie verhindere ich, den Makro-Fehler der entsteht
wenn dieser Code im Makro steht und bei Aufruf des Makro ein Bereich markiert ist ?

2.
markiert man einen Bereich wird mit
[code]"com.sun.star.sheet.SheetCellRange"[/code]
der Bereich ausgegeben also C5:H8
möchte ich hier nun nur C5 ansprechen, wie erreiche ich das,
denn der Fokus liegt normalerweise auf H8,
wenn man wie üblich von oben links nach unten rechts markiert?

ich möchte also die erste Zelle eines beliebigen markierten Bereich ermitteln und ansprechen
egal ob oder wo etwas auf bei Aufruf des Makro in der aktuellen Tabelle markiert war [size=150]?[/size]

xray ThisComponent.getCurrentController().getSelection()

[quote="clag"]kannst du mir kurz erläutern wie ich mit Xray etwas finden kann, ich dachte da müsste man eine Funktion eingeben und bekommt dann Info's dazu,[/quote]

Zunächst solltest Du zusätzlich das SDK installiert haben und XRAY den Pfad dazu bekannt geben.

Startpunkt kann dann [code]
xray ThisComponent.getCurrentController().getSelection()[/code]
sein, in der Anzeige auf eine der angezeigten Eigenschaften (properties) positionieren und Schaltfläche [b]Xray on the property/method[/b] klicken. Alternativ die Schaltfläche [b]SDK documentation[/b] auslösen.


Hilft das weiter?

mai phen rai !

[quote="clag"]aus irgend einem Grund wird die mittlere "Row" Zeile mit eine Basic Fehler beantwortet ? ElementNames nicht gefunden ?
die Column Zeile antwortet[/quote]
Sorry... das war aus dem Kopf... die Eigenschaft gibt's bei ROWS nicht (erste und dritte Zeile ist korrekt).


Bei einer Zelle ist [color=#008000].SupportedServiceNames[/color]
[color=#008000] "com.sun.star.sheet.SheetCell"[/color]
bei mehreren
[color=#008000] "com.sun.star.sheet.SheetCellRange"[/color]

oCelle=oDoc.getCurrentSelection().getCellAddress()
sRow=oCelle.Row
sColumn=oCelle.column

aus irgend einem Grund wird die mittlere "Row" Zeile mit eine Basic Fehler beantwortet ? ElementNames nicht gefunden ?
die Column Zeile antwortet

kannst du mir kurz erläutern wie ich mit Xray etwas finden kann, ich dachte da müsste man eine Funktion eingeben und bekommt dann Info's dazu,
dafür muss ich die doch zuerst mal namentlich kennen ?


edit
wieso funktioniert dies nur bei 1 Zelle ist ein beliebiger Bereich markiert gibt es auch Basic Gemecker

[code]oCelle=oDoc.getCurrentSelection().getCellAddress()
sRow=oCelle.Row
sColumn=oCelle.column[/code]

Hi

ja sieht erst einmal gut aus

ob es das gesuchte ist weist erst wenn ich eingebaut habe und das erwartete angezeigt wird :)
werde ich ja gleich sehen

wie unterscheidet man eine einzelne markierte Zelle und von der aktuellen nur mit dem Rahmen ?

Print ThisComponent.getCurrentController().getSelection().AbsoluteName
Print ThisComponent.getCurrentController().getSelection().Rows().ElementNames(0)
Print ThisComponent.getCurrentController().getSelection().Columns().ElementNames(0)

Wenn in einer Calc-Datei (davon reden wir?) ein Zellbereich (und kein anderes Objekt, wie Diagramm oder Grafik, oder Kontrollelement) markiert ist:


[code]Print ThisComponent.getCurrentController().getSelection().AbsoluteName
Print ThisComponent.getCurrentController().getSelection().Rows().ElementNames(0)
Print ThisComponent.getCurrentController().getSelection().Columns().ElementNames(0)
[/code]

So etwas findet man mit XRAY - oder der Suchfunktion 8)

Hilft Dir das?

Hallo Leutz,

ich hoffe ihr unterstellt mir nicht gleich wieder das Suchfaulfieber
aber meine Suche fördert nichts zu Tage was meine Frage beantwortet

wie ermittle ich die niederwertigste Zelladresse eines markierten Bereiches ggf einer einzelnen Zelle
von einer teilmarkierten Spalt die oberste von einer teilmarkierten Zeile die linkeste ;)
von einem Bereich die oberlinkste :lol:

Ihr versteht mich hoffentlich