OpenOffice.info

Verfasst: **Mi, 02.01.2013 17:00**

Hallo,
Habe Variables auch "oben" definiert.
Zum Verständnis: http://wiki.openoffice.org/wiki/Documen ... _Variables

Gruß R

Verfasst: **Mi, 02.01.2013 17:27**

----------

Verfasst: **Mi, 02.01.2013 17:32**

eine sekündliche Überschneidung, hatte sie nochmal ausgetauscht ...

Du musst noch die Zeile

Code: Alles auswählen

XRAY solv

löschen, sonst kommt ohne XRAY eine Fehlermeldung ...

Verfasst: **Mi, 02.01.2013 17:44**

----------

Verfasst: **Mi, 02.01.2013 17:51**

Nö/ja/auch
durch die Definition als "Public Domain/öffentliche Variable" stehen die vorgefüllten Variables und Constraints jetzt nach dem ersten Durchlauf der functions noch zur Verfügung und werden im zweiten Durchlauf weiter ge"redim preserved".
Da sie öffentlich sind, kann man von überall darauf zugreifen und braucht sie nicht mehr zu übergeben.

Gruß R

Verfasst: **Mi, 02.01.2013 18:00**

----------

Verfasst: **Do, 03.01.2013 15:21**

----------

Verfasst: **Do, 03.01.2013 15:42**

Hi,

F3K Total hat geschrieben:Tipp: lerne XRAY oder MRI

ich wiederhole mich?

Installiere Xray
füge diesen Code in dein Makro ein:

Code: Alles auswählen

xray constraints

dann kannst Du selber gucken ...

: xray.png (43.33 KiB) 3383 mal betrachtet

Gruß R

Verfasst: **Do, 03.01.2013 16:10**

----------

Verfasst: **Do, 03.01.2013 16:18**

----------

Verfasst: **Do, 03.01.2013 16:28**

----------

Verfasst: **Do, 03.01.2013 16:30**

----------

Verfasst: **Do, 03.01.2013 18:40**

Servus

Offensichtlich schreibst Du erst ab Index 1 in Dein Constraints-Array. Starte stattdessen mit 0.

Verfasst: **Do, 03.01.2013 19:05**

Hallo,
das XRAY darf natürlich erst nach der Definition der Sonderbedingung kommen.

Code: Alles auswählen

'Nun die Sonderbedingung mit Ziffer 0
Constraints(0).Left = Allgemein.getCellRangeByName("Wert").CellAddress
Constraints(0).Operator = kleinergleich
Constraints(0).Right = Allgemein.getCellRangeByName("Limit").CellAddress
xray Constraints 
'Dem Solver die Constraints uerbergeben
solv.Constraints = Constraints()

Wenn ich dann in Xray auf Constraints(0).left gehe:

Code: Alles auswählen

Column                    long                                         3   
Row                       long                                         0   
Sheet                     short                                        0

Diese Adresse ist die der Zelle D1 auf Tabelle1, was wohl dem Namensbereich "Wert" entspricht!
und
Constraints(0).right

Code: Alles auswählen

Column                    long                                         1   
Row                       long                                         0   
Sheet                     short                                        0

Diese Adresse ist die der Zelle B1 auf Tabelle1, was wohl dem Namensbereich "Limit" entspricht!
Also alles wie es sein soll. Die weiteren Bedingungen schaust Du selber nach?
Edit: Kannst Du besser Französisch als Englisch? Xray gibt auch in Englisch
Gruß R

Verfasst: **Do, 03.01.2013 21:17**

----------

OpenOffice.info

-

Re: CalcSolver automatisch mit Variablen und Bedingungen fül

-

Re: CalcSolver automatisch mit Variablen und Bedingungen fül

-

Re: CalcSolver automatisch mit Variablen und Bedingungen fül

-

-

Re: CalcSolver automatisch mit Variablen und Bedingungen fül

-

-

-

-

Re: CalcSolver automatisch mit Variablen und Bedingungen fül

Re: CalcSolver automatisch mit Variablen und Bedingungen fül

-