fortlaufende zahl

Question

Hallo,

ich habe eine Tabelle mit Spalten und und viele Zeilen.
Ich möchte nun das er in der Spalte A überprüft ob dort was steht und in Spalte D die fortlaufende Zahl schreibt (Schleife in VB).

Rg. März
A B C D
1 Gemüse Rg. 01 50 423
2 Obst Rg. 02 5 424
3 Fleisch Rg. 03 300 425

Rg. April
A B C D
1 Gemüse Rg. 01 50 426
2 Obst Rg. 02 5 427
3 Fleisch Rg. 03 300 428

Vielen Dank für Eure Hilfe!

Answer 1

Halo,

warum VBA?
laufende Nummer Link zur Datei

Gruß Hajo

Answer 2

Hallo,

geht auch z.B. in Zelle D11 mit

= Max ($D$1 : $D10)+1

es wird dadurch der Maximalwert der vorhergehenden Zeilen genommen

Gruß

Helmut

Answer 3

vielen dank für die mühe, aber ich benötige es in vb

Answer 4

Hallo Nick,

Option Explicit

Sub nick()
Dim LoLetzte As Long
Dim Loi As Long
' letzte belegte Zeile unabhängig von Excelversion für Spalte A (1)
LoLetzte = IIf(IsEmpty(Cells(Rows.Count, 1)), Cells(Rows.Count, 1).End(xlUp).Row, Rows.Count)
If Cells(1, 1) <> "" Then Cells(1, 1) = 426
For Loi = 2 To LoLetzte
If Cells(Loi, 1) <> "" Then
If Application.WorksheetFunction.Max(Range("D1:D" & Loi - 1)) < 426 Then
Cells(Loi, 4) = 426
Else
Cells(Loi, 4) = Application.WorksheetFunction.Max(Range("D1:D" & Loi - 1)) + 1
End If
End If
Next Loi
End Sub

Gruß Hajo

Answer 5

Hallo!

DANKE für Eure hilfe.

Aber es läuft noch nicht so wie ich es will.

Ich hätte gerne, das

Range("D65536").Select
Selection.End(xlUp).Select

dann die letze zahl +1 gezählt wird,
danach eine zeile runter gesamtzahl eingetragen wird.

UND danach in spalte A prüfen, ob was drin steht , wenn ja, dann fortlaufend zählen


1 Gemüse 1400
2 Obst 1401
3 Fleisch 1402


4 Jacke 1403 <-- ( 1402 + 1 )
5 Hose 1404 <--- ( 1403 + 1 )

Wäre super , wenn einer es lösen kann

Danke im Voraus

Answer 6

Hallo Nick,

ich war davon ausgegangen das Du bei 426 anfangen möchtest, Wo ist das Problem ersetze 426 durch 1400

Gruß Hajo

Answer 7

Hallo Hajo,

es fängt ja jedesmal bei einer anderen Zahl an.

Answer 8

Hallo Nick,

Du hast aber vergessen uns mitzuteilen wie Du dies Zahl ermittelst. Da mußt Du den Code schon selber anpassen.

Gruß Hajo

Answer 9

Hallo Hajo,


fortlaufende zahl.

bsp.

April 1400
.
.
.
. 1450


Mai 1451
.
.
. 1483

juni

usw.