Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
19.04.2024 17:05:40
Zählen von Zeilen, in denen in bestimmten Bereich Daten sind
19.04.2024 16:34:52
gemeinsamer Filter über drei Spalten
19.04.2024 15:39:42
Exceltabelle daten per combobox zu word Datei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
328to332
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
328to332
328to332
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

[MAKRO] Wenn, dann schreibe

[MAKRO] Wenn, dann schreibe
28.10.2003 20:24:14
Chris
Hallo!

Ich habe folgendes Problem:
Eigentlich brauche ich nur die WENN-Funktion mit einer kleiner Änderung. Ich möchte nur, dass wenn eine bestimmte Bedinung wahr ist, der DANN-Wert in eine fremde Zelle geschrieben wird. Momentan wird ja der Dann-Wert in die Zelle eingetragen, in der auch die Funktion selbst steht.

Ich würde mich sehr freuen, wenn mir jemand weiterhelfen könnte...

13
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: [MAKRO] Wenn, dann schreibe
28.10.2003 20:50:50
Franz B
Hi Chris,

schreibe doch die WENN Formel in die Zelle wo die DANN Funktion benötigt wird.

Gruß Franz
AW: [MAKRO] Wenn, dann schreibe
28.10.2003 20:56:42
Chris
Das Problem ist, dass sich die Funktion bei Eingabe eines Wertes dann selbst überschreibt...
AW: [MAKRO] Wenn, dann schreibe
28.10.2003 21:43:05
FranzB
Hi Chris,
wenn ich dich richtig verstehev, steht der zu prüfende wert z.B. in A1 und das Ergebnis soll dann A1 überschreiben. Wenn ja Versuche folgendes. 


Sub wenndann()
If Range("A1").Value = dein Wert Then
Range("A1").Value = "dein Ergebnis"
End If
End Sub


Gruß Franz
AW: [MAKRO] Wenn, dann schreibe
28.10.2003 22:10:24
Chris
Hi Franz!

Ich glaube, mein Problem ist etwas komplizierter, da ich mehrere Bedingungen prüfen muss...

Da ich kein VBA kann, muss ich es mal so beschreiben:
Ich brauche eine Funktion, der man eine Funktion wie ODER(bedingung-1, bedingung-2,...,bedingung-n) übergibt. Ich möchte also überprüfen, ob immmer verschiedene Zellwerte eine "1" enthalten. Ist in einer der Zellen eine 1 vorhanden, dann soll die Funktion in eine andere Zelle ein "X" schreiben.

z.B:
Zelle A1 enthält die "Überwachungsfunktion". Diese Funktion prüft, ob in den Zellen A3, A4 und A"was-weiß-ich" eine 1 steht. Wenn dies der Fall ist, dann wird ein "X" in die Zelle A2 geschrieben.
Dabei wäre es sehr schön, wenn man der Funktion sagen könnte, in welche Zelle das X geschrieben werden sollte.

Sozusagen so WENN(J14=1;J13=X) Es soll dann halt nicht "J13=X" in die Zelle geschrieben werden, in der die Formel steht, sondern in die Zelle J13 soll das X geschrieben werden.
Anzeige
AW: [MAKRO] Wenn, dann schreibe
28.10.2003 22:34:41
FranzB
Hi Chris,

scheint doch etwas komplizierter zu sein, nach dem letzten Satz verstehe ich das so, das zwischen jedem zu überprüfenden wert eine leerzelle ist. Dann müsste es so gehen ansonsten schicke mir mal eine Test datei.


Sub wenndann()
Dim i As Integer
For i = 1 To 50
If Cells(i, 1) = 1 Then
Cells(i - 1, 1) = "x"
End If
Next
End Sub


Gruß Franz
AW: [MAKRO] Wenn, dann schreibe
28.10.2003 22:39:32
Chris
Nee... So war das nicht gedacht. Ich möchte mit der Funktion jedes Mal x-beliebig viele Zellen überprüfen. Wie mit der Funktion ODER() - mit Semikolon getrennt.
Wenn die Gesamtaussage wahr ist: das heißt, wenn in irgendeiner der vielen Zellen eine 1 steht, dann soll in genau eine andere Zelle ein X geschrieben werden. Deswegen in einer anderen Zelle, da ich nicht möchte, dass die Zelle mit der Überwachungsfunktion überschrieben werden kann.
Anzeige
AW: [MAKRO] Wenn, dann schreibe
28.10.2003 22:58:44
Franz B
Hallo,

