Microsoft Excel

Herbers Excel/VBA-Archiv

Wenn in Zelle A ein Wert, dann in B löschen

Betrifft: Wenn in Zelle A ein Wert, dann in B löschen von: Diddy
Geschrieben am: 18.08.2004 15:55:40

Hi Leute,

weiß nicht, ob man dafür überhaupt VBA braucht, aber ich habe es auch schon mit der WENN Funktion probiert und kein Ergebnis erzeilt.

Habe zwei Zellen, die für Berechnungen gebraucht werden. Wenn man in der einen etwas eingibt, dann soll der Wert in der anderen gelöscht werden und andersherum.

Danke schonmal

Diddy

  


Betrifft: AW: Wenn in Zelle A ein Wert, dann in B löschen von: Hans-Werner Schmidt
Geschrieben am: 18.08.2004 16:54:26

Hallo Diddy
probier mal folgendes:

Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address = "$A$1" And Target <> "" Then
 Range("B1").ClearContents
End If
If Target.Address = "$B$1" And Target <> "" Then
 Range("A1").ClearContents
End If
End Sub


Tschüs H.W


  


Betrifft: AW: Wenn in Zelle A ein Wert, dann in B löschen von: Diddy
Geschrieben am: 18.08.2004 17:19:28

Danke, aber es geht leider nicht. Es passiert nichts.
Ich habe es in das Modul 1 kopiert und einmal in das betroffene Arbeitsblatt. Stimmt das?


  


Betrifft: AW: Wenn in Zelle A ein Wert, dann in B löschen von: Hans-Werner Schmidt
Geschrieben am: 18.08.2004 18:31:29

Hallo Diddy
bei mir klappt die Formel
https://www.herber.de/bbs/user/9786.xls

Tschüs
H.W


  


Betrifft: AW: Wenn in Zelle A ein Wert, dann in B löschen von: AndréL.
Geschrieben am: 18.08.2004 17:35:48

Hi Diddy,
der Code steht nur im betroffenen Arbeitsblatt(Tabelle3).

https://www.herber.de/bbs/user/9782.xls

Gruß
AndréL.


  


Betrifft: AW: Wenn in Zelle A ein Wert, dann in B löschen von: Diddy
Geschrieben am: 18.08.2004 17:41:53

Hmm... geht auch.
Habe das BSP Workbook runtergeladen und probiert. Das funktioniert auch nicht bei mir.
Kann es sein, dass es diese Funktion in Excel 97 noch nicht gibt?

MfG


  


Betrifft: AW: Wenn in Zelle A ein Wert, dann in B löschen von: AndréL.
Geschrieben am: 18.08.2004 18:01:47

Bekommst Du eine Fehlermeldung, oder passiert gar nichts?
Ob es diese Funktion in Office 97 gibt, weiß ich nicht, mußte aber.
Hast Du vielleicht andere Makro-Sicherheitseinstellungen??

Gruß
AndréL.