Live-Forum - Die aktuellen Beiträge
Datum
Titel
23.06.2025 10:14:14
Excel VBA Makro
23.06.2025 09:27:21
Reihenfolge in bedingter Formatierung verschiebt sich
22.06.2025 14:45:39
Eintragung per Userform
21.06.2025 15:36:27
Emailadressen zusammenfassen ohne Meherfachnennungen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
480to484
480to484
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Makro für große Wenn-Dann Funktion

Forumthread: Makro für große Wenn-Dann Funktion

Makro für große Wenn-Dann Funktion
07.09.2004 10:15:31
Marcel
hallo zusammen,
ich habe mich gerade in excel an einer große wenn dann formel versucht. scheinbar sind aber wohl nur 6 bis 7 verschachtelungen erlaubt. ich brauche aber weit aus mehr.
hat jemand eine idee für ein makro, dass folgendes kann:
wenn a1 = a2 dann schreibe a3 in a4
wenn b1 = b2 dann schreibe b3 in a4
wenn c1 = b2 dann schreibe c3 in a4
usw....
danke schon mal :)
gruß´
marcel
Anzeige
Vergiss das Makro für große Wenn-Dann Funktion
07.09.2004 11:02:18
DieterB
Nimm doch Case Select.
Gruß
DieterB
AW: Makro für große Wenn-Dann Funktion
Marcl
Hallo Marcel,

Sub kopieren()
Range("a1").Select
Do While ActiveCell<>""
ac1=ActiveCell
ActiveCell.Offset(1,0).Select
ac2=Activecell
If ac1 = ac2 then
ActiveCell.Offset(1,0).Select
Range("A4") = Activecell
Activecell.Offset(1,-3):Select
Loop
End Sub

Kopiert immer den Wert aus Zelle 3 der aktuellen Spalte in A4, wenn Zelle 1 und 2 identisch sind. Ist Zelle 1 in ASpalte leer, endet das Makro
Gruß
Marcl
Anzeige
AW: Makro für große Wenn-Dann Funktion
Fehler
Du drückst Alt und F8.
gebe einen Buchstaben ein und gehe auf erstellen
Jetzt können Sub und End Sub gelöscht werden.
Auf der linken Seite sollte VBA Projekt(...) stehen, wenn nicht Alt und R drücken.
Nun suchst Du da den Namen Deiner Tabelle, in der die Daten geändert werden und gibst da meinen Code ein.
Sorry, hab mich verschrieben,
hier das richtige:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row <> 1 And (Target.Column < 1 Or Target.Column > 300) Then Exit Sub
Range("a1").Select
'End If
' solange Zelle 1in Spalte nicht leer ist
Do While ActiveCell <> ""
ac1 = ActiveCell
ActiveCell.Offset(1, 0).Select
ac2 = ActiveCell
' wenn Zelle 1 gleich Zelle 2
If ac1 = ac2 Then
' kopiert Zelle 3in A4
ActiveCell.Offset(1, 0).Select
Range("A4") = ActiveCell
' nächste Spalte 1. Zelle auswählen
Else
ActiveCell.Offset(-2, 1).Select
End If
Loop
End Sub

Gruß
Marcl
Anzeige
AW: Makro für große Wenn-Dann Funktion
07.09.2004 11:53:37
Marcel
hallo marcl,
dankeschön! passt schon fast!
falls du zeit hast, geb mir mal deine e-mailadresse, dann würde ich dir mal was schicken...
hätte noch 1 - 2 fragen!
gruß
marcel
AW: Makro für große Wenn-Dann Funktion
Marcl
jo das
hardmarcsebay@aol.com
Gruß
Marcl

Forumthreads zu verwandten Themen

"Wenn Zeit > 17.30 Uhr dann"
Susanne99

Hallo,
wie formuliere und formatiere ich den o.g. Ausdruck als Formel?
Gruß
Susanne
14.09.2008 23:24:58
Thread-ID: 1009640
6 Beiträge
Vergleichen mit Funktion WENN
Uwe

Hallo liebe Forummitglieder,
ich habe ein Problem mit vergleichen von Zahlen.
Ich habe schon selbst probiert, aber das haut hinten und vorne nicht hin.
=WENN(ODER(B10=1;"100")WENN(B10=2;"200")WENN(B10=3;"300")WENN(B10=4;"400"))
Ich möchte wenn in B10 1 steht 100, bei 2 200, bei...
01.10.2008 08:25:00
Thread-ID: 1013514
9 Beiträge
Anzeige
Wenn Formel mit Spalte
Maris

Hi zusammen,
ist das möglich, dass ich eine Wenn-Formel auf eine Spalte und eine Zelle in der Zeile beziehe? Bsp.:
Tabelle A B C Ergebnis ERM VOLL OHNE 1 x ERM 2 x...
05.11.2008 16:30:00
Thread-ID: 1021984
6 Beiträge
Anzeige
Wenn Funktion mit *
Stan

