Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
996to1000
996to1000
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

kleinstmögliche Zahl aus Splate

Forumthread: kleinstmögliche Zahl aus Splate

kleinstmögliche Zahl aus Splate
23.07.2008 13:18:09
Ludes
Habe eine Spalte mit verschiedenen ganzen Zahlen. Wie kann ich mir mittels COde die kleinste Zall anzeigen lassen die nicht schon in der Liste vorkommt?
Bsp: 1,2,3,5,6,7,12,13,
MSGbox ("kleinste nicht vergebene Zahl: 4")
DANKE!!!

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: kleinstmögliche Zahl aus Splate
23.07.2008 13:27:58
Rudi
Hallo,
z.B. so:

Function kleinste(rng As Range)
Dim i As Long
Do
i = i + 1
kleinste = i
Loop Until WorksheetFunction.CountIf(rng, i) = 0
End Function
Sub tt()
MsgBox kleinste(Columns(1))
End Sub


AW: kleinstmögliche Zahl aus Splate
23.07.2008 13:44:00
Ludes
Kannst du mir kurz ein Beispiel programmieren?
s. Anhang
https://www.herber.de/bbs/user/54081.xls
VIELEN DANK!

Anzeige
warum zur Hölle ...
23.07.2008 13:51:08
Rudi
... machst du Function Sub?

weil ich...
23.07.2008 13:56:17
Ludes
...keine Ahnung vom Programmieren habe und deswegen ein simples Beispiel brauche ; ).
Danke!

AW: weil ich...
23.07.2008 15:07:00
Rudi
kopiere einfach meinen Code in ein Modul und starte sub tt.
Anzeige
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige