Per Button klick Wert in Zelle eintragen, erneutes klicken Wert wieder entfernen

Hallo zusammen,

Ich Frage mich, ob es möglich ist mit dem selben Button einen Wert in eine Zelle einzutragen und beim erneuten klicken des Buttons, diesen Wert wieder zu löschen.

Mein kläglicher versuch:

Sub Makro_2()
Range("A3").ClearContents = Not ActiveSheet.Cells(3, 1).Value = 1  
End Sub

Ich bitte euch um eure Hilfe.
Danke im voraus.

Bitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben

Content-ID: 374648

Url: https://administrator.de/contentid/374648

Ausgedruckt am: 22.11.2024 um 07:11 Uhr

8 Kommentare

Neuester Kommentar

Range("A3").Value = IIF(Range("A3").Value = "",Range("A5").Value,"")  

Hi,
Und wo kann ich den Wert nun festlegen der in der Zelle "A3" stehen soll?

Gruß,
Hainoon

Na in der IIF Funktion der zweite Parameter wenn man sich mal zumindest vorher die Doku angesehen hätte!!
https://support.office.com/en-us/article/iif-function-32436ecf-c629-48a3 ...

Copy n Paster ...

Pff muss mir sowas nicht anhören, woher soll ich denn wissen das es dafür ne Doku gibt, nen Forum ist nun mal dafür da Menschen die kein Plan haben solche Themen nahe zu legen.
Will ja auch nur lernen

woher soll ich denn wissen das es dafür ne Doku gibt,

Der war gut, eine Programmiersprache ohne Doku

Will ja auch nur lernen

Dann les als erstes die Doku :-P

Koppschüttel.

So habe mir nun die Doku angesehen, leider löst das nicht das Problem, es soll nämlich keine Abhängigkeit existieren.

Na dann einfach globale Hilfsvariable, damit switcht das immer im Wechsel.

Dim clear as Boolean
Sub MyClick()
    If not clear then
        Range("A3").Value = Range("A5").Value   
        clear = true
    Else
        Range("A3").Clearcontents  
        clear = false
    End if
End Sub

Und das nächste mal vorher genau definieren was Sache sein soll.