title image


Smiley Re: bei leeren Zellen Aktion nicht ausführen
geht sowas nicht...



DaFehltWas = False

For x = 2 To 4

If shtXY.Cells(2, x) = "" Then

DaFehltWas = True

End If

Next

If DaFehltWas Then MsgBox "Da fehlt was" Else Call Sub_Speichern



Gruß

Boris

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: