Excel-VBA: Blatt m Werten statt Formeln speichern

Computer: Software & Programmierung Office Software
1

Hallo Ihr VBA-Profis,

ich möchte aus einer Excel-Tabelle ein Tabellenblatt (Worksheet?) als neue Datei in einen bestimmten Ordner speichern, dabei sollen in allen Zellen anstelle der Formeln die Werte gespeichert werden.

Ich reime mir etwa zusammen (geraten):

Dateiname = Cells(5,8).Text
ActiveSheet.SaveCopyAs Filename:="L:\Ergebnisordner\" & Dateiname

Damit werden aber natürlich nur die Formeln gespeichert. Außerdem möchte ich nicht das ActiveSheet, sondern ein nicht-aktives speichern.

Helft Ihr mir? Vielen lieben Dank
JayKay

2

ich möchte aus einer Excel-Tabelle ein Tabellenblatt
(Worksheet?) als neue Datei in einen bestimmten Ordner
speichern, dabei sollen in allen Zellen anstelle der Formeln
die Werte gespeichert werden.

Hallo JayKay,

auch geraten=ungetestet:

Sub tt()
Dim Dateiname As String
Dateiname = Cells(5, 8).Text
Worksheets("xyz").Copy
With ActiveWorkbook
 .Worksheets(1).UsedRange.Value = .Worksheets(1).UsedRange.Value
 .SaveAs Filename:="L:\Ergebnisordner\" & Dateiname
 .Close Savechanges:=True
End With
End Sub

Gruß
Reinhard

3

Hallo,
ohne VBA entfernt man die Formeln mit
Bereich markieren
Bearbeiten kopieren
(in denselben Bereich) bearbeiten einfuegen und im Enster waehlen Werte
ok
Dann sind die Formeln weg und die Ergebniswerte der Formeln stehen drin. Niemand sieht wie sie errechnet wurden.
Wie und ob man dies mit VBA erreicht weiss ich nicht.
Gruss Helmut

4

Wie und ob man dies mit VBA erreicht weiss ich nicht.

Hallo Helmut,

sicher geht auch Copy und dann Pastespecial, aber nimm
.value=.value

Gruß
Reinhard