Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 11:38:46
Acrobat PDF Formularfelder mit Excel ausfüllen
26.04.2024 11:23:04
zählen wenn - aber nur die selektierten Zeilen
26.04.2024 10:08:11
Summieren von Zellen mit bedingter Formatierung
26.04.2024 09:08:00
Export alle Tabellenblätter als csv - in bestimmten Ordner
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1756to1760
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1756to1760
1756to1760
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

#Bezug! Fehler finden und überschreiben

#Bezug! Fehler finden und überschreiben
11.05.2020 15:08:53
CCN
Hallo!
Ich habe ein kleines Berechnungsprogramm, dass die Werte für die Berechnungen sowohl aus einer Datenbank als auch vom User eingeben übernimmt. Nun kommt es bei manchen Felder vor, dass durch fehlende Informationen (aus der Datenbank oder nicht vom User angegeben) ein Bezug, Wert, DIV0 Fehler auftritt. Das ist nicht weiter tragisch, weil ich weiß, dass dies nur durch fehlende Informationen hervorgerufen wird.
Allerdings möchte ich diese Fehlermeldungen in der gesamten Tabelle finden und durch ein "-" ersetzen, ohne jedoch die hinterlegte Formel zu überschreiben. Geht sowas in VBA? Wenn ja, wie müsste da so ein Code aussehen?
Bin ein VBA Laie, also bitte den gesamten Code angeben. Vielen Dank!!!