Hallo,
Ich habe eine WENN Funktion eingebaut die prüft Inhalt G2 und dann multipliziert andere Zellen.
Beispiel ==WENN(G2="A12";M2*4;WENN(G2="B12";M2*2;"Fehler")). Es kommen verschiedene Werte nach A und B vor (A12, A22, A27 usw.)
Kann ich nur erste Stelle Abfragen und die nächsten...
21.11.2008 13:27:00
Thread-ID: 1026711
3 Beiträge
Anzeige
Wenn-Dann-Funktion als Makro
Sulley

Hallo zusammen,
ich hänge an einem Makro fest.
Matthias L und fcs (Vielen dank noch mal an dieser Stelle) haben mir mal jeder ein super makro gebaut, mit welchem ich Daten von einer Tabelle ans Ende einer anderen Tabelle schicken kann. Hat auch super geklappt.
Hier nochmal das Makro...
24.11.2008 16:47:36
Thread-ID: 1027372
11 Beiträge
Wenn-Formel mit 12 Bedingugen
Lars

Hallo.
Ich habe eine Frage zur Wenn-Formel. Ich möchte in Zelle A3 einen Wert ausgelesen bekommen.
Wenn A1 = D1 dann Wert aus D3
Wenn A1 = F1 dann Wert aus F3
usw.
Insgesamt sind es 12 bedingungen. Die Spalten liegen nicht nebeneinander.
10.12.2008 12:51:00
Thread-ID: 1031660
4 Beiträge
WENN Funktion mit mehr als 8 Bezügen
AcJoker

Hallo,
ich versuche eine Exceltabelle zu erstellen bei der in Spalte A etwas steht das 20 Verschieden Werte annehmen kann.
In Spalte B hätte ich gerne im Bezug auf Spalte A einen Wert stehen.
Im Hintergrund z.B. auf AA und AB gibt es eine "Übersetzung" der 20 möglichen Werte von Spa...
03.01.2009 16:13:58
Thread-ID: 1036563
6 Beiträge
Wenn Funktion mit mehreren Argumenten
Britta

Hallo Zusammen,
im moment steh ich total aufm Schlauch, ich habe mit Funktionen lange nicht gearbeitet und bekomme es grade nicht so recht hin.
Also hier das Ding: ich habe eine Tabelle in der in B2 eine Eingabe erfolgt, diese kann nur 16 oder 18 sein, sollte es anders sein, soll ein F...
07.03.2009 09:41:28
Thread-ID: 1057522
11 Beiträge
wenn dann funktion
jannis

Hallo zusammen
wäre super wenn mir einer weiterhelfen könnte!
3 lösungen bräuchte ich für folgende berechnungen
1.Beispiel
wenn das Ergebniss gößer als das Ziel dann 1 ; wenn das Ergebniss kleiner dann -1
wenn gleich bleibend dann 0
2. Beispiel (ich weis nicht ob man hi...
09.03.2009 15:02:36
Thread-ID: 1058181
22 Beiträge
Anzeige
Username und Uhrzeit mit Wenn-Dann?
Mario

Hallo zusammen,
ich habe schon so Einiges in Richtung Usernamen ermitteln usw. gelesen, bin aber nicht in der Lage, die Codes auf mein Problem hin anzupassen. Deshalb erhoffe ich mir nun hier Hilfe.
Wir haben im Team eine "offene-Punkte-Liste.xls", in die entsprechende Daten eingetragen...
30.06.2009 18:10:03
Thread-ID: 1085453
4 Beiträge
Wenn Funktion mit Folgewert
giovane293

Hallo, ich bin es nochmal!
Ich komme einfach nicht auf die Lösung:
Ich habe folgende Tabelle:
https://www.herber.de/bbs/user/63085.xls
Nun möchte ich in einer Zelle (z.B. K22) die Zielerreichung eingetragen bekommen, wenn in Spalte B der Eintrag x gewählt wurde. Also Excel soll...
10.07.2009 15:11:29
Thread-ID: 1087710
5 Beiträge
Wenn Und Funktion mit mehreren Bedingungen
Katja

Hallo Leute,
brauche bei einer Funktion Eure Hilfe.
Spalte F steht die Dienstart, z.B. VD, B, RB usw.
Spalte W steht die Stundenanzahl ohne Pausenabzug
Ich möchte jetzt folgendes berechnen:
WENN(UND(F2="VD";W2 kleiner als 6);W2;WENN(UND(F2="VD";W2 kleiner als 9);W2-0,5;W...
13.07.2009 13:55:40
Thread-ID: 1088213
2 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige