OpenOffice.info

=VLOOKUP(VALUE(TEXT(M13+M14;"MM/DD/YY HH:MM AM/PM"));A1:G14;7;0)

@clag
sorry, hab grad deine Datei so wie sie ist, in ein englisch engestelltes LO geöffnet, und da funktioniert sie.



@Deli
Meine englische Formel musst Du wie folgt ändern.
[code]
=VLOOKUP(VALUE(TEXT(M13+M14;"MM/DD/YY HH:MM AM/PM"));A1:G14;7;0)
[/code]
Jetzt müsste alles funzen. Hoffentlich *mal-ein-gebet-einlegen* :)



Gruß
balu

Hallo Balu,


[quote="clag"]also in "deutsch" nachgebaut [/quote]
hatte ich doch geschrieben oder nicht und in deutsch ist Komma üblich oder

[quote="balu"]@clag
Du gehst davon aus, das man bei den Mehrstelligen "Zahlen" -{Min, Max, Avg}- ganz einfach den Punkt durch ein Komma tauschen kann. Wo steht das geschrieben? Also ich finde hier dazu nix.[/quote]
ich versteh deine Aufregung nicht.

=SVERWEIS(WERT(TEXT(M13+M14;"TT.MM.JJ HH:MM"));A1:G14;7;0)

=VLOOKUP(VALUE(TEXT(M13+M14;"TT.MM.JJ HH:MM"));A1:G14;7;0)

Mahlzeit,

@clag
Du gehst davon aus, das man bei den Mehrstelligen "Zahlen" -{Min, Max, Avg}- ganz einfach den Punkt durch ein Komma tauschen kann. Wo steht das geschrieben? Also ich finde [u]hier[/u] dazu nix.

Und wenn Du mal in deiner Datei bei den betroffenen "Zahlen" das Komma wieder durch einen Punkt tauscht, was passiert dann?
Richtig!
Es wird wieder Null (0) in deiner Formel ausgegeben.

Mit anderen Worten, SUMMENPRODUKT ist so nicht anwendbar und nicht passend geeignet.


@Deli
Also in der "deutschen" schreibweise funktioniert bei mir folgende Formel.
[code]
=SVERWEIS(WERT(TEXT(M13+M14;"TT.MM.JJ HH:MM"));A1:G14;7;0)
[/code]

Und hier die hoffentlich korrekt übersetzte englische Formel.
[code]
=VLOOKUP(VALUE(TEXT(M13+M14;"TT.MM.JJ HH:MM"));A1:G14;7;0)
[/code]
Ich hoffe das sie bei dir auch funktioniert.
Viel Erfolg. :D



Gruß
balu

Hi

also in "deutsch" nachgebaut funktioniert die Formel sauber

[attachment=0]sumproduct_fehler.ods[/attachment]

Hi,
@clag
[quote]vielleicht reicht es auch M13 in M14 zu ändern[/quote]Das reicht mit Sicherheit nicht - wenn überhaupt, dann müssten die Kommata in Semikolons umgewandelt werden.
Außerdem steht wie von Deli geschrieben, das Datum im M13 und da wird man doch wohl mit Day() auch auf M13 zugreifen müssen - oder hab ich da wieder was übersehen :?

Gruß
paljass

Hallo Delilah,

wie wäre es wenn du eine Beispieldatei, die das Problem zeigt, zur Verfügung stellst?!


