Anzeige
Archiv - Navigation
316to320
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
316to320
316to320
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Cells eintragen

Cells eintragen
05.10.2003 08:54:46
Erich M.
Hallo zusammen,

ich möchte mit einem Makro Werte und Formeln in Zellen eintragen:

Sheets("Abgleich").Select
Cells.Clear
Cells(2, 1) = "Anfangsbestand lt. Test:"
Cells(2, 2) = "=Tabelle3!K2" '168927200,50"
Cells(3, 1) = "Anfangsbestand lt. Original:"
Cells(3, 2) = "=-SUM(Tabelle1!C:C)"
Cells(4, 1) = "Differenz"
Cells(4, 2) = "=SUM(B2:B3)"
'Cells(5, 2) = "=wenn(B4=0;GLÜCKWUNSCH IMPORT ERFOLGREICH;FEHLER FEHLER)"
Range("B2:B4").Select
Selection.NumberFormat = "#,##0.00"

Die Zellen (2,1) bis (4,2) funktionieren!
Leider bekomme ich die "WENN-Formel" in Cells(5,2) nicht hin.
Wie muss ich die WENN-Formel aufbauen?
Verschiedene Versuche mit "" bzw. Macrorecorder sind gescheitert.

Besten Dank für eine Hilfe!

mfg
Erich

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Erledigt: siehe:
05.10.2003 08:59:16
Erich M.
Cells(5, 2) = "=IF(R[-1]C=0,""GLÜCKWUNSCH IMPORT ERFOLGREICH"",""FEHLER FEHLER"")"

Trotzdem danke!
AW: Cells(5, 2).FormulaLocal
05.10.2003 09:01:39
andre
hallo erich,
Cells(5, 2).FormulaLocal = "=wenn(B4=0;GLÜCKWUNSCH IMPORT ERFOLGREICH;FEHLER FEHLER)"
gruss andre
AW: Cells(5, 2).FormulaLocal
05.10.2003 09:10:35
andre
... ergänzung, sonst steht nichts gescheites da
Cells(5, 2).FormulaLocal = "=wenn(B4=0;""GLÜCKWUNSCH IMPORT ERFOLGREICH"";""FEHLER FEHLER"")"
gruss andre
DANKE - andre; funktioniert auch o.T.!
05.10.2003 09:17:49
Erich M.
.

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige