Werte aus berechneten Zellen mit Makros kopieren
Schritt-für-Schritt-Anleitung
Um in Excel berechnete Werte zu kopieren, kannst Du ein einfaches Makro verwenden. Hier ist eine Schritt-für-Schritt-Anleitung, wie Du dies umsetzen kannst:
-
Öffne den VBA-Editor: Drücke ALT + F11, um den Visual Basic for Applications (VBA) Editor zu öffnen.
-
Füge ein neues Modul hinzu: Klicke mit der rechten Maustaste auf „VBAProject (DeinArbeitsbuch)“ > Einfügen > Modul.
-
Schreibe das Makro: Kopiere den folgenden Code in das Modul:
Sub WerteKopieren()
Range("B15").Select
Selection.Copy
Range("B22").Select
Selection.PasteSpecial Paste:=xlValues
End Sub
-
Führe das Makro aus: Schließe den VBA-Editor und führe das Makro über Entwicklertools > Makros > WerteKopieren aus.
Mit diesem Makro wird der berechnete Wert aus Zelle B15 in B22 kopiert, ohne die zugrunde liegende Formel zu übertragen.
Häufige Fehler und Lösungen
-
#BEZUG! Fehler: Dieser Fehler tritt auf, wenn Du versuchst, einen Wert zu kopieren, der auf eine nicht existente Zelle verweist. Stelle sicher, dass die Zelle, aus der Du kopierst, korrekt ist und die Berechnung funktioniert.
-
Nullwert kopiert: Achte darauf, dass Du PasteSpecial mit der Option xlValues verwendest. Diese Methode stellt sicher, dass nur der tatsächliche Wert und nicht die Formel kopiert wird.
Alternative Methoden
Neben der Verwendung von Makros kannst Du auch manuell Werte kopieren:
- Manuelles Kopieren: Wähle die Zelle aus, drücke
CTRL + C, gehe zur Zielzelle und drücke CTRL + ALT + V (Paste Special), dann wähle „Werte“.
- Excel-Formel: Wenn Du den Wert in einer anderen Zelle anzeigen möchtest, kannst Du die Formel
=B15 verwenden, aber beachte, dass dies die Formel und nicht den Wert anzeigt.
Praktische Beispiele
Hier sind einige praktische Beispiele für die Verwendung von Makros zum Kopieren von Werten:
-
Kopieren eines berechneten Wertes:
Sub BeispielKopieren()
Range("B15").Copy
Range("A1").PasteSpecial Paste:=xlValues
End Sub
-
Kopieren mehrerer Zellen:
Sub MehrereWerteKopieren()
Range("B15:B20").Copy
Range("C15").PasteSpecial Paste:=xlValues
End Sub
Diese Beispiele zeigen, wie Du in Excel Makros verwenden kannst, um berechnete Werte zu kopieren, ohne die zugrunde liegenden Formeln zu übertragen.
Tipps für Profis
-
Makros optimieren: Verwende Application.ScreenUpdating = False am Anfang und Application.ScreenUpdating = True am Ende Deines Makros, um die Leistung zu verbessern.
-
Fehlerbehandlung: Füge On Error Resume Next hinzu, um Fehler zu ignorieren und die Ausführung des Makros fortzusetzen. Dies kann hilfreich sein, wenn Du mit vielen Zellen arbeitest, die möglicherweise leer sind.
-
Zellbereich dynamisch machen: Du kannst den Zellbereich dynamisch gestalten, indem Du die End(xlUp) Methode verwendest, um automatisch die letzte befüllte Zelle zu finden.
FAQ: Häufige Fragen
1. Wie kann ich sicherstellen, dass nur Werte und keine Formeln kopiert werden?
Verwende die PasteSpecial-Methode mit der Option xlValues, um sicherzustellen, dass nur die Werte kopiert werden.
2. Funktioniert das Makro in allen Excel-Versionen?
Ja, die grundlegenden Makro-Funktionen sind in den meisten Excel-Versionen verfügbar, jedoch können einige spezifische Funktionen variieren. Stelle sicher, dass Du mit einer unterstützten Version arbeitest.
3. Was ist der Unterschied zwischen "Kopieren" und "Werte einfügen"?
„Kopieren“ überträgt sowohl den Wert als auch die Formel, während „Werte einfügen“ nur den berechneten Wert ohne die Formel überträgt.