[Excel] Brauch mal Hilfe zu einer Formel

usebb

Mitglied
Hallo alle


Wie muss die Formel aussehen damit das Ergebmiss mur einmal erscheint auch wenn mehere Zellen Leer sind!

=WENN(ISTLEER(Stammdaten!E4);"Bitte Stammdaten eingeben"; )
&WENN(ISTLEER(Stammdaten!E5);"Bitte Stammdaten eingeben"; )
&WENN(ISTLEER(Stammdaten!E6);"Bitte Stammdaten eingeben"; )
&WENN(ISTLEER(Stammdaten!E7);"Bitte Stammdaten eingeben"; )
&WENN(ISTLEER(Stammdaten!E8);"Bitte Stammdaten eingeben"; )
&WENN(ISTLEER(Stammdaten!E9);"Bitte Stammdaten eingeben"; )

lst sicher für viele einfach aber ich bin noch Anfänger !
 
Hallo usebb,

ändere deine Formel wie nachfolgend, die & bleiben weg.

=WENN(ISTLEER(E4);"Stamm eingeben";WENN(ISTLEER(E5);"Stamm eingeben";WENN(ISTLEER(E6);"Stamm eingeben";WENN(ISTLEER(E7);"Stamm eingeben";WENN(ISTLEER(E8);"Stamm eingeben";WENN(ISTLEER(E9);"Stamm eingeben";""))))))

Gruß

eko468
 
das funkzt ueber Makros und VBA:

Code:
Code in Arbeitsmappe einfügen:

Option Explicit
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Ende
End Sub

Private Sub Workbook_Open()
If ThisWorkbook.Worksheets("Tabelle1").Range("A1") = 10 Then ersteFarbe
End Sub

Code in ein Modul einfügen:

Code:
Option Explicit
Public ET As Variant

Sub ersteFarbe()
ThisWorkbook.Worksheets("Tabelle1").Range("A1").Interior.ColorIndex = 3
ET = Now + TimeValue("00:00:01")
Application.OnTime ET, "zweiteFarbe"
End Sub

Sub zweiteFarbe()
ThisWorkbook.Worksheets("Tabelle1").Range("A1").Interior.ColorIndex = 33
ET = Now + TimeValue("00:00:01")
Application.OnTime ET, "ersteFarbe"
End Sub

Sub Ende()
On Error Resume Next
Application.OnTime EarliestTime:=ET, Procedure:="ErsteFarbe", Schedule:=False
Application.OnTime EarliestTime:=ET, Procedure:="zweiteFarbe", Schedule:=False
ET = ""
End Sub
 

Neue Beiträge

Zurück