Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

autoausfüllen

Forumthread: autoausfüllen

autoausfüllen
06.02.2003 11:15:52
Rene Franz
Hallo allerseits,

ich habe in einer Spalte Werte stehen in unterschiedlichen Abständen. z.B. Zelle A/1 998000 die weiteren Zellen A/2 bis A/9 leer, A/10 den Wert 998100 ab A/11 bis A/14 leer usw.
Ich möchte nun diese leeren Zwischenzeilen ausfüllen.
Das die Zellen A/2 bis A9 den Wert 998000 haben die Zellen A/11 bis A14 den Wert 998100 usw.

Vielen Dank im voraus

Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: autoausfüllen
06.02.2003 11:56:24
L.Vira

Interaktiv oder VBA?

Re: autoausfüllen
06.02.2003 12:14:32
Uwe

Hallo Rene,
per vba würde es so funktionieren:

Sub füllen()
Dim füllwert
Dim erste As Long
Dim letzte As Long
Dim grenzeunten As Long

grenzeunten = Range("A65536").End(xlUp).Row

Do While letzte < grenzeunten - 1
füllwert = ActiveCell.Value
erste = ActiveCell.Row + 1
Selection.End(xlDown).Select
letzte = ActiveCell.Row - 1
Range("A" & erste & ":A" & letzte).Value = füllwert
Loop

End Sub

Anzeige
Re: autoausfüllen
06.02.2003 13:40:49
Rene Franz

ist egal was besser bzw. einfacher zu realisieren ist.

Vielen Dank im voraus

;

Beliebteste Forumthreads (12 Monate)

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