11
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: #Bezug! Fehler finden und überschreiben
11.05.2020 15:43:25
Werner
Hallo,
=WENNFEHLER(DeineFormel;"-")
Gruß Werner
AW: #Bezug! Fehler finden und überschreiben
11.05.2020 15:51:14
CCN
Hallo Werner,
danke für die rasche Antwort.
Hast du auch eine allgemeinere Lösung.
Ich meine eine Lösung bei der man nicht die Formel reinschreiben muss.
In der Form wie Wenn "#Bezug!" dann "-".
Ich müsste ansonsten die diesen Befehl für jede Zelle schreiben, in der so etwas vorkommen kann.
Vielen Dank und liebe Grüße
Niki
AW: #Bezug! Fehler finden und überschreiben
11.05.2020 16:10:51
Daniel
HI
das geht auch ohne VBA:
1. alle Zellen markieren
2. Selektion auf Zellen mit Fehlerwerten einschänken, hierzu geht man so vor:
F5 - Inhalte - Formeln + Fehlerwerte (ggf auch Konstanten + Fehlerwerte, wenn Formeln in Werte gewandelt wurden)
bzw vollständig über das Menü:
Start - Bearbeiten - Suchen und Auswählen - Inhalte - Formel + Fehlerwerte
3. "-" eingeben und Eingabe mit STRG+ENTER abschließen, so wird die Eingabe in alle markierten Zellen übernommen
wenn du es mit VBA machen willst: geht genauso, auch mit genau diesen Schritten. Der Recorder ist dein Freund.
Gruß Daniel
Anzeige
AW: #Bezug! Fehler finden und überschreiben
12.05.2020 06:53:16
CCN
Hallo Daniel,
danke für die rasche Antwort.
Ich möchte es allerdings in VBA automatisch machen lassen.
Da ich absoluter VBA Laie bin, benötige ich euere Hilfe und einen VBA Code dafür.
Vielen Dank und liebe Grüße
Niki
AW: #Bezug! Fehler finden und überschreiben
12.05.2020 12:32:21
CCN
Hallo Daniel,
danke das probier ich später einmal aus.
LG
Niki
AW: #Bezug! Fehler finden und überschreiben
13.05.2020 13:44:18
CCN
Hallo Daniel!
Ich habe deinen Rat mit dem Recorder ausprobiert und es funktioniert eigentlich im großen und ganzen. Da ich die Formel nicht überschreiben möchte, habe ich mir deshalb gedacht ich kopiere die Tabelle --> ändere alle Fehlermeldungen in "-" um --> gebe die kopierte Tabelle aus. Desweiteren soll er alle Fehlermeldungen selbst finden.
Folgenden Code habe ich dafür:
Sub KopierenFehler()
' KopierenFehler Makro
' Tabelle kopieren, Fehler finden, Fehler durch "-" ersetzen
Sheets("Vorlage").Select
Sheets("Vorlage").Copy After:=Sheets(1)
Sheets("Vorlage (2)").Select
Sheets("Vorlage (2)").Name = "Fehler"
Sheets("Fehler").Activate
Selection.Replace What:="#*", Replacement:="-", LookAt:=xlWhole
Sheets("Fehler").Select
End Sub
Leider kopiert der Code nur die Tabelle. Dann passiert nichts mehr. Die Fehlermeldungen ändern tut er nicht! Den Befehl Selection.Replace habe ich aus einem anderen Block, der ebenfalls von dir ist. Nur funktioniert er bei mir nicht.
Siehst du hier den Fehler?
Vielen Dank im Voraus und liebe Grüße
Niki
Anzeige
AW: #Bezug! Fehler finden und überschreiben
14.05.2020 10:04:58
Daniel
Hi
Replace wirkt bei Formeln immer nur auf den Formeltext und du kannst damit nur die Formel verändern aber niemals das Formelergebnis.
wenn du dir die Formeln nicht überschreiben willst, würde ich doch dazu raten, dir die Mühe zu machen und den Vorschlag von Werner aufzugreifen und dein Formelwerk mit WENNFEHLER zu ergänzen: 
=WennFehler(die ursprüngliche Formel;"-")
wenn dir das zu viel Arbeit ist, dann kann man das auch durch ein Makro ausführen lassen:
dim Zelle as range
for each Zelle in Selection.SpecialCells(xlcelltypeformulas)
Zelle.Formula = "=IFERROR(" & Mid(Zelle.Formula, 2) & ",""-"")"
Next
alternativ würde ich so vorgehen:
- neues leeres Blatt anlegen
- Werte und Formate vom alten Blatt ins neue kopieren
- dann mit Replace die Fehlerwerte eleminieren:
Sheets.Add After:=Sheets("xxx")
Sheets("xxx").UsedRange.Copy
ActiveSheet.cells(1, 1).PasteSpecial xlpastevalues
ActiveSheet.Cells(1, 1).PasteSpecial xlpasteFormats
ActiveSheet.Cells.Replace "#*", "'-", xlwhole
Gruß Daniel
Anzeige
AW: #Bezug! Fehler finden und überschreiben
14.05.2020 15:50:04
CCN
Hallo Daniel,
leider kann ich nicht manuell den WennFehler Befehl eingeben, da ich überhaupt nicht weiß wo er auftreten kann. Das Programm ist nicht von mir, ich soll hier nur einige Änderungen durchführen.
Bei der 1. Alternative: Findet das Makro alle Fehler und ersetzt es auch. Allerdings überschreibt es die Zelle einfach. Wenn ich das Programm noch einmal ohne das Makro laufen lasse, dann habe ich immer noch "-" drin, sollte aber eigentlich wieder die Fehlermeldung haben.
Bei der 2. Alternative: Die macht was es soll. Eine Kleinigkeit stört aber da noch. Ich habe ein Bild in der ursprünglichen Tabelle, die nicht mitkopiert wird. Ich habe 2 Buttons (zurück zum Start und pdf erstellen) in der ursprünglichen Tabelle, die ebenfalls nicht mitkopiert werden. Gibt es eine Möglichkeit dies noch dazu zu kopieren?
Danke und liebe Grüße
Niki
Anzeige
AW: #Bezug! Fehler finden und überschreiben
14.05.2020 16:05:24
Daniel
dann kopiere wie bisher das ganze Sheet mit Sheets().Copy und ersetze im ganzen Blatt Formeln durch Werte.
der Vorgang muss dann aber jedesmal wiederholt werden, wenn das ursprungsblatt mit den Formeln neu berechnet wurde.
das WENNFEHLER kannst du prinizipell bei allen Formeln einfügen.
Wenn die Formel keinen Fehler hat, wird das normale Ergebnis ausgegeben.
diese Funktion ist eigentlich genau dafür da, was du vorhast.
ich verstehe nicht, warum du das so kategorisch ablehnst.
Gruß Daniel
AW: #Bezug! Fehler finden und überschreiben
15.05.2020 12:29:59
CCN
Hallo Daniel,
mit deiner Hilfe habe ich mir den Code jetzt irgendwie zusammengestellt.
Musste zwar einiges noch verändern, dein Ansatz war aber eine sehr gute Basis, danke!
Ich lehne den WennFehler nicht aus Prinzip ab.
Aber wenn man 100 oder mehr Formeln pro Tabelle ändern muss, dann wird das insgesamt eine mühsame Geschichte.
Danke noch einmal für deine Hilfe und deine Geduld.
LG
Niki
Anzeige

