Gänsefüßchen

[Ich Bins]

Hallo zusammen,

in Anlehnung an das Beispiel
http://www.starbasicfaq.de/Wiekannmanmi ... eineZ.html
versuchte ich erfolglos die Formel
=INDIREKT("'"&Tabellen.A4&"'!"&"D134")
in eine Zelle einzutragen.

Code: Alles auswählen

Sub Formel
  myDoc = thisComponent
  mySheet = myDoc.sheets(4)
  mycell = mysheet.getCellByPosition(3,6)
  mycell.FormulaLocal = "=INDIREKT("'"&Tabellen.A4&"'!"&"D134")"
End Sub

Die Formel an sich enthält schon einige Anführungszeichen und vermutlich sind noch weitere innerhalb des Codes in die Formel einzutragen - nur welche und wo?

Ebenfalls erfolglos war der Umweg über

Code: Alles auswählen

  myFormel = "=INDIREKT("'"&Tabellen.A4&"'!"&"D134")"
  myCell.FormulaLocal = myFormel

Viele Grüße
Ich Bins

[karolus]

Welches Zeichen steht denn normalerweise zwischen Tabellenname und dem Rest der Adresse?!
Soweit ich mich erinnere ist das doch ein .punkt und kein !Ausrufezeichen.

nach meine Glaskugel möchtest du wahrscheinlich:
"=INDIREKT(Tabellen.A4&"".D134"")"

[Ich Bins]

Hallo karolus,

das ! ist vermutlich noch ein Überbleibsel aus Excel. (Seit mind. 5 Jahren nutze ich kein Excel mer. Die aktuelle Calc-Datei ist eine Weiterentwicklung einer Excel-Datei, die ich vor Jahren eigentlich bereinigt zu haben.

Was Du in Deiner Glaskugel sehen konntest war die Lösung - funzt direkt und auch über den Umweg mit der Variable.

Code: Alles auswählen

myCell.FormulaLocal = "=INDIREKT(Tabellen.A4&"".D134"")"

Auch ohne Glaskugel kannst Du mir sicherlich sagen wo man, wenn man die 4 in Tabellen.A4 durch die Variable z ersetzen möchte zusätzlich zu +z+ noch Anführungszeichen setzen muss?

Code: Alles auswählen

myCell.FormulaLocal = "=INDIREKT(Tabellen.A+z+&"".D134"")"

[karolus]

Ich könnte wenn ich wollte… frohe Weihnachten!

[Ich Bins]

Manchmal findet ein blindes Huhn auch ein Korn.
Falls hier jemand bei der Suche vorbeikommt ist hier die Lösung.

Code: Alles auswählen

myCell.FormulaLocal = "=INDIREKT(Tabellen.A"+x+"&"".D134"")"

Auch Dir frohe Weihnachten und vielen Dank für Deine Hilfe.