hi
vielleicht reicht es auch M13
=SUMPRODUCT(DAY(A5:A18)=DAY([color=#FF0000]M13[/color]),HOUR(A5:A18)=HOUR(M14),MINUTE(A5:A18)=MINUTE(M14),G5:G18)
in M14 zu ändern ;)

While myZaehler < 73
' Berechnungen ...

WEnd 'Verlassen der Schleife, wenn Zielwert erreicht

[quote="mfreye"]ein ' voran gestellt, dann kann ich damit "normal" rechnen.[/quote]
"Rechnen" eher nicht: durch den Apostroph erzwingst Du ein Textformat, und kannst eben nicht mehr "rechnen" ... [/nitpicker]

Besorge Dir [url=http://www.pitonyak.org/oo.php]Andrews Makrodokument[/url], um (unter anderem) die korrekte Syntax zum Auswählen von Blättern oder Zellen zu erlernen. (viele Beispiele auch hier im Forum)


Und: [color=#008000]GOTO[/color]-Anweisungen sind verpöhnt, benutze eine WHILE-Schleife:
[code]

While myZaehler < 73
' Berechnungen ...

WEnd 'Verlassen der Schleife, wenn Zielwert erreicht[/code]

Viel Erfolg!

REM  *****  BASIC  *****

Sub Main
Dim myDate, myTime As Variant
Dim myZaehler As Integer

myDate = Date  'myDate setzen
myTime = Time  'myTime setzen
myZaehler = 1  'myZaehler setzen

Schleife_Zaehler:

 myTime = Format(DateAdd("h", -myZaehler + 1, Time), "hh:00:00")  'myTime setzen und Format bestimmen
 
 If myTime = "23:00:00" Then  'myTime "23:00:00" dann
 myDate = DateAdd("d", -1, Date)  'myDate um einen Tag runterzählen
 End If
 
[b] Sheets("Wetterdaten_sammeln").Select  'Gehe nach Tabellenblatt "Wetterdaten_sammeln"
 Range("A" & myZaehler & " ").Select  'Gehe nach Zelle "A" und "myZaehler"
 ActiveCell.FormulaR1C1 = "'" & myDate & " " & myTime  'als Text einfügen "Datum und Uhrzeit"[/b]
 
 myZaehler = myZaehler + 1  'myZaehler erhöhen um "1"
 
If myZaehler < 73 Then  'myZaehler "< 73" dann
 Goto Schleife_Zaehler  ' Gehe nach Marke "Schleife_Zaehler"
End If  'Schleife beenden

End Sub

Hallo und Danke für die Hilfe.

Habe meine CSV Datei geändert und ein ' voran gestellt, dann kann ich damit "normal" rechnen.

Jetzt habe ich aber in einem Makro ein Problem:

[code]REM ***** BASIC *****

Sub Main
Dim myDate, myTime As Variant
Dim myZaehler As Integer

myDate = Date 'myDate setzen
myTime = Time 'myTime setzen
myZaehler = 1 'myZaehler setzen

Schleife_Zaehler:

myTime = Format(DateAdd("h", -myZaehler + 1, Time), "hh:00:00") 'myTime setzen und Format bestimmen

If myTime = "23:00:00" Then 'myTime "23:00:00" dann
myDate = DateAdd("d", -1, Date) 'myDate um einen Tag runterzählen
End If

[b] Sheets("Wetterdaten_sammeln").Select 'Gehe nach Tabellenblatt "Wetterdaten_sammeln"
Range("A" & myZaehler & " ").Select 'Gehe nach Zelle "A" und "myZaehler"
ActiveCell.FormulaR1C1 = "'" & myDate & " " & myTime 'als Text einfügen "Datum und Uhrzeit"[/b]

myZaehler = myZaehler + 1 'myZaehler erhöhen um "1"

If myZaehler < 73 Then 'myZaehler "< 73" dann
Goto Schleife_Zaehler ' Gehe nach Marke "Schleife_Zaehler"
End If 'Schleife beenden

End Sub[/code]

Problem ist das Fett geschriebene, in Excel wäre das so richtig, aber in OO ist es wohl anderes?!

Danke für die Hilfe!

MfG
MFreye

Hallo,

[quote="mfreye"]Habe schon versucht die Zellen entsprechend zu formatieren, aber auch dort ging es mit einen sverweis nicht?[/quote]

Eine Formatierung verändert nur die Anzeige, aber nicht das, womit in den Zellen gerechnet wird, das klappt so leider nicht.

Beim SVerweis hast du als allerletztes einen Parameter, der angibt, ob die Liste sortiert oder unsortiert vorliegt (dann steht da eine Null). Wenn Du also eine 1 eingibst, dann "wird der letzte Wert, der kleiner als das Kriterium ist, zurückgegeben." (OO-Hilfe) Das bedeutet aber in Deinem Fall, daß bei 18 Uhr der Wert von 17 Uhr ausgegeben wird, erst ab 18:28 Uhr wird der gewünschte ausgespuckt. Ein anderer Nachteil ist, daß Du immer den vollen Tag und die Uhrzeit in eine Zelle eingeben mußt, was meiner Meinung nach ein bißchen umständlich ist.

Ich würde wohl eher mit Summenprodukt arbeiten. In eine zusätzliche Zelle (z.B. D1) schreibst Du das gewünschte Datum, in eine andere (z.B. D2) die Uhrzeit. Dann wäre die Formel

=SUMMENPRODUKT(TAG(Datumsspalte)=TAG(D1);MONAT(Datumsspalte)=MONAT(D1);JAHR(Datumsspalte)=JAHR(D1);STUNDE(datumsspalte)=D2;Wertespalte)

wobei zu beachten ist, daß die Bereiche gleich groß sein müssen. Das sollte wesentlich einfacher zum Handhaben sein.

Viele Grüße
AhQ

Hallo zusammen,

wie bekomme ich es folgendes hin.

A1 = 15.12.2008 17:37:55 B2 = 5,6
A1 = 15.12.2008 18:27:25 B2 = 5,7
A1 = 15.12.2008 19:31:35 B2 = 5,3
A1 = 15.12.2008 20:32:15 B2 = 5,4
usw...

Ich möchte jetzt mit einen sverweis eine Abfrage machen.

Wenn Datum 15.12.2008 und Uhrzeit 18, dann sollte das Ergebnis 5,7 heraus kommen.

Also die Minuten und Sekunden sollen ignoriert werden.

Habe schon versucht die Zellen entsprechend zu formatieren, aber auch dort ging es mit einen sverweis nicht? Wird die Formatierung überhaupt unterstützt?

MfG
MFreye