noch eine Versuch entweder in A1 = =WENN(SVERWEIS(1;A3:A20;1;FALSCH);"X";"")
und in A2 = A1 und A1 ausblenden.

oder 


Sub wenndann()
Dim i As Integer
For i = 1 To 50
If Cells(i, 1) = 1 Then
Cells(2, 1) = "x"
End If
Next
End Sub


Mfg und Gute Nacht
Franz
AW: [MAKRO] Wenn, dann schreibe
28.10.2003 20:53:25
Wolfgang
Hallo Chris

Warum die wenn-Funktion nicht gleich in die Zelle wo`s stehen soll ?

mfg
Wolfgang
AW: kapier`s nicht
28.10.2003 21:53:32
Wolfgang
also ich kapier's nicht

angenommen in a1 entweder 1 oder 2

in a2 = wenn(a1=1;"das ist eine 1";wenn(a1 =2;"das ist eine 2";"falsche Eingabe"))

in A3 = a2

anschließend Spalte 2 ausblenden

Ergebnis: in A3 steht der entsprechende Wert

Fragen ?? mail mir

mfG
Wolfgang
Anzeige
AW: kapier`s nicht
28.10.2003 22:15:20
Chris
Erstmal Danke!

Das Problem mit dem Überschreiben der Formel ist damit leider nicht gelöst...
Ich habe das Ganze genauer in der Antwort an Franz beschrieben.
AW: kapier`s nicht
28.10.2003 23:19:51
Gert Seler
Hallo Chris,
es wäre nett, einmal zu erfahren, was deine Tabelle überhaupt für eine Aufgabe
hat ?
Ebenfalls solltest Du mal die Tabelle mit Spalten- und Zeilen-Erklärung
hier abbilden.
mfg
Gert
AW: kapier`s nicht
28.10.2003 23:43:45
Chris
Die Tabelle soll als einfacher Urlaubsplaner für mehrere Mitarbeiter dienen.

Tag1 Tag2 Tag3
Müller 1 X
Meier X 1
Schmidt X 1
Hermann X X
Lustig X

Beispiel
- Wenn Herr Müller im Urlaub ist, darf Herr Meier keinen Urlaub nehmen.
- Wenn Herr Meier im Urlaub ist, dürfen Herr Müller, Herr Schmidt und Herr Hermann keinen Urlaub nehmen
- Wenn Herr Schmidt im Urlaub ist, dürfen Herr Lustig und Herr Hermann keinen Urlaub nehmen
- etc.

Ein Urlaubstag wird mit einer 1 gekennzeichnet. Gleichzeitig werden per Formel alle betroffenen Personen mit einem "X" gekennzeichnet, die keinen Urlaub nehmen dürfen. Das ganze lässt sich prima mit der WENN()-Formel lösen. Mein Problem dabei ist nur, dass wenn eine 1 oder ein Urlaubstag (also eine 1) wieder gelöscht wird, ist auch die Formel weg, die dahinter lag...

Deswegen möchte ich für jeden Mitarbeiter eine Zwischenspalte einfügen, in der diese WENN-Formel steht:

A1 Formel1
A2 Müller
A3 Formel2
A4 Meier

Formel1 soll prüfen, ob bei den entsprechenden Mitarbeitern (hier A4) eine 1 steht. Ist dies der Fall, soll in Zelle A2 ein "X" geschrieben werden.
Anzeige
AW: kapier`s nicht
29.10.2003 00:34:48
Reinhard
Hi, vielleicht, wenns klappt, isses so besser verständlich...

Tag1     Tag2    Tag3
Müller    1        X
Meier     X        1
Schmidt            X       1
Hermann            X       X
Lustig                     X

- Wenn Herr Müller im Urlaub ist, darf Herr Meier keinen Urlaub nehmen.
- Wenn Herr Meier im Urlaub ist, dürfen Herr Müller, Herr Schmidt und Herr Hermann keinen Urlaub nehmen
- Wenn Herr Schmidt im Urlaub ist, dürfen Herr Lustig und Herr Hermann keinen Urlaub nehmen
- etc.
Reinhard

