Tabelle mit schaltfläche kopieren
01.10.2018 11:47:05
Antonio
Kann man eine Tabelle mit Schaltfläche von ein Workbook in ein andere Workbook?
habe mit diesem Code probiert passiert aber nichts.
Sub Test()
Dim WbDatei1 As Workbook
Dim WbDatei2 As Workbook
Set WbDatei1 = ThisWorkbook
Set WbDatei2 = Workbooks.Open("C:...... .xls", ReadOnly:=True) 'Hier den richtigen Pfad _
eingeben!
WbDatei2.Sheets(2).Cells(1, 1).Value = WbDatei1.Sheets(2).Cells(1, 1).Value
'WbDatei1.Close
Set WbDatei1 = Nothing
Set WbDatei2 = Nothing
Antonio
Anzeige