Delphi Excel: Bereich durchnummerieren

[zobien123]

Zitat:

Kann es sein, dass du die Spalten über eine SQL-Abfrage füllst und die Nummer gleich in dieser Abfrage bilden willst?

Nein will ich nicht Im Titel steht Delphi und nicht SQL

Ich kann die Nummerierung nicht bereits in SQL machen, da ich die Daten aus der SQL über in Delphi Code noch weiter verarbeite und erst dann später in ein Excel exportiere.

[hoika]

Hallo,
das verstehe ich auch nicht.

Zitat:

noch weiter verarbeite und erst dann später in ein Excel exportiere.

Wo ist dann Dein Problem, da einen Zähler für "Mitarbeiter pro Abteilung" hochzuzählen.
Den Zähler schreibst du dann pro Zelle in die Nr-Spalte.

Zeig doch mal deinen bisherigen Code.

[zobien123]

Mit weiter verarbeiten meinte ich, dass die Daten in verschiedene Sheets aufgeteilt werden, Summen gebildet werden, Zeilen eingefügt werden.

Zitat:

Wo ist dann Dein Problem, da einen Zähler für "Mitarbeiter pro Abteilung" hochzuzählen.
Den Zähler schreibst du dann pro Zelle in die Nr-Spalte.

Das Problem ist ja, dass die Zahl dann nicht in pro Zelle angezeigt wird sondern in der letzten.

[bra]

Delphi-Quellcode:

var
  i: Integer;
  s: String;
begin
  i := 0;
  s := '';
  while xxx do begin
    if s <> [Abteilung] do begin
      s := [Abteilung];
      i := 0;
    end;
    Inc(i);
    // hier Ausgabe
  end;
end;

[hoika]

Hallo,

Zitat:

Das Problem ist ja, dass die Zahl dann nicht in pro Zelle angezeigt wird sondern in der letzten.

Wird denn nur 3 reingeschrieben (in deinem Bsp.) oder steht in der letzten Zeile eine 7?

Dann korrigier das doch einfach !

F5,F7,F8 sind dabei Deine Freunde.


Ausserdem: Zeig und etwas Quellcode.

[p80286]

Zitat von zobien123:

Das Problem ist ja, dass die Zahl dann nicht in pro Zelle angezeigt wird sondern in der letzten.

Zeig mal was Du bisher hast. Das Beispiel von bra sollte eigentlich hinreichend sein?

Gruß
K-H

[joachimd]

In Excel selbst lautet die Formel:

Code:

=WENN(C2<>C1;1;A1+1)

Annahme:
Dies ist Zeile 2
In Zeile 1 sind die Überschriften, C2/C1/A1 erhöht sich jeweils um 1
Spalte A: Nr
Spalte B: Name
Spalte C: Abteilung
Es ist nach Abteilung sortiert