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

Spalte in 150 Zeilen in 10er Schritten nummerieren

Spalte in 150 Zeilen in 10er Schritten nummerieren
12.11.2004 21:25:32
Esther
Hallo
Ich brauche wieder einmal euere Hilfe. Wie kann ich eine Spalte die 150 Zeilen hat in 10er Schritten nummerieren.
Vielen Dank für euere Hilfe.
Esther

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Spalte in 150 Zeilen in 10er Schritten nummerieren
12.11.2004 21:51:57
Hübi
Hi Esther,
probier das mal aus
=WENN(REST(ZEILE();10)=0;ZEILE();"") o.T.
12.11.2004 22:20:47
Josef Ehrensberger
Gruß Sepp
AW: Spalte in 150 Zeilen in 10er Schritten nummerieren
13.11.2004 14:14:39
benno
Hallo Ehster
deine frage hat zwei möglichkeiten
zeile1 =1
zeile2 =11 usw,
oder
zeile1 =1
zeile10=11
anbei ein makro wo du einstellen kannst was du brauchst

Sub Zahl_Aufst_xfach()
ActiveCell.Select
Dim Zahl
Dim menge
Dim zahlwiederholung
zahlwiederholung = 1
Zahl = InputBox("StartZahl minus 1-das heißt ! beginn mit 1 eingabe 0 ")
menge = InputBox("Wieviele Zeilen willst du Nummerieren ??")
If Zahl = ("") Then
MsgBox ("Du hast keine START-ZAHL eingegeben !! Makro bitte neu Starten !!"), (vbCritical)
Exit Sub
End If
If menge = ("") Then
MsgBox ("Du hast keine MENGE eingegeben !! Makro bitte neu Starten !!"), (vbCritical)
Exit Sub
End If
For S = 1 To menge
'hier stellst du die Zahl ein (derzeit zb.10,20,30)bei eingabe 9
Zahl = Zahl + 10 'also hier die schrittweite der Zahl
For W = 1 To zahlwiederholung
ActiveCell.Value = Zahl
'Offset(1, 0)wenn du 1 änderst zb. auf 10 numeriert er zb.nur jede 10te Zeile
ActiveCell.Offset(1, 0).Range("A1").Select 'und hier die schrittweite der Zeilen
Next W
Next S
End Sub

lg benno
Anzeige

300 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige