Hab da mal ne Frage...ich speicher mit folgendem Code Daten einer Tabelle in ein anderes sheet, das funtzt auch prima(MitarbeiterKartei). Durch eine Eingabe in H9 die ich begrenzt habe auf WB1 oder WB2 o. WB3 O. WB5 oder WB6 (durch combobox) kann ich dem Mitarbeiter seinem Bereich zuordnen. Jetzt möchte ich den vorhandenen Code so ändern das je nach zuordnung der oben genannten Wb's, die Mitarbeiterdaten in den Tabellenblättern WB1;WB2;WB3;WB5;WB6 gespeichert werden.
Wer kann mir da helfen ?
hier der code:
Sub Makro4()
Range("B9:L9").Select
Selection.Copy
Worksheets("Tabelle2").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:=False, Transpose:= _
False
lr = Cells(Rows.Count, 1).End(xlUp).Row
Cells(lr + 1, 1).Activate
Worksheets("Tabelle1").Range("B9:J9").ClearContents
Worksheets("Tabelle1").Select
Range("B9").Select
End Sub
Kann man die entstehende Liste in den Sheets WB1 - WB6 auch automatisch alphabetisch ordnen lassen?
Gruß HOLGI