ich brauche Hilfe. Hoffe ihr könnt mir helfen bzw. Tipps geben?
Würde mich sehr freuen.
Ich wollte ein Programm erstellen mit dem ich Daten von einer QuellDatei(gefüllt mit Daten)
in eine Zieldatei kopieren kann.
ich würde es gerne so machen weiß aber nicht wie ich es in VBA umsetzten kann :(
Als erstes soll mich ein Makro fragen welche Datei(beide geöffnet) die Quell und welche die Zeil Datei ist.
bei meinem Code wie ich ihn jetzt habe müsste ich im Debuggen Modus immer die richtige Datei anwählen und dann weiter mit F8 die nächste Datei wählen.
Dann habe ich mir vorgestellt das ich eine Inputbox starte und diese soll zwei mal erscheinen.
Z.b gebe ich bei der ersten ein die zahl 1 und bei der zweiten z.b auch auch 1
Dann soll das Makro aus der Quell Datei die Daten beginnend ab Zeile 7 bis zum letzten Wert kopieren und in die Zieldatei ab Zeile 7 einfügen.
Format sollte übernommen werden für die Gesamte Spalte das Format das in die Zieldatei aktuell gewünschte Spalte Zeile 6 ist. In dem Beispiel jetzt in Cells(6,1)
ich hoffe ihr könnt mir helfen. Will auch nicht das ihr mir ein fertiges Tool Liefert nur ich weiß nicht wie ich Anfangen soll damit. Mit dem auswählen und kopieren usw..
Sub welche_uebertrag()
Dim test
ThisWorkbook.ActiveSheet.Cells(1, 1) = ActiveWorkbook.Name 'Quelle
ThisWorkbook.ActiveSheet.Cells(2, 1) = ActiveWorkbook.Name 'Ziel
End Sub
Sub uebertrag_spalte()
cb = ThisWorkbook.ActiveSheet.Cells(1, 1)
Workbooks(ThisWorkbook.ActiveSheet.Cells(1, 1)).Activate
von = InputBox("Spalten Nummer von eingeben")
wohin = InputBox("Spalten Nummer von eingeben")
End Sub
Vielen Dank dafür im voraus gruß Chris