Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 16:50:59
2 Zellen in 2 Blättern mit unterschiedlichen Bereichen vergl
25.04.2024 15:03:35
Unterschiedliche Dateien miteinander abgleichen lassen
25.04.2024 14:05:48
Makro in aktueller Zelle ausführen mit Doppelklick
25.04.2024 12:56:25
Werte von Kunden und Artikel stehen untereinander
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1164to1168
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1164to1168
1164to1168
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Inhalt einer Zelle mit Kontrollkästchen löschen

Inhalt einer Zelle mit Kontrollkästchen löschen
Ralf
Hallo miteinander,
Ich habe ein wahrscheinlich leicht zu lösendes Problem.
Wenn der Wert eines Kontrollkästchens "falsch" ist, soll der Inhalt der Zelle $H$14 gelöscht werden.
Ich komme beim besten Willen nicht auf den Code.
Vieleicht kann mir jemand weiterhelfen.
Vielen Dank im Voraus
Ralf
AW: Inhalt einer Zelle mit Kontrollkästchen löschen
01.07.2010 23:50:33
fcs
Hallo Ralf,
für ein Kontrollkästchen aus den Formularsteuerelementen folgende Prozedur in ein allgemeines Modul und dem Kontrollkästchen als Makrozuweisen. Den Namen der Prozedur kannst du natürlich auch ändern.
Dann wird nach Klick auf das Kästchen ggf. der Wert gelöscht.
Gruß
Franz 
Sub Kontrollkästchen1_KlickenSieAuf()
Dim oShape As Shape
Set oShape = ActiveSheet.Shapes(Application.Caller)
If Not oShape.ControlFormat.Value = 1 Then
ActiveSheet.Range("H13").ClearContents
End If
End Sub

