Anzeige
Archiv - Navigation
996to1000
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
Inhaltsverzeichnis

Autoausfüllen 1, 1a, 1b usw.

Autoausfüllen 1, 1a, 1b usw.
02.08.2008 21:07:00
Frank
Hallo Profis!
Ich stoße wieder einmal an meine Grenzen! In Spale B soll folgendes bis zur Zeile 4594 eingetragen werden, ohne es aber mühevoll tippen zu müssen! 1, 1a, 1b, 1c ......... 1m, 1n, 2, 2a, 2b........ 2m, 2n, 3, 3a, theoretisch bis zu 306n. Excel muss aber auch die genaue Schreibweise erkennen, da sonst meine andere Idee nicht funktioniert. Alles zu erklären würde jetzt den Rahmen und eure Nerven sprengen. Ich hoffe es gibt 'ne Möglichkeit mir zu helfen. Euch allen DANK!!!
Gruß Frank H.

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Autoausfüllen 1, 1a, 1b usw.
02.08.2008 21:40:22
Sigi
Hallo Frank,
geht per Makro:

Sub Nummerieren()
Dim i As Long
Dim j As Long
Dim z As Long
z = 1
For i = 1 To 306
ActiveSheet.Cells(z, 2).NumberFormat = "@"
ActiveSheet.Cells(z, 2).Value = CStr(i)
z = z + 1
For j = 97 To 110
ActiveSheet.Cells(z, 2).NumberFormat = "@"
ActiveSheet.Cells(z, 2).Value = CStr(i) & Chr(j)
z = z + 1
Next j
Next i
End Sub


Gruß
Sigi

AW: Autoausfüllen 1, 1a, 1b usw.
02.08.2008 22:05:25
Frank
Hi Sigi!
Genial, läuft super. Ganz herzlichen DANK!!!
Gruß Frank!!!

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige