Werte aus Tabellenblatt per Button in ein anderes übertragen - Excel VBA I Excelpedia

→ In diesem Video findest Du heraus, wie man bestimmte Werte einfach, bequem und schnell per Button in ein anderes Tabellenblatt übertragen kann.

Viele Grüße und frohes Excel'n,
Johannes

[Excelpedia]

Unterstützt den Kanal mit einem Abo und positiven Bewertung. Wir freuen uns über Rückmeldungen :-)

[nickra]

Leider ist der code fehlerhaft:

1. Es werden nur in die ersten 2 Zeilen übertragen

2. Die Zahlformatierung geht verloren, z.b. quelle 1, 3 ziel
: 130000.0

Wie müsste der code korrigiert werden. Der 1 Fehler ist mir am wichtigsten.

[kbptrinh]

Problematik: das makro führt max. nur 2 datensätze aus.

anstelle des If befehls, durch den hier ersetzen

vorher in der Dim zeile, "Variable" as Integer, definieren


"Variable" = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row + 1

ActiveSheet.Cells(y, 1).Select



Zellen werden gezählt und anschließend immer +1, somit wird sichergestellt durch die +1 am Ende das der auch auf die nächste leere zeile springt,

dann ändert man den ersten active cell offset, auf 0, 0, damit der auch die daten transferiert und keine zeile überspringt. somit kann man es x-mal wiederholen...., da man bereits den offset in der Variablendefinition bestimmt haben ist eine 1, 0 nicht mehr notwendig.

[Excelpedia]

Danke und frohes Excel'n
Johannes

[heikostehr]

danke das du dir die mühe gemacht hast es zu erklären... aber ich habe ein problem mit dem makro für die rechnungswerte.
wenn ich auf der rechnung einen betrag haben mit 2 nachkommastellen dann diese vor dem komma wieder gegeben und nicht dahinter somit würde aus 150, 25 = 15.025, 00
was und wie müsste ich ändern das es korrekt kopiert wird?

[mangekyousharingan]

Hallo, danke für diese Anleitung.
Leider werden nur die ersten 2 geänderte Zahlen übernommen und danach wird die erste zahl wieder aktualisiert

[stefanvb]

Grundsätzlich super :-) aber bei mir überträgt er korrekt in die 3. bzw. komischerweise in die 4. Zeile, dann in die 5. und danach nur noch in die 5. Da ich den Code nicht ganz checke, verstehe ich auch dieses Problem nicht.

[morice]

@Excelpedia hammer Video hat mir echt weitergeholfen nur ein Problem hab ich noch wie kann ich es unendlich machen, sodass in der Zeile nicht mehr steht: sondern : [ dass mit dem unendlich vielleicht übertrieben aber dass dort aufjedenfall noch nicht Schluss ist].
Würde mich sehr über eine Rückmeldung freuen :)

[mirijampasquini]

Hallo Johannes, ich bräuchte mal Hilfe mit dieser Vorlage. Ich bekomme den Laufzeitfehler 9 und mit wird beim Debuggen folgende Zeile angezeigt, aber ich seh den Fehler nicht: -> Worksheets("Liste").Select
Bin leider ein blutiger VBA Anfänger und quäl mich gerade durch die Fehler suche... Der Ganze Code lautet:

Sub Daten_zu_Übersicht()

Dim Name As String
Dim Buchungszeichen As String
Dim Erstattung As String
Dim Gesamtbetrag As String


Name = Range("C3")
Buchungszeichen = Range("C4")
Erstattung = Range("C19")
Gesamtbetrag = Range("C23")

Worksheets("Liste").Select

If Worksheets("Liste").Range("B4").Offset(1, 0) <> "" Then

End If
ActiveCell.Offset(1, 0).Select
ActiveCell.Value = Name
ActiveCell.Offset(0, 1).Select
ActiveCell.Value = Buchungszeichen
ActiveCell.Offset(0, 1).Select
ActiveCell.Value = Erstattung
ActiveCell.Offset(0, 1).Select
ActiveCell.Value = Gesamtbetrag

End Sub