AW: Inhalt einer Zelle mit Kontrollkästchen löschen
02.07.2010 00:02:46
Ralf
Hallo Franz,
es ist leider kein Formularsteuerelement sondern ein ActiveX-Steuerelement.
Mit zuweisen ist also leider nichts ;-(
Wenn ich es als "Private Sub" eingebe kommt leider eine Fehlermeldung.
Hast du noch neen Tip auf Lager ?
Anzeige
AW: Inhalt einer Zelle mit Kontrollkästchen löschen
02.07.2010 09:20:45
fcs
Hallo Ralf,
die bei Checkboxen haben unterschiedliche Syntax für die Eigenschaftsabfrage und unterschiedliche Werte für gewählt/nicht gewählt.
Mit ActiveX-Checkboxen vereinfacht sich die Prozedur. Diese muss dann natürlich unter dem entsprechenden Tabellenblatt-Modul angelegt werden. 
Private Sub CheckBoxXXXXX_Click()
If Me.CheckBoxXXXXX = False Then
Range("H13").ClearContents
End If
End Sub
Gruß
Franz
AW: Inhalt einer Zelle mit Kontrollkästchen löschen
02.07.2010 11:33:50
Ralf
Hallo Franz,
sieht bei mir jetzt so aus:
  • 
Private Sub SHZuAg4_Zellen_Leeren_Click()
If SHZuAg4 = False Then
Range("H14").ClearContents
Range("N14").ClearContents
End If
End Sub

    • von der Bezeichnung des Kontrollkästchens und des Bezugs zu den Zellen müsste es passen, aber leider zut sich nichts (aber auch keine Fehlermeldung). Die Werte stehen nach wie vor in den Zellen :-(
    Ist noch irgendwas faul ?
    Anzeige
    AW: Inhalt einer Zelle mit Kontrollkästchen löschen
    02.07.2010 12:19:59
    fcs
    Hallo Ralf,
    wo hängt kann ich nicht sagen.
    Tipps:
    1. Füge falls nicht vorhanden als 1. Zeile im Code ein:
    Option Explicit
    2. Setze im Code in der 1. Zeile der Prozedur einen Haltepunkt (im Editor in der Zeile links auf den grauen Rahmen klicken) und klicke auf die Schaltfläche, um das Makro zu starten. Arbeite den Code mit Taste F8 dann zeilenweise ab. Teste ggf. auch den Wert von SHZuAg4.
    3. Setze vor den Namen der Checkbox wie in meinem Beispiel das "Me." . "Me." ist in Tabellen und Userform-Modulen zwar nicht erforderlich. Es ist eine Systemvariable, die für das Objekt steht in dem der Code steht und hilfreich, wenn man Tippfehler bei den Namen der Steuerelemente vermeiden möchte.
    Irgendwo müsste jetzt etwas auffallen oder eine Fehlermeldung kommen.
    Gruß
    Franz
    Anzeige
    AW: Inhalt einer Zelle mit Kontrollkästchen löschen
    02.07.2010 13:09:55
    Ralf
    Hallo Franz,
    hat alles nichts gebracht. Ich habe weiter oben im Code allerdings schonmal eine Abfrage für das Kästchen.
    Habe deine 2 Zeilen jetzt noch mit an diese Abfrage gehängt und nun geht es.
    Sieht jetzt so aus:
  • 
Private Sub SHZuAg4_Click()
If SHZuAg4 = True Then
EtiGestJa.Visible = True
EtiGestNein.Visible = True
End If
If SHZuAg4 = False Then
Range("H14").ClearContents
Range("N14").ClearContents
EtiGestJa.Visible = False
EtiGestNein.Visible = False
End If
End Sub

    • Vielen Dank nochmals für deine Hilfe
    Gruß Ralf
    Anzeige

    379 Forumthreads zu ähnlichen Themen

    zählenwenn nur auf Teil einer Zelle basierend?
    Sascha

    Hallöchen,
    folgendes Problem,
    ich habe eine Artikelerfolgsauflistung (Alpha-Numerisch gefüllte Zellen) über den Bereich Tabelle3!A2-G99.
    Über eine Lagerbestandsliste in Tabelle1!B2-B99, die ich per copy/paste täglich aktualisieren kann zählt mir das Programm automatisch die Menge, i...
    13.11.2008 12:08:25
    Thread-ID: 1024134
    10 Beiträge
    Anzeige
    Teile einer Zelle tiefstellen
    Larass

    Moins!
    ich würde gerne Teile einer Zelle tiefgestellt haben, finde aber keine Einstellung dazu.
    Bisher bekomme ich das nur hin, indem ich den Text so wie er sein soll von Word aus in die Zelle kopiere.
    Geht das nicht auch einfacher?
    Gruß, Lars
    15.12.2008 09:54:08
    Thread-ID: 1032941
    6 Beiträge
    Ausgabe der ersten 4 Zeichen aus anderer Zelle
    Eddie

    Mahlzeit an alle,
    habe wohl ne ganz einfache Sache .. ich suche ne kleine Formel, womit ich in A1 die ersten 4 Zeichen in der Zelle B1 wieder anzeige, also kopiert wird
    Danke und gruß Eddie
    05.01.2009 14:39:00
    Thread-ID: 1036984
    4 Beiträge
    Anzeige
    gewisse sonderzeichen aus zelle entfernen
    Tobias

    Hallo allerseits,
    Ich würde gerne ein gewisses sonderzeichen aus einer zelle entfernen
    nämlich dieses: •
    If ((cells(i,2) = ?) then ' wenn die zelle dieses zeichen enthält
    cells(i,2) = ? ' entfernen
    End if
    Was muss ich in diesen code einb...
    28.02.2009 15:56:56
    Thread-ID: 1055091
    8 Beiträge
    Zugriff auf auf Teilinhalte einer Zelle
    Der

    Hallo da Draußen!
    Habe mal wieder ein Problem mit meiner VBA Programmierung. Ich möchte innerhalb einer Exceltabelle auf einzelne Zellen zugreifen, die ein bestimmtes Merkmal haben. Der Inhalt der Zelle beginnt mit einer Zahl (in diesem fall mit einer Postleitzahl). Ich möchte also meine Ab...
    20.03.2009 14:52:09
    Thread-ID: 1062230
    5 Beiträge
    Teil einer Formel in Zelle einlesen
    Bernd

    Hallo Freaks,
    ich bastle nun schon geraume Zeit an einem Code, der mir in eine Zelle den Teil einer Formel (Kostenstellennamen) aus einer anderen Zelle schreibt.
    Der nachstehene Code (von einem ausgeschiedenen Kollegen) ersetzt einen KST-Namen in einem Link mit einem neuen KST-Namen aus...
    13.04.2009 12:55:24
    Thread-ID: 1068432
    6 Beiträge
    Formel zum entfernen von Leerzeichen
    Leerzeichen

    Hallo zusammen,
    ich habe folgendes Problem und es wäre toll wenn mir jemand helfen könnte:
    Ich habe in Spalte C2 mehrere Werte (z.B. 3; 4; 5) die durch ";" getrennt sind. Zwischen dem ";" und den Werten ist jeweils ein Leerzeichen.
    Nun hätte ich gerne in C3 die selben Werte, ebenfa...
    16.04.2009 09:58:49
    Thread-ID: 1068995
    5 Beiträge
    Die ersten 2 Zeichen entfernen
    MikeM

    Hallo,
    ich suche nach einer Möglichkeit per FORMEL die ersten 2 Zeichen eines Textes zu löschen.
    Z.B.:
    ABCDE soll werden: CDE
    ABCD soll werden: CD
    Text in Spalten ist klar, will das aber per Formel machen.
    Und um das ganze noch einfacher zu machen: Die ersten beiden Z...
    20.04.2009 08:53:00
    Thread-ID: 1069716
    7 Beiträge
    Anzeige

    Links zu Excel-Dialogen

    CheckBox UserForm

    Beliebteste Forumthreads (12 Monate)

    Anzeige
    Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

    Beliebteste Forumthreads (12 Monate)

    Anzeige
    Anzeige
    Anzeige
    Archiv - Verwandte Themen
    Forumthread
    Beiträge
    9
    3
    5
    3
    4
    7
    4
    5
    4
    6
    1
    2
    3
    4
    2
    9
    7
    5
    4
    4
    4
    2
    5
    6
    5