Hi,
die Aufgaben beruhen auf einfachstem Anfängerwissen. Dazu braucht es nur 2 Formeln in C und E, eine eingebaute Excel-Funktion in H2 und eine einfache WENN in M2!
Ja das WENN bei M1 funkt bei mir leider nicht und da finde ich den Fehler nicht.
Meine Idee für M1 wäre
=WENN(K1:K3=M1;"Ja";"Nein")
oder ist das falsch???
Kannst du mir ein Beispiel geben was du meinst mit den 2 Formeln und welche Funktion wäre da ideal???
Danke für den Link. Na das wird morgen etwas.
Zur Info das haben wir gestern in 4 Stunden geschrieben
Code:
Sub sub_aus_ein()
tb = "NAME"
ze = "A1"
zahl1 = Sheets(tb).Range(ze).Cells(1, 1).Value
zahl2 = Sheets(tb).Range(ze).Cells(2, 1).Value
Sheets(tb).Range(ze).Cells(10, 1).Value = zahl1
Sheets(tb).Range(ze).Cells(11, 1).Value = zahl2
End Sub
--------------------------------
Sub sub_zahlen1()
tb = "NAME"
ze = "C1"
zahl = Sheets(tb).Range(ze).Cells(1, 1).Value
Sheets(tb).Range(ze).Cells(16, 1).Value = zahl
End Sub
--------------------------------
Sub sub_zahlen2()
tb = "NAME"
ze = "E1"
c = 2
d = 1
Anfang:
If c < 30 Then
Sheets(tb).Range(ze).Cells(d, 1).Value = c
c = c + 3
d = d + 1
GoTo Anfang
End If
End Sub
--------------------------------
Sub sub_zaehlen()
tb = "NAME"
ze = "G1"
zaehlwert = 1
Anfang:
wert = Sheets(tb).Range(ze).Cells(zaehlwert, 1).Value
If wert <> "" Then
zaehlwert = zaehlwert + 1
GoTo Anfang
End If
Sheets(tb).Range(ze).Cells(2, 2).Value = zaehlwert - 1
End Sub
--------------------------------
Sub sub_suche()
tb = "NAME"
ze = "K1"
a = 1
b = "Nein"
x = Sheets(tb).Range(ze).Cells(1, 3).Value
Anfang:
y = Sheets(tb).Range(ze).Cells(a, 1).Value
If y <> "" Then
If (y = x And b = "Nein") Then
b = "Ja"
End If
a = a + 1
GoTo Anfang
End If
Sheets(tb).Range(ze).Cells(2, 3).Value = b
End Sub
--------------------------------