Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
684to688
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
684to688
684to688
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Nur eintragen wenn in Zelle etwas steht

Nur eintragen wenn in Zelle etwas steht
27.10.2005 17:14:12
Gerhard
Hallo!
Habe einen Code der so nicht ganz funktioniert wie ich es will.
Workbooks(strDateiBestand).Sheets(strBestandSheets1).Cells(lnfRowFind, 18).Value = _
Workbooks(strDateiBestand).Sheets(strBestandSheets1).Cells(lnfRowFind, 18).Value - 1
So wie der Code ist wird in jeder Zelle der Spalte 18 der Wert -1 abgezogen.
Ich will aber dass nur dann -1 abgezogen wird wenn ein Wert eingetragen ist.
Wenn die Zelle leer ist soll das nicht passieren.
Kann ich das so ändern dass das funktioniert.
Bitte um Hilfe
Danke inm Voraus
Gerhard

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Nur eintragen wenn in Zelle etwas steht
27.10.2005 18:00:31
Matthias
Hallo Gerhard,

With Workbooks(strDateiBestand).Sheets(strBestandSheets1).Cells(lnfRowFind, 18)
If .Value <> "" Then .Value = .Value -1
End With

Gruß Matthias
AW: Nur eintragen wenn in Zelle etwas steht
27.10.2005 18:59:55
Gerhard
Hallo Matthias!
Funktioniert super!!
Danke für Deine Hilfe!
Gerhard
Anzeige

301 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige