Microsoft Excel

Herbers Excel/VBA-Archiv

wer kann mir ein makro programmieren...

Betrifft: wer kann mir ein makro programmieren... von: Andr
Geschrieben am: 16.08.2004 11:22:53

Hallo folgendes Problem:
Die Datei xyz.xls ist geöffnet (der Dateiname ist nicht immer derselbe;
ist beliebig).

In der aktiven Tabelle der Datei xyz.xls bzw. beliebig.xls sollen bereits
markierte Zeilen aus einer nicht geöffneten Exceldatei abc.xls eingefügt
werden (der Dateinahme ist fix).

Die markierten Zeilen sollen aus abc.xls ausgeschnitten werden; die
Änderungen in abc.xls sollen nicht gespeichert werden;
abc.xls soll wieder geschlossen werden.

Bitte bitte ein kleines Makro...

  


Betrifft: AW: wer kann mir ein makro programmieren... von: Hans W. Herber
Geschrieben am: 16.08.2004 12:59:01

Hallo,

wie folgt:
Sub DatenEinfuegen()
   Dim rng As Range
   Application.ScreenUpdating = False
   Set rng = Selection
   Workbooks.Open "c:\temp\test.xls", False
   Range(rng.Address).Copy rng
   ActiveWorkbook.Close savechanges:=False
   Application.ScreenUpdating = True
End Sub

hans


  


Betrifft: Dankeschön von: Andr
Geschrieben am: 16.08.2004 13:06:49

Vielen Dank
Andreas