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

Compile Error - Loop without Do !?!

Compile Error - Loop without Do !?!
17.04.2003 13:02:31
Martin
Hallo,

ich versuche mir ein Makro zu basteln, dass eine Spalte nach sortierten Werten durchsucht und bei Antreffen unterschiedlicher Werte, zwischen diesen beiden eine Leerzeile einfügt.

Konkret: In Range("C7") abwärts stehen Länder. Findet er unterhalb von 'Deutschland' 'China', dann soll er dazwischen eine Leerzeile einfügen, ansonsten weitersuchen.

Das Makro sieht folgendermassen aus:

Sub test()
ActiveSheet.Select
Range("C8").Select
Do Until ActiveCell.Value = ""
If ActiveCell.Value <> ActiveCell.Offset(-1, 0).Value Then
ActiveCell.EntireRow.Insert
ActiveCell.Offset(1, 0).Select
Else
ActiveCell.Offset(1, 0).Select
Loop
End Sub

Nun gibt Excel mir aber einen Errorcode aus. Es heisst:
"Compile Error - Loop without Do"

Ich habe doch "Do". Warum geht das nicht?

Gruss


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

Betreff
Datum
Anwender
Anzeige
Re: Compile Error - Loop without Do !?!
17.04.2003 13:05:44
Otto Ecker

Hallo Martin,

End if fehlt

Gruß Otto

Natürlich. Danke! oT
17.04.2003 13:21:08
Martin

N.

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige