Tabellen-Namen

[MaximilianWe]

Ich haber verschiedene Basicprogramme, die natürlich nur jeweils für eine bestimmte Tabelle (Tabelle/Tabellenblatt) gültig und sinnvoll sind.
Ohne besondere Vorkehrung "funktionieren" diese Programme jeweils mit dem aktuellen Tabellenblatt, oihne Rücksicht darauf, ob es das richtige ist.
Ich denke nun an Abhilfe, derart, den einzelnen Tabellen einen Namen zuzuordnen und diese Namen mit den dafür gültigen Basicmodulen zu verknüpfen ( beim Aufruf des Programmes zu prüfen).
Wie geht das; ich finde da nicht so recht durch.

Mfg
Max

[komma4]

den einzelnen Tabellen einen Namen zuzuordnen und diese Namen mit den dafür gültigen Basicmodulen zu verknüpfen ( beim Aufruf des Programmes zu prüfen).

Wenn die Namen eindeutig sind, dann kannst Du sie während der Laufzeit abfragen:

Code: Alles auswählen

print StarDesktop.CurrentComponent.CurrentController.ActiveSheet.Name

Ansonsten musst Du ggfs. bspw. noch den Dateienamen mit prüfen.

Hilft Dir das weiter?

[MaximilianWe]

Danke Winfried, aber ich habe mich wahrscheinlich falsch ausgedrückt.
Wie vergebe ich einer Tabelle einen eindeutigen Namen, mit dem ich in Calc dann weiter operieren kann ( z.b. im zugehörigen Basicprogramm für die Tabelle, diesen Namen abchecken).
z.B.
main
REM....Prüfen ob richtige Tabelle geladen....
....
if tabellenname = programmname then.......
und dann das Programm o.ä.

Max

[komma4]

Du kannst doch nach gezeigtem Beispiel einen Namen für das Tabellenblatt vergeben (bspw. hugo4711) und diesem im Code prüfen

Code: Alles auswählen

If NOT ( StarDesktop.CurrentComponent.CurrentController.ActiveSheet.Name = "hugo4711" Then
   Exit Sub
End If

...oder was verstehe ich nicht?

[MaximilianWe]

irgendwie steheich auf der Leitung. Aber ich mache es jetzt so:
in Spalte A Zeile1 gebe ioch jeder Tabelle einen Namen.Ddas dazhugehörige Programm püft einfach, ob in A1 der richtige Name steht.
Danke nochmals.

Max

Ich habe mich jetzt auch nopch in die Initialisierung eines Arrays verbsissen. Habe ich als neue Frage formuliert.

[komma4]

in Spalte A Zeile1 gebe ioch jeder Tabelle einen Namen

Oder so...

Ich dachte, Du möchtest den Tabellen-Namen (s. Titel) ändern, von "Tabelle1" auf einen eindeutigen Namen (den Du nun in Tabelle1.A1 schreibst).

Nun fragst Du den Inhalt der Zelle ab, mein Code-Beispiel fragt den Tabellen-Namen ab