BITTE helfen Sie uns HEUTE mit einer SPENDE
Helfen Sie das OpenOffice Forum zu erhalten!
> KEINE WERBUNG FÜR REGISTRIERTE BENUTZER!<
Ihre Spende wird für die Deckung der laufenden Kosten sowie den Erhalt und Ausbau 🌱 des OpenOffice Forums verwendet.
🤗 Als Dankeschön werden Sie im Forum als OO-SUPPORTER gekennzeichnet. 🤗
Externe Daten dauerhaft in Calc speichern
Externe Daten dauerhaft in Calc speichern
Hallo,
ich habe eine Verknüpfung zu externen Daten (A4). Damit hole ich mir täglich die Aktienkurse der letzten 30 Tage.
Ist es möglich, diese Daten irgendwie automatisiert zu speichern ? Ich hätte gerne die Kurse von 1 Jahr.
Der Inhalt der Zeilen A5:H26 ändert sich täglich. Mit sverweis usw. komme ich irgendwie nicht weiter.
Man müsste den Zellenhalt als formatierten Text speichern?!?
Danke im Voraus
Gruß
ich habe eine Verknüpfung zu externen Daten (A4). Damit hole ich mir täglich die Aktienkurse der letzten 30 Tage.
Ist es möglich, diese Daten irgendwie automatisiert zu speichern ? Ich hätte gerne die Kurse von 1 Jahr.
Der Inhalt der Zeilen A5:H26 ändert sich täglich. Mit sverweis usw. komme ich irgendwie nicht weiter.
Man müsste den Zellenhalt als formatierten Text speichern?!?
Danke im Voraus
Gruß
- Dateianhänge
-
- Verknüpfung zu externen Daten.ods
- (21.85 KiB) 144-mal heruntergeladen
Re: Externe Daten dauerhaft in Calc speichern
Hallo,
Ich habe ein Makro aufgezeichnet, das die Daten in eine andere Tabelle kopiert.
Leider funktioniert bei mir die Aktualisierung nicht, Serverfehler
Gruß Kalk
Ich habe ein Makro aufgezeichnet, das die Daten in eine andere Tabelle kopiert.
Leider funktioniert bei mir die Aktualisierung nicht, Serverfehler
Gruß Kalk
- Dateianhänge
-
- Verknüpfung zu externen Daten.ods
- (12.92 KiB) 133-mal heruntergeladen
Gruß Kalk
Re: Externe Daten dauerhaft in Calc speichern
Hallo,
das Script kopiert immer wenn ich die Tabelle 2 verlasse die Daten von Tabelle 1 willkürlich in Tabelle 2.
Ich möchte die einzelnen Zeilen nach Datum speichern.
Bei der Aktualisierung der externen Daten kommt eine neue Zeile hinzu. Die letzte Zeile verschwindet.
Diese will ich aber behalten. Bis ich eben 1 Jahr zusammenhabe.
Gruß Dustin
das Script kopiert immer wenn ich die Tabelle 2 verlasse die Daten von Tabelle 1 willkürlich in Tabelle 2.
Ich möchte die einzelnen Zeilen nach Datum speichern.
Bei der Aktualisierung der externen Daten kommt eine neue Zeile hinzu. Die letzte Zeile verschwindet.
Diese will ich aber behalten. Bis ich eben 1 Jahr zusammenhabe.
Gruß Dustin
Re: Externe Daten dauerhaft in Calc speichern
Hallo,
die Zuweisung des Tabellenereignisses war ungünstig gewählt.
Das Problem ist, dass das Makro bereits läuft, bevor die Daten aktualisiert wird.
Mit einem Taster dem das Makro zugewiesen ist, funktioniert es halbautomatisch.
Für Makroprogrammierung gibt es ein Unterforum, mit Formeln ist das wahrscheinlich nicht zu machen.
Gruß Kalk
die Zuweisung des Tabellenereignisses war ungünstig gewählt.
Das Problem ist, dass das Makro bereits läuft, bevor die Daten aktualisiert wird.
Mit einem Taster dem das Makro zugewiesen ist, funktioniert es halbautomatisch.
Für Makroprogrammierung gibt es ein Unterforum, mit Formeln ist das wahrscheinlich nicht zu machen.
Gruß Kalk
- Dateianhänge
-
- Verknüpfung zu externen Daten (1).ods
- Makro geändert
- (13.68 KiB) 133-mal heruntergeladen
Gruß Kalk
Re: Externe Daten dauerhaft in Calc speichern
Moin,
hier noch eine von Hand geschriebene Version, bei Knopfdruck werden neue Daten auf die Tabelle "Jahresübersicht" übertragen.
Gruß R
hier noch eine von Hand geschriebene Version, bei Knopfdruck werden neue Daten auf die Tabelle "Jahresübersicht" übertragen.
Code: Alles auswählen
Sub Copy_new_Rows
Dim bfound as boolean
bFound = false
oSourceSheet = ThisComponent.Sheets.getbyName("Import")
oSourceRange = oSourceSheet.getCellRangeByName("A5:H26")
aData = oSourceRange.Dataarray
oTargetSheet = ThisComponent.Sheets.getbyName("Jahresübersicht")
oDateCell = oTargetSheet.getCellbyPosition(0,1)'Zelle A2
sDate = oDateCell.String
for i = 0 to uBound(aData)
if aData(i)(0) = sDate then
nRow = i
bFound = true
exit for
endif
next i
if not bFound then
if msgbox ("Das letzte Datum der Jahresübersicht ist in den importierten nicht Daten enthalten, es werden alle Daten angehängt",17,"Fehler") = 1 then
nRow = i
else
exit sub
endif
endif
redim Preserve aData(nRow-1)
oTargetSheet.Rows.insertByIndex( 1,nRow)
oTargetRange = oTargetSheet.getcellRangeByPosition(0,1,7,nRow)
oTargetRange.SetDataArray(aData)
aData(0)(0)
msgbox ("Die neuen Daten vom " & aData(nRow-1)(0) & " bis zum " & aData(0)(0) & " wurden in die Jahresübersicht übertragen!",64,"Erfolgreich")
end sub
- Dateianhänge
-
- Verknüpfung zu externen Daten.ods
- (15.57 KiB) 136-mal heruntergeladen
Windows 10: AOO, LO Linux Mint: AOO, LO
Re: Externe Daten dauerhaft in Calc speichern
F3K Total
Genau das wollte ich.
Danke.
Genau das wollte ich.
Danke.