Makro- autofill

Forumthread: Makro- autofill

Makro- autofill

27.07.2004 14:49:12

Anton

Hallo Forum,
Ich möchte eine Excel Tabelle, mit Hilfe eines Makros, automatisch einen Wert berechnen Lassen. Das teilen und verketten von Spalte A und E ist kein Problem. Der Makro soll aber (zum Beispiel in Zelle B16-B19) bis der Wert "Koart-GR" in Spalte E erreicht ist, die Spalte B ausfüllen mit dem gleichen Wert wie im Anfang der Gruppe (in diese Beispiel der Wert von Zelle B15). Nicht jede Gruppe is gleich gross und die grösse kann sich jede Monat ändern! Hat einer von euch eine Lösung?
Danke im voraus.
Anton
https://www.herber.de/bbs/user/8939.xls

8
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Makro- autofill

André
AW: Makro- autofill

27.07.2004 15:10:12

Anton
AW: Makro- autofill

André
AW: Makro- autofill

27.07.2004 15:43:18

anton
AW: Makro- autofill

27.07.2004 15:19:59

Roland
AW: Makro- autofill

27.07.2004 15:42:34

Anton
AW: Makro- autofill

27.07.2004 15:33:27

Heinz
AW: Makro- autofill

27.07.2004 15:40:53

Anton

AW: Makro- autofill

André

Hallo Anton,
ich würde es so lösen:
Diese Formel in B18 eintragen,
und so weit runterkopieren wie Du es brauchst.
=WENN(B17="";"";B17)
Gruß
AndréL.

AW: Makro- autofill

27.07.2004 15:10:12

Anton

So tu ich es normalerweise auch, aber funktioniert in den Makro leider nicht. Wie gesagt ändert sich die Tabelle jede Monat. Trotzdem danke.
Anton

AW: Makro- autofill

André

In welchem MAKRO ?
Ich kann keines erkennen.
Wenn Du schon einen Codeschnipsel hast
warum postest Du ihn nicht?
AndréL.

AW: Makro- autofill

27.07.2004 15:43:18

anton

Problem jetzt gelösst. Danke.
Anton

AW: Makro- autofill

27.07.2004 15:19:59

Roland

Hallo Anton,
wenn es denn mit VBA gehen soll versuchs mal so


Sub auffuellen()
Dim i As Integer
For i = 2 To Range("B65536").End(xlUp).Row
If Cells(i, 2).Value <> "" And _
Cells(i + 1, 5).Value <> "Koart-GR" Then
Cells(i + 1, 2).Value = Cells(i, 2).Value
End If
Next
End Sub

Gruß
Roland

AW: Makro- autofill

27.07.2004 15:42:34

Anton

Hat leider nicht funktioniert, aber Problem wurde schon von
einem anderen Forummitglied erfolgreich gelösst. Danke.
Anton

AW: Makro- autofill

27.07.2004 15:33:27

Heinz

Hallo Anton,
vielleicht so:


Sub Kost_autofill()
Dim i%
For i = 1 To Cells(Rows.Count, 5).End(xlUp).Row
If Cells(i, 5).Value <> "Koart-GR" And Cells(i, 5).Value <> "" And Cells(i, 2).Value = "" Then
Cells(i, 2).Value = Cells(i - 1, 2).Value
End If
Next
End Sub

Gruß
Heinz

AW: Makro- autofill

27.07.2004 15:40:53

Anton

Das ist es. Eine kleine Anpassung und es funktioniert.
Ich versuche jetzt zu verstehen was den Makro genau tut,
aber es klappt.
Vielen dank.
Anton

Beliebteste Forumthreads (12 Monate)

Forumthread: Makro- autofill

8 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Beliebteste Forumthreads (12 Monate)

8
Beiträge zum Forumthread

Beiträge zu diesem Forumthread