Gruppen
- Top Gruppen
- Betriebsysteme
- Windows classik
- Linux
- BS-Sonstige
- Software
- Datenbanken
- Bildbearbeitung
- Audio/mp3/Video
- Security/Viren
- SW-Sonstige
- Hardware
- Mainboard/CPU
- Grafikkarten
- Peripherie
- Laptop/Notebook
- HW-Sonstiges
- Netzwerk
- Telefon,ISDN,Modem
- W-Lan
- NW-Sonstiges
- Programmierung
- PHP,ASP,Perl...
- Java,C++...
- Webseiten/HTML
- Sonstiges
- PC-Sonstiges
- Plauderecke
- SN Intern
- Test
/ Forum / Tabellenkalkulation
Tabellenkalkulation
Fragevon Nasic vom 13.08.2019, 15:35 Options
Makro Anweisung
Hallo, ich habe einen Fragenkatalog programmiert, wobei jede Frage Punkte zählt bzw. hat jedes Kontrollkästchen ein Wert hinterlegt.
Ich habe es mit folgender Makroanweisung gemacht:
Besispiel:
Range("A5").Value = 4
Nun mein Problem, er zählt zwar den Wert dazu, jedoch möchte ich, dass wenn das Kästchen nicht angeklickt ist, er den Wert wieder rausnimmt.
Ist soetwas möglich?
MFg Suse
Ich habe es mit folgender Makroanweisung gemacht:
Besispiel:
Range("A5").Value = 4
Nun mein Problem, er zählt zwar den Wert dazu, jedoch möchte ich, dass wenn das Kästchen nicht angeklickt ist, er den Wert wieder rausnimmt.
Ist soetwas möglich?
MFg Suse
Antwort 1 von Beverly vom 13.08.2019, 16:14 Options
Hi Suse,
di verwendest ein kontrollkästchen aus der Steuerelement-Toolbox?
Bis später,
Karin
di verwendest ein kontrollkästchen aus der Steuerelement-Toolbox?
Private Sub CheckBox1_Click()
If CheckBox1 Then
Range("A5") = 4
Else
Range("A5") = ""
End If
End Sub
Bis später,
Karin
Antwort 2 von Nasic vom 13.08.2019, 16:22 Options
Sorry, die komplette Anweisung bei mir lautet:
Sub Kontrollkästchen43_BeiKlick()
Range("A5").Value = 1
End Sub
Ich geh einfach wenn ich das Kästchen erstellt habe auf: "Makro zuweisen"!
Ist das damit auch möglich?
MFG Suse
Sub Kontrollkästchen43_BeiKlick()
Range("A5").Value = 1
End Sub
Ich geh einfach wenn ich das Kästchen erstellt habe auf: "Makro zuweisen"!
Ist das damit auch möglich?
MFG Suse
Antwort 3 von Beverly vom 13.08.2019, 16:38 Options
Hi Suse,
da du ein Kontrollkästchen aus der Formular-Symbolleiste verwendest, muss der Code anders lauten, da diese Elemente direkt als Objekt angesprochen werden müssen
cbKontrolle = 1 bedeutet, dass das Köstchen aktiviert ist, hat also nichts mit dem Wert zu tun, der in die Zelle eingetragen werden soll.
Bis später,
Karin
da du ein Kontrollkästchen aus der Formular-Symbolleiste verwendest, muss der Code anders lauten, da diese Elemente direkt als Objekt angesprochen werden müssen
Sub Kontrollkästchen43_BeiKlick()
Dim cbKontrolle As CheckBox
Set cbKontrolle = Worksheets("Tabelle1").CheckBoxes("Kontrollkästchen 43")
If cbKontrolle = 1 Then
Range("A5") = 1
Else
Range("A5") = ""
End If
End Sub
cbKontrolle = 1 bedeutet, dass das Köstchen aktiviert ist, hat also nichts mit dem Wert zu tun, der in die Zelle eingetragen werden soll.
Bis später,
Karin
Antwort 4 von Nasic vom 13.08.2019, 18:00 Options
Hey Karin,
super vielen Dank, es funktioniert, hast mir echt sehr geholfen ;-)
LG Suse
super vielen Dank, es funktioniert, hast mir echt sehr geholfen ;-)
LG Suse
Ähnliche Themen
Makros - zweiten Drucker als Symbol in die Symbolleiste einfügen
Mikoop 24.11.2006 - 4092 Hits - 1 Antwort
Makro erstellen für Kommentar einfügen
Stefan_calc 17.01.2007 - 90 Hits - 3 Antworten
kann wegen makro nicht drucken - was machen?
srepsac 26.06.2007 - 118 Hits - 1 Antwort
Die Anweisung 0x7df5b5ce
piwi 31.01.2008 - 110 Hits -
Hinweis
Diese Frage ist schon etwas älter, Sie können daher nicht mehr auf sie antworten. Sollte Ihre Frage noch nicht gelöst sein, stellen Sie einfach eine neue Frage im Forum..
Neue Einträge
