PDA

Vollständige Version anzeigen : VBA Excel alphabetische Sortierung


georg_ahorn
01.04.2012, 11:41
Hallo,
ich bin absoluter Anfänger bei Excel VBA. Ich habe eine einfache alphabetische Sortieraufgabe bei der ich einen neuen Namen in eine bestehende Liste einorndnen will. Aktuell geb ich den Namen über eine MessengerBox ein, will den neuen Namen aber in Zukunft von einem festen Feld, z.B. !"A1", übernehmen. Ich weiß nicht wie ich das richtig programmieren soll.
Hier der aktuelle Stand:
Sub Einfügen()
Range("D1").Select
name = Application.InputBox("Name eingeben: ", "Mitglieder")
vglText = name
zeile = 1
spalte = 4
While vglText > ActiveSheet.Cells(zeile, spalte) And ActiveSheet.Cells(zeile, spalte) > " "
zeile = zeile + 1
Wend
b = MsgBox("Mtgl einfügen")
Range("D1").Select
ActiveCell.Range(Cells(zeile, 1), Cells(zeile, 1)).Select
Sheets("Mitglieder2012").Select
End Sub

Hajo_Zi
01.04.2012, 11:44
Du hast Glück das JINX nicht mehr da ist, ansonsten würde Dein Beitrag wegen Crossposting geschlossen werden.


<img src="http://Hajo-Excel.de/images/grusz1.gif" align="middle" height="40" alt="Grußformel"><a href="http://Hajo-Excel.de/index.htm" onclick="window.open(this.href);return false"><img border="0" src="http://Hajo-Excel.de/images/logo_hajo3.gif" align="middle" height="40" alt="Homepage"></a>

georg_ahorn
01.04.2012, 12:28
...sorry, das hatte ich nicht bedacht.