Datensatz in anderes Arbeitsblatt verschieben

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Hallo Stefan
Habe versucht etwas rumzubasteln, bin aber nicht wirklich erfolgreich gewesen. Meine VBA-Kenntnisse sind einfach zu beschränkt.
1. Eine grundsätzliche Frage: Komme ich bei Deinem Ansatz mit 1 Schaltfläche "Zeilen verschieben" pro Arbeitsblatt aus, so dass alle Zeilen, die bei der Zimmer-Nr. z.B. mit einer 2 oder 3 beginnen in die jeweiligen Arbeitsblätter verschoben werden? Das wäre natürlich optimal.
2. Damit zusammenhängend: Muss ich bei "Dein Wert" eine Zimmer-Nr. eingeben oder kann ich da etwas wie 2* (für "beginnt mit 2") eingeben?
3. Habe mal folgenden Code probiert:


Private Sub CommandButton1_Click()
Dim i As Variant
Dim ie As Variant
zähler = 1
Sheets("tabelle1").Cells(1, 3).Select
For i = 1 To Sheets("tabelle1").Range(endxp)
If Cells(1, 1) = "207" Then
Cells(1, 1).copy
Sheets("2. Stock").Select
Cells(ie + zähler, 1).Select
Selection.copy
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
End If
Next i
Next ie
End Sub

Führt zur Fehlermeldung: Fehler beim Kompilieren. Next ohne For.
4. Datensätze verschieben: Ich kann nicht einfach ausschneiden und einfügen. Sonst gehen mir in meiner Originaldatei beim Ausschneiden die Formatierungen und auch die Comboboxen futsch. Ich müsste entweder kopieren, auf neuem Arbeitsblatt Inhalte einfügen und dann zurück gehen, um die Inhalte der kopierten Zeile zu löschen. Oder gibt es mit VBA eine Möglichkeit nur die Inhalte auszuschneiden?
Gruss
Ben

Hallo Ben,
sorry, das "next ie" las mal weg, hier muß dann im Blatt2 in z.B. einer Spalte erst nach der letzten beschriebenen Zeile gesucht werden und dann die Zeile darunter das Kopierte eingefügt werden.
Zu deiner 1. Frage: du kannst grundsätzlich bis zu 64 KB Makrogröße pro Button hinterlegen, und das ist schon eine ganze Menge, weiss ich aus eigner Erfahrung.
2."dein Wert" ist eine beliebige Variable, es kann eine Zahl sein, Buchstaben oder Wort oder auch Wörter, aber sobald was als Text behandelt wird, immer mit "".
4. Grundsätzlich kannst du alles, was du normal in Excel durch klicken verschiedener Buttuons machst z.B. Kopieren, Inhalte einfügen (nur Werte) auch als Makro aufzeichnen und dann in einem Stück abarbeiten lassen, es erspart also die viele rumklickerei, nur wenn du dann mit Variablen arbeiten willst, must du diese in das aufgezeichnete Makro noch ergänzen, das geht nicht anders.
Hier noch ein Buchtipp, ist sehr leicht zu lesen mit vielen praktischen Anwendungen und fertigen Makros: Excel VBA von Markt und Technik. Ich hab vor einem halben Jahr hiermit begonnen und möchte sagen, das meine Kenntnisse jetzt durchaus akzeptabel sind.
Falls du also noch weiteren Komfort für deine Datei möchtest, das Buch lohnt sich.
Gruß
Stefan

Beliebteste Forumthreads (12 Monate)

Datensatz in anderes Arbeitsblatt verschieben

7
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

Datensatz in anderes Arbeitsblatt verschieben

7 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu verwandten Themen

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

7
Beiträge zum Forumthread

Beiträge zu diesem Forumthread