Hättes Du oder auch ein anderer der User einen Tip, wie ich den Laufzeitfehler 9 - Index außerhalb des gültigen Bereichs beheben kann? Vielen Dank...

[DanielManzenberger]

Servus,
Super Funktion! Geht das auch anders rum? Also dass ich Werte aus der Tabelle in die Rechnung übertrage.

[mkraba]

Schönes Video zu einer guten Funktion. Leider sehr sehr schade, dass der Code nicht direkt verlinkt ist (oder ich ihn nicht finde) :(

[melmatech]

Das Sieht ganz praktisch aus, tolles Video. Wie bereits weiter unten von jemandem angemerkt "Schade ist dieser Code nicht beim Video Angehängt"

Meine Frage, Fall1: Kann man den Code auch so schreiben (wie?), dass diese Daten in eine zentrale, externe Excel-Datei geschrieben werden? Würde im Bezug Übersicht mehr Sinn machen.

Meine Frage, Fall2: Kann man den Code auch so schreiben (wie?), dass in einer benannter Tabelle aktive Zeile, je nach Wert in aktiver Zeile, Spalte C die die Werte von aktiver Zeile, Spalte A bis B in die richtige benannte Tabelle geschrieben werden und der Code dann auch zu diesem Bereich springt? Die Werte in Spalte C sind als Dropdown hinterlegt und jeder Wert dort hat eine eigene benannte Tabelle auf einem Separaten Tabellenblatt. Wenn der Wert schon angelegt wurde sollte ein Auswahlfenster angezeigt werden in welchem man den Wert neu anlegen oder abbrechen kann.

Würde mich auf eine Antwort und vielleicht sogar Lösungsweg freuen

[thomaslaar]

Danke für das Video. Das hat geholfen. Ich stocke nur an einer Stelle: Anstatt einer Zelle (zB "B17") möchte ich mehrere Zellen kopieren (also zB B17 bis B20). Wie ändere ich dann die Range? Vielen Dank.

[danielakottmann]

Vielen Dank für den tollen Beitrag!

Ich habe allerdings ein Problem mit der Formatierung der Zellen.
Leider werden meine Formatierungen aus Tabelle "Vorlage" nicht in die Tabelle "Rechnungen" übernommen.
Zum Beispiel ist die Rechnungsnummer in Tabelle "Vorlage" wie folgt formatiert 544 97 65-02 erscheint in Tabelle "Rechnungen" aber wie folgt 544976502
Dasselbe bei der Rechnungssumme. Sie ist in Tabelle "Vorlage" wir folgt formatiert 4.499, 00 € erscheint in Tabelle "Rechnung" aber nur wie folgt 4499.

Woran kann das liegen?
Bzw. gibt es eine Möglichkeit das ursprüngliche Zahlenformat beizubehalten?

[somethingyou]

Ich würde das gerne die Daten in eine andere Excel datei übertragen wie geht das dann?

[supertag]

Bei mir fügt Excel die Werte anstatt nebeneinander untereinander ein, woran kann das liegen?

[kratos]

Ist es möglich hierbei noch eine Auswahl zu treffen ob es jetzt zu Rechnungen geht oder zb. Zu Rechnungen Firmen. Also das ich quasi zwei arbeitsblatter habe das eine normale Rechnung und das andere Rechnung für Firmen. So das ich Gewebe und privatleute trennen kann?

[Mocka]

Wie würde das funktionieren, wenn man es auf diese Weise in eine andere Arbeitsmappe speichern will?

[maximilianfranke]

hey tolles Video! das ist wirklich genau was ich brauche! gibt es den code noch irgendwo? leider finde ich ihn weder auf deiner website noch hier in der Beschreibung....

[shreddan]

Super Video! Wie funktioniert das Ganze, wenn ich die Daten aus definierten Zellen aus der Vorlage in eine neue Exceldatei kopieren will (und nicht wie im Beispiel im gleichen File in ein anderes Tabellenblatt)? Die Daten sollen dann fortlaufend in einer Tabelle eingefügt werden, so wie in deinem Beispiel. Ich habe übrigens absolut keine Ahnung von VBA ;) Danke!