Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
596to600
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
596to600
596to600
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Schleife mit Formel

Schleife mit Formel
12.04.2005 18:10:26
Erich
Hallo und guten Abend,
Ist es möglich diese Formel "=WENN(UND(D1="Sa";E1=31);9,55;0)"
mit einer For Next Schleife einzutragen?
Formel steht in Celle G1. Abgedeckt werden soll der Bereich
Formel in G1:G366
D1:D366 für die Tage und E1:E366 für die Nummern
Wenn das gehen sollte wäre ich für einen Tipp sehr dankbar.
Ich hoffe ich habe mich einigermaßen verständlich ausgedrückt.
Schönen Abend noch...
mfG Erich

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Schleife mit Formel
12.04.2005 18:21:29
Dieter
Hallo Erich,
wenn ich Dich richtig verstanden habe, ist das doch das normale Autoausfüllen. Also Mauskursor auf das kleine schwarze Viereck unten rechts und dann bis zur 366ten Zeile nach unten ziehen.
Gruß
Dieter
AW: Schleife mit Formel
12.04.2005 18:26:12
Erich
Hallo Dieter
Ist 100 % richtig
Da ich diese Formeln in mehreren Dateien benötige
kam mir der Gedanke diese Schleife in einem Modul zu schreiben
und mit Workbook Open abarbeiten lasse.
Dann brauche ich die Formel nicht jedesmal neu zu schreiben.
Ist es überhaupt möglich?
Gruss Erich
AW: Schleife mit Formel
12.04.2005 18:32:05
ransi
hallo erich
wenn man das mit dem makrorecorder aufzeichnen kann, ist es auch
möglich das makro dann anzupassen.
ransi
Anzeige
AW: Schleife mit Formel
12.04.2005 18:36:43
Erich
Hallo Ransi
Erstmal vielen Dank für die Antwort.
Ich wollte ja nur wissen ob es möglich ist.
Werde jetzt mit dem Recorder arbeiten um es
hinzubekommen.
Sollte ich Scheitern, melde ich mich nochmal
Nochmals vielen Dank
mfG Erich
AW: Schleife mit Formel
12.04.2005 18:47:00
Erich
Hallo Ransi u. Dieter
Danke für den Tipp
Mit folgender Formel klappte es super.

Private Sub CommandButton1_Click()
Dim i As Integer
Dim range As range
For i = 2 To 30
Cells(i, 4) = "=IF(AND(RC[-2]=""Sa"",RC[-1]=31),10,22)"
Next i
End Sub

Nochmals Danke
mfG Erich

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige