Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: Datum mit Uhrzeit aus Zelle

Datum mit Uhrzeit aus Zelle
Snewi
Hallo,
ich habe den Syntax:
(TAG_VALUE.CLOCK Between {ts '2012-01-27 14:40:00'} And {ts '2012-01-27 15:35:00'}))"
ich würde jetzt gerne aus 2 Zellen und zwar A1 und A2 aus Tabelle1 jeweils die Zeit oben automatisch in den Syntax übernehmen!
Wie mache ich das?
gruß
Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Datum mit Uhrzeit aus Zelle
13.02.2012 09:02:59
Josef

Hallo snewi,
"(TAG_VALUE.CLOCK Between {ts '" Format(Range("A1"),"yyyy-MM-dd hh:mm:ss") & "'} And {ts '" Format(Range("A""),"yyyy-MM-dd hh:mm:ss") & "'}))"


« Gruß Sepp »

Anzeige
AW: Datum mit Uhrzeit aus Zelle
13.02.2012 09:08:07
Snewi
er meckert das Format an !?!?!?!
With Selection.ListObject.QueryTable
.Connection = Array(Array( _
"ODBC;DSN=stelo;UID=prd;;DBQ=prdel;DBA=W;APA=T;EXC=F;FEN=T;QTO=T;FRC=10;FDL=10;LOB=T;RST=T;BTD=F;BNF=F;BAM=IfAllSuccessful;NUM=NLS;" _
), Array("DPM=F;MTS=T;MDI=F;CSR=F;FWC=F;FBS=64000;TLO=O;"))
.CommandText = Array( _
"SELECT TAG_VALUE.CLOCK, TAG_VALUE.VAL" & Chr(13) & "" & Chr(10) & "FROM ELOPRD.TAG_INDEX TAG_INDEX, PRD.TAG_TO_DB TAG_TO_DB, PRD.TAG_VALUE TAG_VALUE" & Chr(13) & "" & Chr(10) & "WHERE TAG_TO_DB.NAME = TAG_INDEX.NAME AND TAG_VALUE.ID = TAG_TO_DB.ID AN" _
, _
"D ((TAG_TO_DB.ID=102) AND (TAG_VALUE.CLOCK Between {ts '" Format(Range("tab!B2"),"yyyy-MM-dd hh:mm:ss") & "'} And {ts '" Format(Range("tab!C2"),"yyyy-MM-dd hh:mm:ss") & "'}))" _
)
.Refresh BackgroundQuery:=False
End With
Anzeige
AW: Datum mit Uhrzeit aus Zelle
13.02.2012 09:10:52
Josef

Hallo Snewi,
zwei Mal die & vergessen;-((
"(TAG_VALUE.CLOCK Between {ts '" & Format(Range("A1"),"yyyy-MM-dd hh:mm:ss") & "'} And {ts '"  & Format(Range("A""),"yyyy-MM-dd hh:mm:ss") & "'}))"


« Gruß Sepp »

Anzeige
AW: Datum mit Uhrzeit aus Zelle
13.02.2012 09:24:28
Snewi
klappt super!
Wie würde das ganze denn aussehen wenn ich das mit variablen machen möchte die dann public wären?
AW: Datum mit Uhrzeit aus Zelle
13.02.2012 09:29:41
Josef

Hallo Snewi,
so?
' **********************************************************************
' Modul: Modul1 Typ: Allgemeines Modul
' **********************************************************************

Option Explicit

Public str1 As String
Public str2 As String

Sub Makro1()
  Dim strOut As String
  
  str1 = Format(Range("A1"), "yyyy-MM-dd hh:mm:ss")
  str2 = Format(Range("A2"), "yyyy-MM-dd hh:mm:ss")
  
  
  strOut = "(TAG_VALUE.CLOCK Between {ts '" & str1 & "'} And {ts '" & str2 & "'}))"
  
End Sub



« Gruß Sepp »

Anzeige
AW: Datum mit Uhrzeit aus Zelle
13.02.2012 09:55:56
Snewi
Suuuper genauso :-)
AW: Datum mit Uhrzeit aus Zelle
13.02.2012 09:59:06
Snewi
ach eine Frage noch wenn ich str1 und str2 auch in verschiedenen MAkros anwenden will wie mache ich es dann?
gruß
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige