Nur Werte einfügen
24.09.2005 11:04:35
Heinz
Habe untenstehendes Makro,das mir von anderen Arbeitsmappen alles einfügt.
Ich möchte das es aber nur die Werte einfügt.
Wie würde das Makro geändert gehören ?
Danke Heinz
Sub AllesEintragen()
Application.ScreenUpdating = False
'erste zelle eintragen funktioniert 1.Halbjahr
Range("D6").Select
ActiveCell.FormulaR1C1 = "='[A Schicht.xls]2006'!R[-3]C4"
Range("L6").Select
ActiveCell.FormulaR1C1 = "='[A Schicht.xls]2006'!R[-3]C7"
Range("T6").Select
ActiveCell.FormulaR1C1 = "='[A Schicht.xls]2006'!R[-3]C10"
Range("AB6").Select
ActiveCell.FormulaR1C1 = "='[A Schicht.xls]2006'!R[-3]C13"
Range("AJ6").Select
ActiveCell.FormulaR1C1 = "='[A Schicht.xls]2006'!R[-3]C16"
Range("AR6").Select
ActiveCell.FormulaR1C1 = "='[A Schicht.xls]2006'!R[-3]C19"