Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
304to308
304to308
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Anzeige
Inhaltsverzeichnis

Laufzeitfehler 1004 bei Wenn-Formel im VBA

Forumthread: Laufzeitfehler 1004 bei Wenn-Formel im VBA

Laufzeitfehler 1004 bei Wenn-Formel im VBA
08.09.2003 01:57:14
Kainz Alexander
Hallo Gurus,

wenn ich eine WENN-Formel mit VBA erstelle dann bekomme ich einen Laufzeitfehler (1004).

Kann ich etwas anderes dagegen machen? es soll umbedingt mit VBA realisiert werden und die Formeln dürfen nicht gelöscht werden!

Code:
Sheets("Kalkulation").Range("H20").Formula = "Wenn(H19=0;0;20)


Lösung von mir (da wird die Formel gelöscht):
Sheets("Kalkulation").Range("H20").CurrentRegion.SpecialCells(Type:=xlCellTypeFormulas, Value:=xlErrors).Value = 0

diese Lösung kann ich nicht verwenden, da die Formel gelöscht wird!
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Laufzeitfehler 1004 bei Wenn-Formel im VBA
08.09.2003 02:06:10
Kainz Alexander
Sorry, Code Lautet:

Sheets("Kalkulation").Range("H28").Formula = "=Wenn(H27=0;0;20)"
AW: Laufzeitfehler 1004 bei Wenn-Formel im VBA
08.09.2003 02:19:07
Björn B.
Hallo Alexander,

probiers in Deinem Code mal mit einem Komma statt einem Semikolon in der Wenn-Formel, dann klappt das auch ;-)

Sheets("Kalkulation").Range("H28").Formula = "=wenn(H27=0,0,20)"


Gruß
Björn B.
Anzeige
AW: Laufzeitfehler 1004 bei Wenn-Formel im VBA
08.09.2003 02:26:51
Alexander Kainz
Wow ... der Fehler ist weg ... vielen Dank

...aber in der Zelle steht nun:
#NAME?

Wenn ich die Formel nochmal in der Tabelle bestätige, erst dann bekomm ich den Wert "20" ... gibts hier auch noch eine Lösung?

Vielen Dank im Voraus.
Gruss,
Alex
AW: Laufzeitfehler 1004 bei Wenn-Formel im VBA
08.09.2003 02:35:36
Björn B.
Ja, ja,
hab ich auch schon gemerkt,

grübel, grübel...

Probiers doch mal, indem Du "wenn" durch "if" ersetzt.

Na, klappts?

Gruß
Björn B.
Anzeige
AW: Laufzeitfehler 1004 bei Wenn-Formel im VBA
08.09.2003 03:00:39
Alexander Kainz
Danke Björn ... funktioniert nun.

Forumthreads zu verwandten Themen

wenn und wenn dann sonst - es geht einfach nicht..
nakoja

hallo liebe gemeinde,
ich habe ein problem, dessen lösung einfach ist, ich aber im internet nicht finde.
ich war kurzzeitig der meinung ich hätte es gehabt, aber dieses ... programm gibt einfach nicht das raus was ich möchte.
folgendes problem
spalte a1 gibt einen prozentwert au...
16.09.2016 01:22:18
Thread-ID: 1514650
14 Beiträge
Datumsvergleich bzw. konvertieren
Naki

Hallo,
habe in einer Liste ein VBA-Code eingebaut. Es werden diverse Angaben geprüft.
In der UF ist ein Label enthalten, die mit dem Namen des aktiven Tabellenblatts verknüpft ist Label11.Caption = "Monat: " & ActiveSheet.Name (so erscheint das Label--> z. B. Monat: 12_2017).<...
30.01.2018 22:48:31
Thread-ID: 1605997
3 Beiträge
Code läuft unter Excel 9 nur teilweise
Robert

Guten Morgen (um 12:00...),
ich habe mit meinen bescheidenen VBA-Kenntnissen eine Userform mit einer selbstkreierten "DB" gemacht. Es geht alles einwandfrei, aber unter Excel 9 bringt die Eingabe im Feld 'Artikelnummer' nicht den gewünschten Zugriff auf die DB-Tabelle. Auf Gut-Deutsch gesch...
06.12.2005 13:30:43
Thread-ID: 705123
3 Beiträge
Code läuft unter Excel 9 nur teilweise
Robert

