Seite 1 von 1

Markierfeld: Referenzwert per Makro löschen

Verfasst: Do, 20.08.2015 16:53
von Jörg
Hallo Fachleute,
Nach dem Motto "Neuer Kunde Neue Runde" lösche ich per Makro die Refenzwerte in einigen verknüpften Zellen.
Danach ist auch der Haken raus und kann wieder gesetzt werden.
Meine Frage ist, ob das auf Dauer gut gehen kann oder ob OOO irgendwie durcheinander kommen könnte?
Bis jetzt ist nichts passiert.

Gruß Jörg

Re: Markierfeld: Referenzwert per Makro löschen

Verfasst: Do, 20.08.2015 18:07
von Stephan
Ich sehe da keine Probleme, habe aber keine Erfahrungen weil ich es vorziehe den Haken zu entfernen.


Gruß
Stephan

Re: Markierfeld: Referenzwert per Makro löschen

Verfasst: Fr, 21.08.2015 12:55
von Jörg
Hallo Fachleute,
@Stephan
Danke Dir für die Antwort. Deine Vorgehensweise ist natürlich professioneller.
Wollte es auch mal so versuchen, komme aber nicht weiter.

Code: Alles auswählen

sub Markierfeld
odoc = ThisComponent
osheet = odoc.sheets(2)

Dim i as integer
Dim sBNames (1 to 3) as String
sBNames(1) = "Erstverord"
sBNames(2) = "Folgeverord"
sBNames (3) = "Regelfall"
oForm = odoc.sheets().DrawPage.Forms(sbNames(i))
oControl = oForm.getByName(sbNames(i))
For i = 1 To 3
   if oControl.state=1 then
      oControl.state=0 
     
   endif

next i
end sub
Momentan meckert ooo diese Zeile an.

Code: Alles auswählen

oForm = odoc.sheets().DrawPage.Forms(sbNames(i))
Eigenschaft oder Methode nicht gefunden:Drawpage
Mir fehlt es halt an Wissen.

Vielleicht kannst Du ja mal drüberschaun.
Gruß Jörg

Re: Markierfeld: Referenzwert per Makro löschen

Verfasst: Fr, 21.08.2015 15:28
von komma4
Jörg hat geschrieben:

Code: Alles auswählen

oForm = odoc.sheets().DrawPage.Forms(sbNames(i))
Eigenschaft oder Methode nicht gefunden:Drawpage

Sheets() ist die Sammlung aller Tabellenblätter - die hat keine DrawPage.

Eine DrawPage findest Du aber bei jedem Sheet..., also:

Code: Alles auswählen

oDoc.Sheets().getByName("Tabelle1").getDrawPage()


verwende MRI zur Untersuchung Deiner Objekte (das kann sogar Code generieren!)

Re: Markierfeld: Referenzwert per Makro löschen

Verfasst: Do, 27.08.2015 14:28
von Jörg
Hallo Fachleute,
komme leider erst jetzt dazu zu antworten, sorry.
Habe die Extension heruntergeladen. Muß aber leider gestehen, dass meien Englischkenntnisse völlig unzureichend sind. :oops:
Trotzdem danke für den Hinweis.
Möchte meine Frage momentan auch nicht weiter verfolgen, da meine "Lösung" bis jetzt gut funktioniert.
Gruß Jörg