jutta hat geschrieben:Es soll ja am Wochenende regnen
Kommt auf die
location an [Vorhersage hier (8°52'55"N 98°16'1" E): 32° und Sonnenschein]***.
OK:
aufgezeichnete Makros sind
dispatcher calls.
Sie sind weder zwingend vollständig, noch (immer) korrekt.
Ich verwende UNO APIs.
Schritt für Schritt:
ThisComponent ist die Komponente, welche gerade aktiv angezeigt wird. Könnte auch ein Dokument anderen Typs sein, die BASIC-IDE oder die Onlinehilfe (dann passen die folgenden Anweisungen aber nicht und der Code gibt eine Fehlermeldung aus).
Diese wird der Variablen
oDoc zugewiesen.
Daraus leitet sich in den folgenden Anweisungen das erste Tabellenblatt (
oSheet) ab (Indices beginnen i.A. bei Null)
Von diesem Blatt wird das Objekt der Zelle A1 (Index: 0 ! - wie gelernt, Name
oCell) ermittelt, dann ein "Text"-Objekt dieser Zelle.
Zum
oDoc wird nun ein Objekt des Typs "Hyperlink" erzeugt
Dieses hat Eigenschaften, wie die Ziel-URL, und die sichtbare Darstellung (
representation). Diesen Eigenschaften werden die Werte zugewiesen: URL eben in der benötigten Schreibweise, Anzeigetext wie gewünscht.
Zum Schluss wird das so besetzte Objekt in die Zelle gesetzt; dazu ist Programmiersprachen-abhängig ein Textcursor notwendig.
Für den Link zu einer Grafik nimmst Du wohl einen Dateiverweis:
file:///home/user/bild.png
Um die "richtige" Schreibweise einer URL-Adresse zu ermitteln steht Dir eine Funktion aus der Bibliothek
TOOLS (die zunächst geladen werden muss) zur Verfügung:
Code: Alles auswählen
' laden zum Nutzen von Standardfunktionen
GlobalScope.BasicLibraries.LoadLibrary( "Tools" )
sURL_Bild = ConvertToURL( "d:\daten\bild.png" )
' ergibt: file:///d:/daten/bild.png
Ich hoffe das war verständlich.
*** zum Trotz (für alle Frierenden in D-Land): Sonntag abend ist mein Urlaub zu Ende und dann gehöre ich auch wieder zu denen, denen 20 Grad auf dem Thermometer fehlen