303 Forumthreads zu ähnlichen Themen

Makro: Wenn dann
Julia

Hallo in meiner xls siehe:
https://www.herber.de/bbs/user/60693.xls
sind die Spalten A bis C gegeben
Wie kann ich den gelben Bereich (Spalte D) per Makro auffülen
Immer den letzten Status in Spalte C (nach...) in die entsprechende Zelle von Spalte D (Aktueller Status) zu schrei...
26.03.2009 12:47:12
Thread-ID: 1064207
12 Beiträge
Anzeige
Makro: Wenn Zelle Wert dann Spalten ausblenden
Herr

Hallo Zusammen,
ich habe folgendes Makro zum bedingten Ein-/Ausblenden von Spalten, bereits durch das Forum erhalten:
Option Explicit Private Sub Worksheet_Change(ByVal Target As Range) With Target If .Address(0, 0) = "C7" Then Range("H:S").EntireColumn.Hidden = False Select Case .Value...
20.01.2016 11:12:14
Thread-ID: 1469954
4 Beiträge
Makro: Wenn Zelle Wert dann Spalten ausblenden
Herr

Hallo Zusammen,
ist es möglich in unten aufgeführten Makro eine Zeilenabhängigkeit zu integrieren? Sprich das Ein- und Ausklappen der u.a. Spalten soll nur für die Zeilen 9-214 stattfinden. Alle anderen Zeilen bleiben von dem Ein-/Ausklappen unberührt?
Und wie müsste dann der unten steh...
08.02.2016 17:11:04
Thread-ID: 1474134
2 Beiträge
Anzeige
Makro: Wenn schon geöffnet, dann nicht öffnen
Daniel

Halli-hallo!
Jeder hat es schon erlebt, vielleicht hat auch schon jemand einen Makro dafür!
Wenn man eine Excel Datei geöffnet hat, und will diese ausversehen nochmal öffnen, dann erscheint immer eine Fehlermeldung: "Datei ist schon geöffnet, es können keine Dateien zweimal geöffnet werde...
10.10.2002 09:42:10
Thread-ID: 167935
3 Beiträge
Zwei Makros starten mit Wenn Dann Sonst
mausi

Hallo Leute,
da ich ein richtiger Anfänger bin, brauch ich eure Hilfe.
Ich möcht in einer Tabelle mit der -Wenn- Funktion zwei Makros starten. Die Makros fügen jeweils ein Bild ein.
Es soll so funktionieren: Wenn Zahl in A1-gerade - Dann starte Makro(sack) - Sonst starte Makro( _
22.12.2018 02:02:49
Thread-ID: 1664231
2 Beiträge
Makro - Zeile einfügen/kopieren wenn dann Funktion
Timo

Hallo Zusammen,
ich möchte gerne in einem Wartungskalender mit dem Setzen des Häkchens in einer Checkbox/Kontrollkästchen eine neue Spalte im Tabellenblatt2 einfügen.

In der vierten Zeile im Tabellenblatt 2 sind bereits eine Inhalte mit einer Dropdown Funktion hinterlegt. Daher kan...
20.02.2019 15:59:05
Thread-ID: 1676768
2 Beiträge
Makro für wenn / dann
Thomas

Hallo,
leider bin ich kein VBA As. Könnte mir jemand helfen, folgenden Befehl zu schreiben ?
Wenn in Zeile 40 was steht, dann soll er nix machen.
Wenn nicht, dann solle er Zeie 1 löschen
Das wäre riesig nett.
Herzlichen Dank im Voraus
Thomas
15.11.2002 13:38:13
Thread-ID: 181821
3 Beiträge
makro bedingt ausführen (wenn, dann)
max

hallo,
folgendes problem. es geht haupsächlich um 2 makros und eine zelle. das 1 makro setzt beim ausführen die aktuelle zeit in zelle A1. makro 2 hat die selbe funktion trägt die zeit aber in zelle b2 ein.
nun ist meine frage, ob ich mit einer "wenn dann" funktion in einer zelle, wenn al...
13.02.2003 16:13:09
Thread-ID: 218742
2 Beiträge

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
11
2
3
1
1
2
1
1
2
1
6
1
5
3
5
1
2
2
9
1
5
9
1
2
11