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"