Excel Abfrage

15/10/2007 - 10:43 von Bruno Thurnherr | Report spam
Gueten Morgen

Ich versuche mit der Funktion if / else folgendes Problem zu lösen...nur bei
mir happert noch etwas mit dem Verstàndnis

Aufgabenstellung:
Ich habe 4 Zellen welche A1 --> A4

Wenn A1 mit einem x gefüllt wird soll im Feld A6 eine 4 erscheinen
Wenn A2 mit einem x gefüllt wird soll im Feld A6 eine 3 erscheinen
Wenn A3 mit einem x gefüllt wird soll im Feld A6 eine 2
erscheinen
Wenn A4 mit einem x gefüllt wird soll im Feld A6 eine 1
erscheinen

Wichtig und wahrscheinlich auch der Knackpunkt..so gehts mir es darf nur ein
Wert
erscheinen wenn nur eines der 4 Felder mit einem X ausgefüllt ist...sobald 2
Felder mit X Ausgefüllt werden soll eine Meldung mit "nur ein Feld ausfüllen"
erscheinen.

Es wàre super wenn Ihr mir einen Tipp hàttet. Mir ist auch nicht ganz klar
wie ich es dann für das Feld unten dran machen würde B1 etc.

Danke und lg
Bruno
 

Lesen sie die antworten

#1 Alex
15/10/2007 - 11:08 | Warnen spam
Servus,

Der Code folgende Code gibt Dir hoffentlich eine Anregung, falls nicht
einfach noch mal fragen. In diesem Code ist nur die If Anweisung für
einen Wert in Zelle A1. Musst halt dann noch erweitern

Gruß Alex


Code:

Dim TBlatt As Worksheet
Set TBlatt = ThisWorkbook.Worksheets("Tabelle1")

If TBlatt.cells(1,1).value <> "" And TBlatt.cells(1,2).value = "" _
And TBlatt.cells(1,3).value = "" And
TBlatt.cells(4,1).value = "" _
Then TBlatt.cells(6,1).value = TBlatt.cells(1,1).value
Else

Msgbox("Nur ein Feld ausfüllen")

End if

Ähnliche fragen