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
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
Um eine Spalte in Excel, die 150 Zeilen umfasst, in 10er Schritten zu nummerieren, kannst Du folgende Schritte ausführen:
=WENN(REST(ZEILE();10)=0;ZEILE();"")
Diese Methode ist einfach und erfordert kein Makro. Sie ermöglicht Dir, die Spalte effizient zu nummerieren.
Neben der oben genannten Methode gibt es auch eine Möglichkeit, dies mithilfe eines VBA-Makros zu tun. Hier ist ein einfaches Beispiel:
Sub Zahl_Aufst_xfach()
ActiveCell.Select
Dim Zahl
Dim menge
Dim zahlwiederholung
zahlwiederholung = 1
Zahl = 1 ' Starte mit 1
menge = 150 ' Anzahl der Zeilen
For S = 1 To menge
If S Mod 10 = 0 Then
ActiveCell.Value = Zahl
Zahl = Zahl + 10 ' Schrittweite
End If
ActiveCell.Offset(1, 0).Select
Next S
End Sub
Dieses Makro nummeriert die Spalte in 10er Schritten und kann leicht angepasst werden.
=A1+1
in A2 verwenden. Ziehe die Zelle nach unten bis A150.=A1+10
.1. Wie kann ich die Schrittgröße anpassen?
Du kannst die Schrittgröße in der Formel oder im Makro ändern, indem Du den Wert von 10 auf eine andere Zahl anpasst.
2. Kann ich die Nummerierung in einer anderen Spalte durchführen?
Ja, Du kannst die Formel oder das Makro einfach anpassen, um die Nummerierung in einer anderen Spalte durchzuführen. Achte darauf, die Zellen entsprechend zu referenzieren.
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen