Beim Speichern einer Datei nur Werte abspeichern

Bild

Betrifft: Beim Speichern einer Datei nur Werte abspeichern von: Marcus
Geschrieben am: 22.03.2005 18:21:17

Hallo zusammen,

ich moechte von einer Datei eine Kopie speichern, in der nicht mehr die Formeln und Bezuege stehen, sondern nur noch die Ergebnisse als Werte.

Kann mir hier jemand helfen?

Danke und Gruss,

Marcus

Bild


Betrifft: AW: Beim Speichern einer Datei nur Werte abspeiche von: Josef Ehrensberger
Geschrieben am: 22.03.2005 19:11:10

Hallo Marcus!

Die ganze Mappe oder nur ein Tabellenblatt?


Gruß Sepp


P.S.: Rückmeldung nicht vergessen!




Bild


Betrifft: AW: Beim Speichern einer Datei nur Werte abspeiche von: Josef Ehrensberger
Geschrieben am: 22.03.2005 19:30:46

Hallo Marcus!

Alle Tabellen geht z.b. so.


      
Option Explicit

Sub KopieMitWerten()
Dim wks As Worksheet
Dim strFile As String

strFile = "F:\Temp\kopie.xls" 
'< ---anpassen

On Error GoTo ERRORHANDLER

   
With Application
      .ScreenUpdating = 
False
      .DisplayAlerts = 
False
   
End With
   
   ThisWorkbook.Sheets.Copy
   
      
With ActiveWorkbook
         
For Each wks In .Worksheets
            wks.UsedRange = wks.UsedRange.Value
         
Next
      .SaveAs strFile
      .Close
      
End With
   
ERRORHANDLER:

   
With Application
      .ScreenUpdating = 
True
      .DisplayAlerts = 
True
   
End With
End Sub 


     Code eingefügt mit Syntaxhighlighter 3.0





Gruß Sepp


P.S.: Rückmeldung nicht vergessen!




 Bild

Beiträge aus den Excel-Beispielen zum Thema "Beim Speichern einer Datei nur Werte abspeichern"