76 Forumthreads zu ähnlichen Themen

Gültigkeit Liste mit Bezug auf eine andere Datei
Rafi

Hallo Zusammen,
ich habe ein Problem mit einer Gültigkeitsprüfung auf eine Liste die in einer anderen Datei steht.
Bislang hat das immer funktioniert, wenn ich die Liste der Externen Datei unter Namen definiert und bei der Gültigkeit/Liste mit Quelle="Name" angegeben habe. Geht aber nic...
16.12.2008 11:28:00
Thread-ID: 1033235
4 Beiträge
Anzeige
Solver - Makro aufgezeichnet, lässt sich nicht abs
u_hoernchen

habe über Makro Aufzeichnen die Benutzung des Solvers aufgezeichnet. Der Code sieht dann aus wie folgt.
SolverOk SetCell:="$K$39", MaxMinVal:=3, ValueOf:="0", ByChange:="$K$16"
SolverSolve
Beim Abspielen hängt er sich dann allerdings bei "SolverOK" auf und sagt "Sub oder Function n...
20.07.2009 13:09:09
Thread-ID: 1089960
3 Beiträge
Datei lässt sich nicht öffnen
einfachf

Hallo Zusammen ich schreibe gerade an einem Macro.
Dazu soll aus einer bestehenden datei eine andere Datei geöffnet werden.
Leider funzt das nicht und ich weiß nicht warum.
Hier mein Code.
Dim EX As Excel.Application
Dim WB As Workbook
Dim WS As Worksheet
Set EX = Cr...
06.08.2009 12:12:10
Thread-ID: 1094009
3 Beiträge
Anzeige
Spalte lässt sich nicht formatieren
Joachim

Hi,
habe hier ein ganz komisches Problem. Es geht um ein Template, welches von einem Notes-System mit Daten gefüllt wird. In dem Template gibt es eine Spalte mit Datum. (Es steht zumindest das Datum drin)
Wenn ich das Format anschaue, steht es auf Standard.
Diese Spalte wollte ich i...
23.11.2009 10:46:38
Thread-ID: 1119390
3 Beiträge
skalierung größenachse lässt sich nicht ändern
schon

Hallo, vielleicht liegt es ja nur am Sekt, den wir zum Weihnachtsbrunch hatten...
Habe ein simples Liniendiagramm mit 2 Zahlenreihen erstellt. Bei einer Reihe gehen die Zahlen gegen Null, daher schmiegt sich die Linie an die Rubrikenachse. Damit es anschaulicher wird, möchte ich die Skalier...
15.12.2009 16:34:42
Thread-ID: 1123765
2 Beiträge
Datei lässt sich nicht öffnen
Ernst

Hallo Forum
Habe eine Datei abgespeichert, so wie ich es immer mache, lässt sich aber jetzt nicht mehr öffnen.
Wie kann ich die Datei öffnen?
Bitte um Hilfe
mfg
Ernst Dunkel
04.01.2010 13:35:12
Thread-ID: 1127045
5 Beiträge
Tabellenblattreiter lässt sich nicht ändern | Herbers Excel-Forum
Josef_T
Guten Tag zusammen,
ich kann in keiner! Tabelle mehr den Tabellenblattreiter bearbeiten. Egal ob ich mit der linken
oder rechten Maustaste darauf klicke, aktiviere ich nur immer das ganze Blatt.
kann mir bitte jemand einen Tipp geben, wie ich meine Tabellenblattreiter wieder editieren...
23.01.2010 20:19:29
Thread-ID: 1132376
6 Beiträge
Makro-Sicherheit lässt sich nicht ändern
NoNet

Hallo VBA-Experten,
ich habe auf meinem PC unter Excel 2003 SP3 seit einiger Zeit das Problem, dass sich Änderungen der Makro-Sicherheit ("Extras - Makros - Sicherheit") nicht mehr dauerhaft ändern lassen.
D.h. : Ich kann zwar die Sicherheitsstufe und auch die Optionen im Register "Vert...
08.03.2010 15:40:14
Thread-ID: 1144340
20 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
3
3
2
2
6
2
1
4
5
19
7
4
6
3
3
11
3
5
3
2
14
10
3
11
8