Anzeige
Archiv - Navigation
716to720
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
716to720
716to720
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Automatisches Ausfüllen

Automatisches Ausfüllen
13.01.2006 10:25:36
Ralf
Hallo Excel Experten,
ich habe eine Tabelle mit 10 Spalten, in der ersten
Spalte stehen Art.Nr.´n, aber leider nicht durchgehend,
d.h. es sind dann mal 2 Zeilen frei, dann mal wieder drei
Zeilen unter der ArtNr usw. Ist es möglich, diese Zwischen-
räume immer mit der letzten ArtNr zu füllen ?
Bin für jeden Tipp dankbar :-)
Viele Grüße
Ralf

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Automatisches Ausfüllen
ransi
hallo ralf
Mal für Spalte A:
Option Explicit
Public

Sub machs()
Dim letzte As Long
Dim z As Long
letzte = Range("a65536").End(xlUp).Row
For z = 1 To letzte
If Cells(z, 1) = "" Then Cells(z, 1) = Range(Cells(z, 1).Address).Offset(-1, 0)
Next
End Sub

ransi
AW: Automatisches Ausfüllen
13.01.2006 10:47:01
Ralf
Hallo Ransi,
suuuuper schnell und suuuuuper guuut :-)
Klappt ganz toll !!! Vielen Dank
Gruß
Ralf
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige