Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1396to1400
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
alle Formeln löschen
11.12.2014 21:16:04
Ilch
Hallo
Ich möchte gerne nachdem ich ein Tabellenblatt kopiert habe alle Formeln Die das Blatt hat löschen damit diese nicht mehr verändert werden können . die Von Ihnen Erzeugten Werte sollen jedoch erhalten bleiben. Ich habe hier auch einen Code gefunden,

Sub WerteLoeschen()
Dim rng As Range
For Each rng In ActiveSheet.UsedRange.Cells
If rng.HasFormula Or IsNumeric(rng) Then
rng.ClearContents
End If
Next rng
End Sub
doch leider spuckt der immer einen Fehler aus. Siehe Bild weiss jemand Rat und ist das auch das richtige Script
Userbild
grüße Ilch

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: alle Formeln löschen
11.12.2014 21:28:00
Daniel
Hi
der Code löscht dir aber die Formeln ohne die Werte zu sichern.
Wenn du die Formeln löschen, aber die Werte behalten willst, brauchst du folgenden Code
With ActiveSheet.UsedRange
.Copy
.PasteSpecial xlpastevalues
end with
wenn du Formeln löschen willst, ohne die Werte zu sichern nimm besser:
ActiveSheet.Usedrange.SpecialCells(xlcelltypeformulas).clearContents
Gruß Daniel

Formeln löschen, Ergebnisse erhalten
12.12.2014 03:44:38
Matthias
Hallo
Siehe Daniel ...
oder ohne Copy
With ActiveSheet.UsedRange
.Value = .Value
End With
Gruß Matthias

Anzeige
Stopp ... Kommando zurück
12.12.2014 15:20:33
Matthias
Hallo
Ich musste das jetzt erst Mal in aller Ruhe testen
Du hast ja verbundene Zellen im Worksheet.
Sollten dort im nicht sichtbaren Bereich der Verbundzellen Daten stehen
würden diese nach dem Code nicht mehr vorhanden sein!
Nimm also doch lieber das Copy-Beispiel von Daniel.
Gruß Matthias

109 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige