Namensbereich formeln durch werte ersetzen
20.03.2013 15:04:24
Manhartm
Habe eine Tabelle mit Bezügen zu einem Fremdsystem und Formeln für Summen.
Jetzt sollte ich diese Datei jeweils an die Benutzer senden, dabei muss der Formelbereich der Subsystemdaten (Bereichsnamen = Werte) als Werte ersetzt werden.
Es ist zu erwähnen, der Namebsbereich "Werte" besteht aus mehreren nicht zusammenhängenden Bereichen. Das Auswählen des Bereichs funktioniert mit Makrorekorder so: Application.Goto Reference:="Werte". Wie muss ich das jetzt ins VBA verwenden:
Habe es ohne Erfolg versucht mit
Sub Namensbereich_als_Werte()
With Range("Werte")
.PasteSpecial Paste:=xlPasteValuesAndNumberFormats
End With
End Sub
Oder mit
Sub Namensbereich_als_Werte_1()
Worksheets("Namensbereich_als_Werte").PasteSpecial Paste:=xlPasteValuesAndNumberFormats
End Sub
Danke für Eure Tips
Freundliche Grüsse
Martin