Inhalte von einer Excel1 und eine Excel2
#1
Hallo zusammen,

ich würde gerne Werte von einer Excel1 in eine Excel2 kopieren.

z.B.
Button1
Excel1 - Rohdaten1 - Zelle D4 G4 J4
-> Werte kopieren nach
Excel2 - Auswertung1 - Zelle A5 B5 C5

Button2
Excel1 - Rohdaten1 - Zelle D4 G4 J4
-> Werte kopieren nach
Excel2 - Auswertung1 - Zelle A6 B6 C6

Meine Frage ist: gibt es da eine Lösung oder kann ich da wirklich nur einzeln "copy and paste" spielen.

Für eine Antwort wäre ich sehr dankbar.

Gruß
Jens
Top
#2
Hi Jens,

(14.10.2014, 16:45)reinhawi schrieb: Meine Frage ist: gibt es da eine Lösung oder kann ich da wirklich nur einzeln "copy and paste" spielen.

weise dem Button1 das 1. Makro zu und dem Button2 das zweite.

Code:
Option Explicit
Sub Makro_für_Button1()
'
' Makro1 Makro
' nach Zeile 5 kopieren
'

'
    Range("D4,G4,J4").Copy
    Windows("Excel2.xlsb").Activate
    Range("A5").Select
    ActiveSheet.Paste
    Application.CutCopyMode = False
    Windows("Excel1.xlsb").Activate
    Range("A7").Select
End Sub

Sub Makro_für_Button2()
'
' Makro2 Makro
' nach Zeile 6 kopieren
'

'
    Range("D4,G4,J4").Copy
    Windows("Excel2.xlsb").Activate
    Range("A6").Select
    ActiveSheet.Paste
    Application.CutCopyMode = False
    Windows("Excel1.xlsb").Activate
    Range("A7").Select
End Sub
Top


Gehe zu:


Benutzer, die gerade dieses Thema anschauen: 1 Gast/Gäste