von F3K Total » Sa, 19.10.2013 23:33
Sodele,
man kann es sicherlich mit Calc-Funktionen erledigen, allein ich habe keine Lust, den Text zu zerlegen,
darum habe ich eine eigene Funktion geschrieben, die genau deinen Texttyp umwandelt:
Code: Alles auswählen
function epoche(A)
amonths = array("Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec")
aD = split(A," ")
for i = 0 to ubound(amonths)
if aD(2) = amonths(i) then sMonth = i+1
next i
epoche = (datevalue(aD(1)+"."+smonth+"."+aD(3)) + timevalue(aD(4))-25569)*24*60*60
End function
Geht so:
- Kopiere das Makro in die Makro-Bibliothek Standard, egal ob im Dokument oder unter meine Makros
- Dein Datum stehe in Zelle A2
- schreibe in B2:
- kanst Du herunterziehen wie jede Formel
- fertig
EDIT: Habe es jetzt doch noch mit Calc Funktionen gemacht:
Anbei eine Datei als Beispiel, beachte auch Tabelle2, dort steht neben der Monatsbezeichnung die Nummer der Monate, wird in Zelle D2 mit SVerweis ausgewertet.
EDIT2: habe die Funktion mit array statt case deutlich kürzen können
Viel Erfolg
Gruß R
- Dateianhänge
-
- epoche.ods
- (10.99 KiB) 284-mal heruntergeladen
Sodele,
man kann es sicherlich mit Calc-Funktionen erledigen, allein ich habe keine Lust, den Text zu zerlegen,
darum habe ich eine eigene Funktion geschrieben, die genau deinen Texttyp umwandelt:
[code]function epoche(A)
amonths = array("Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec")
aD = split(A," ")
for i = 0 to ubound(amonths)
if aD(2) = amonths(i) then sMonth = i+1
next i
epoche = (datevalue(aD(1)+"."+smonth+"."+aD(3)) + timevalue(aD(4))-25569)*24*60*60
End function[/code]
Geht so:
[list][*]Kopiere das Makro in die Makro-Bibliothek [color=#0040FF]Standard[/color], egal ob im Dokument oder unter meine Makros
[*]Dein Datum stehe in Zelle A2
[*]schreibe in B2:[code]= EPOCHE(A2)[/code]
[*]kanst Du herunterziehen wie jede Formel
[*]fertig[/list]
[color=#FF0000][b]EDIT:[/b][/color] Habe es jetzt doch noch mit Calc Funktionen gemacht:
Anbei eine Datei als Beispiel, beachte auch Tabelle2, dort steht neben der Monatsbezeichnung die Nummer der Monate, wird in Zelle D2 mit SVerweis ausgewertet.
[color=#FF0000][b]EDIT2[/b][/color]: habe die Funktion mit array statt case deutlich kürzen können
Viel Erfolg
Gruß R