Ich finde meinen fehler nicht

Forumthread: Ich finde meinen fehler nicht
6 Beiträge zu diesem Forumthread
Anzeige
VBA Beispiele zu verwandten Themen

Forumthread: Ich finde meinen fehler nicht

16.11.2022 13:47:39

Pieter

If txtgas.Text = 4 Then
suchequartal ("01.10.22")
'1.10-31.12
End if
End Sub
Function suchequartal(datumsuche As String)
Range("G:ZZ").Clear

6
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Ich finde meinen fehler nicht

16.11.2022 13:53:19

Pieter
aber ich

16.11.2022 13:54:10

Rudi
AW: aber ich

16.11.2022 13:57:25

Pieter
OK, würde funktionieren aber...

16.11.2022 14:03:58

Rudi
AW: aber ich

16.11.2022 13:58:45

Pieter
AW: Ich finde meinen fehler nicht

16.11.2022 14:08:39

peterk

AW: Ich finde meinen fehler nicht

16.11.2022 13:53:19

Pieter

Ich kmme nicht auf meine Function obwohl der If befehl in die schleife geht ?!!!

aber ich

16.11.2022 13:54:10

Rudi

Hallo,
der Fehler liegt in suchequartal("1.10.22")
Functions geben Werte zurück. Ergo müsste der Aufruf
DieVariable=suchequartal("1.10.22")
lauten.
In einer Function sollte man niemals Aktionen (Range("G:ZZ").Clear) durchgeführt werden.
Gruß
Rudi

AW: aber ich

16.11.2022 13:57:25

Pieter

Das hat eben noch funktioniert, ://///

OK, würde funktionieren aber...

16.11.2022 14:03:58

Rudi

...sauber ist das nicht.
Der Fehler muss woanders sein. Beispielmappe?
Gruß
Rudi

AW: aber ich

16.11.2022 13:58:45

Pieter

Hat leider nicht funktioniert, will in die Function rein..