Registriert seit: 08.10.2017
Version(en): 2017
Hallo zusammen,
wo liegt hie mein Fehler ? Daanke
If Sheets("Frei").Range("V16").value = 1 or
Sheets("Frei").Range("AS16").Value = 1
Then
Sheets("Frei").Range("R16").Value = ""
Else
Sheets("Frei").Range("R16").Value = 1
End If
Registriert seit: 15.08.2017
Version(en): 2016
11.01.2018, 10:53
(Dieser Beitrag wurde zuletzt bearbeitet: 11.01.2018, 11:06 von Guschti.)
Hallo
Ich glaube so .....
Code:
Sub Test()
If Sheets("Frei").Range("V16").Value = 1 Or _
Sheets("Frei").Range("AS16").Value = 1 Then
Sheets("Frei").Range("R16").Value = ""
Else
Sheets("Frei").Range("R16").Value = 1
End If
End Sub
Mfg Guschti
Registriert seit: 13.04.2014
Version(en): 365, 2019
Hi,
die .Value kann man weglassen!
Gruß
Edgar
Meine Antworten sind freiwillig und ohne Gewähr!
Über Rückmeldungen würde ich mich freuen.
Registriert seit: 08.10.2017
Version(en): 2017
Registriert seit: 17.04.2014
Version(en): MS Office 365(32)
(11.01.2018, 11:09)BoskoBiati schrieb: die .Value kann man weglassen!
... muss man aber nicht! (
Default: Kleines Wort - Grosse Wirkung)
