Hallo Leute
ich weiß nicht weiter mit DCount
Dim PersonSpalte1 As String
Dim PersonKKwert11 As Byte
PersonSpalte1 = DLookup("[Spalte1]", "DebekaUnterSetzenBlatt1")
PersonKKwert11 = DCount("[Kurzbezeichnung]", "KKTempAbfrageKKwert1", "[Kurzbezeichnung] = 'PersonSpalte1'")
MsgBox PersonKKwert11
MsgBox müßte 2 sein
zeigt aber 0
was mache ich falsch mit PersonSpalte1 :(
Danke Reiner ;) :)
Hallo Reiner,
Versuche:
PersonKKwert11 = DCount("[Kurzbezeichnung]", "KKTempAbfrageKKwert1", "[Kurzbezeichnung] = '" & PersonSpalte1 & "'")
hth
gruss ekkehard
Hallo Ekkehard
danken für deine schnelle Hilfe :)
klappt gut :)
gruß reiner :)