Guten Morgen (um 12:00...),
ich habe mit meinen bescheidenen VBA-Kenntnissen eine Userform mit einer selbstkreierten "DB" gemacht. Es geht alles einwandfrei, aber unter Excel 9 bringt die Eingabe im Feld 'Artikelnummer' nicht den gewünschten Zugriff auf die DB-Tabelle. Auf Gut-Deutsch gesch...
06.12.2005 13:59:01
Thread-ID: 705140
8 Beiträge
.find leerer Wert abfangen
Jörg

Hallo Leute, ich habe folgenden Code Scnipsel:
With Worksheets("Kreditoren").Range("b:b")
Set RngIndex = .Find(what:=strSpedName, LookIn:=xlValues) 'Blattname in Spalte suchen
intIndex = RngIndex.Row 'gefundene Zeile übernehmen
End With
Wenn jetzt in dem Worksheet Kreditoren...
12.07.2016 12:28:30
Thread-ID: 1503953
13 Beiträge
Ereignisse auf Tabellenblattebene
Bernd

In meiner Anwendung soll der Nutzer einzelne oder mehrere auch nicht zusammenhängende Zeilen auswählen( es sollen immer komplette Zeilen kopiert werden!), die dann per VBA-Modul in eine neue Tabelle kopiert werden.
Per on error fange ich ab, wenn jemand in einer Zeile die komplette Zeile un...
30.04.2006 14:27:32
Thread-ID: 759823
8 Beiträge
MakroCode in Fremddatei trotz PW-Schutz ändern
Reinhard

Hallo Wissende,
in einem anderen Forum bittet jemand in einer interessanten Problematik um Hilfe.
Er möchte mit Application.Run in einer Fremddatei ein dort befindliches Makro starten. In seinem Code der Application.Run startet hat er eine Fehlerbehandlungsroutine, aber die greift nicht...
19.06.2008 23:25:07
Thread-ID: 987213
1 Beitrag
Anzeige
Per VBA Blank in Zellinhaltsuchen | Herbers Excel-Forum
Thomas Pöppinghaus
Hallo,
ich möchte per VBA den Inhalt einer Zelle prüfen, ob ein Blank oder nicht enthalten ist.
Wenn ich mit Find arbeite und kein Blank enthalten ist, bekomme ich einen Laufzeutfehler. Den könnte ich mit "On Error ..." abfangen. Gibt es eine andere Möglichkeit (d. h. ohne Fehlerbehandlung)...
03.02.2010 16:17:34
Thread-ID: 1135454
9 Beiträge
Laufzeitfehler bei Autofit
BLangmantl

Hallo,
ich habe folgendes Problem, beigefügter Tabelle gibt es ein Controlpanel, bei jedem start werden Startparameter neu gesetzt, das funktioniert auch,
Wenn ich aber über Userform den Button startparameter neu setzen ebenfalls drücke sollen diese neu gesetzt werden. Dann zeigt er mi...
17.04.2019 12:24:25
Thread-ID: 1687660
2 Beiträge
Mal wieder Farben zählen
Michael

Hallo zusammen,
ich habe ein kleines Problem beim Farbenzählen und hoffe, ihr könnt mir weiterhelfen.
Ich muss in einer Tabelle 2 Zellen miteinander vergleichen (IST und SOLL Datum). Ist das IST-Datum größer als das SOLL Datum, dann soll IST Datum Rot werden ansonsten Grün. Und dann möc...
27.10.2008 14:54:54
Thread-ID: 1019633
11 Beiträge
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.05.2026 13:31:09
Zeichen ausblenden
14.05.2026 09:50:42
Makro für MacOs
13.05.2026 19:14:18
Gleichheitszeichen
13.05.2026 14:24:56
VBA Projekt Passwort automatisch eingeben
13.05.2026 08:49:41
Reale Berechnung ohne Nachkommawerte
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum