MS-Office-Forum

Zurück   MS-Office-Forum > Microsoft Office > Microsoft Excel
Registrieren Forum Hilfe Alle Foren als gelesen markieren

Banner und Co.

Antworten
Ads
Themen-Optionen Ansicht
Alt 07.12.2018, 14:55   #1
KeX03
Neuer Benutzer
Neuer Benutzer
Standard VBA - Wert von Checkbox in andere Tabelle übernehmen

Mahlzeit liebe MS-Office Crew

Ich hätte mal eine frage bezüglich VBA:

Ich müsste den Wert einer Checkbox aus Tabelle1 in eine Checkbox Tabelle3 übernehmen - das funktioniert soweit auch ganz gut mit

Private Sub CheckBox1_Click()
'Chkbox verriegeln
If CheckBox2.Value = True Then CheckBox2.Value = False

'Chkbox Wert übernehmen
If Tabelle1.CheckBox1.Value = True Then Tabelle3.CheckBox1.Value = True Else:
If Tabelle1.CheckBox1.Value = False Then Tabelle3.CheckBox1.Value = False


End Sub


Mein Problem ist jetzt allerdings, dass die ganze Klamotte etwas unelegant funktioniert und ich in dem Projekt knapp 50 Checkboxen habe.

Meine vorherige Lösung war, einfach die Checkboxen zu kopieren - was auch funktioniert hat, bis die Tabelle einmal neu geöffnet wurde.

Gibt es dafür eine bessere Lösung?


Gruß Kex
KeX03 ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 07.12.2018, 16:52   #2
Beverly
MOF Guru
MOF Guru
Standard

Hi,

meinst du so etwas:

Code:

Private Sub CheckBox1_Click()
    If CheckBox2 Then CheckBox2 = False
    Tabelle3.CheckBox1 = CheckBox1
End Sub

GrußformelBeverly's Excel - Inn

__________________

Bitte im Beitrag eine kurze Rückmeldung auch in dem Fall geben, wenn ein Problem gelöst wurde - dies hilft auch anderen Usern, wenn sie den betreffenden Thread lesen.
Möchtest du dich außerdem für die Hilfe bei der Lösung deines Problems bedanken? Das kannst du ganz einfach durch die Bewertung eines Beitrags (Schalter unten links).
Beverly ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 07.12.2018, 20:49   #3
Flotter Feger
MOF User
MOF User
Standard

Hallo,

ich würde eher mal sagen, er meint sowas ...
Angehängte Dateien
Dateityp: xlsm OleObjects_In Klasse.xlsm (38,6 KB, 4x aufgerufen)

__________________

VG Sabina

Wer auch weiter Hilfe erwartet, sollte sich nicht zu schade sein, ein kurzes Feedback zu geben.
War der Post für dich hilfreich, darf er von dir auch gerne positiv bewertet werden.
bei mir läuft Win 7 32-Bit - Office 2010 Pro Plus 32-Bit und Office 2016 Pro Plus 32-Bit
Flotter Feger ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 08.12.2018, 08:48   #4
Beverly
MOF Guru
MOF Guru
Standard

Hi,

in deinem Code fehlt noch der folgende Teil aus dem Code des Fragestellers:

Code:

If CheckBox2.Value = True Then CheckBox2.Value = False

GrußformelBeverly's Excel - Inn

__________________

Bitte im Beitrag eine kurze Rückmeldung auch in dem Fall geben, wenn ein Problem gelöst wurde - dies hilft auch anderen Usern, wenn sie den betreffenden Thread lesen.
Möchtest du dich außerdem für die Hilfe bei der Lösung deines Problems bedanken? Das kannst du ganz einfach durch die Bewertung eines Beitrags (Schalter unten links).
Beverly ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 08.12.2018, 13:03   #5
Flotter Feger
MOF User
MOF User
Standard

Hallo Karin,

klar fehlt das bei mir ...

Zitat:

in dem Projekt knapp 50 Checkboxen habe.

hast du das gelesen ? Sicher hast du das ... und da machst du dir Gedanken über eine einzige Zeile Code ... ? Das finde ich ja total niedlich ...

__________________

VG Sabina

Wer auch weiter Hilfe erwartet, sollte sich nicht zu schade sein, ein kurzes Feedback zu geben.
War der Post für dich hilfreich, darf er von dir auch gerne positiv bewertet werden.
bei mir läuft Win 7 32-Bit - Office 2010 Pro Plus 32-Bit und Office 2016 Pro Plus 32-Bit
Flotter Feger ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 08.12.2018, 14:33   #6
Beverly
MOF Guru
MOF Guru
Standard

Hi Sabina,

sicher mache ich mir Gedanken über eine einzige Codezeile - diese könnte nämlich deinen gesamten Code lahm legen.

1. müsste diese CheckBox m.E. beim Einlesen in die Klasse ausgenommen werden, oder es müsste im Code der Klasse berücksichtigt werden, dass die CheckBox2 keine Funktion hat, da es möglicherweise diese Checkbox auf Tabelle3 nicht gibt - andernfalls Laufzeitfehler.
2. stellt sich auch die Frage, ob jede CheckBox eine zugeordnete zweite CheckBox hat, die "deaktiviert" werden soll oder ob es nur die CheckBox1 ist, auf die das zutrifft

Diese Fragen kann aber nur der Themenstarter beantworten.


GrußformelBeverly's Excel - Inn

__________________

Bitte im Beitrag eine kurze Rückmeldung auch in dem Fall geben, wenn ein Problem gelöst wurde - dies hilft auch anderen Usern, wenn sie den betreffenden Thread lesen.
Möchtest du dich außerdem für die Hilfe bei der Lösung deines Problems bedanken? Das kannst du ganz einfach durch die Bewertung eines Beitrags (Schalter unten links).
Beverly ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 08.12.2018, 16:05   #7
Flotter Feger
MOF User
MOF User
Standard

Hallo Karin,

Zitat:

Diese Fragen kann aber nur der Themenstarter beantworten.

Ganz genau ... und schon sind wir uns wieder einig.
Solange er das aber nicht tut, bekommt er nur einen Code-Rumpf, den er dann selbst ausbauen muss.
Wie sagt Hajo immer so richtig: Solange es nicht richtig beschrieben ist, suche ich mir aus, wie ich antworte.

__________________

VG Sabina

Wer auch weiter Hilfe erwartet, sollte sich nicht zu schade sein, ein kurzes Feedback zu geben.
War der Post für dich hilfreich, darf er von dir auch gerne positiv bewertet werden.
bei mir läuft Win 7 32-Bit - Office 2010 Pro Plus 32-Bit und Office 2016 Pro Plus 32-Bit
Flotter Feger ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Alt 08.12.2018, 16:16   #8
Beverly
MOF Guru
MOF Guru
Standard

Hi Sabrina,

Zitat: von Flotter Feger Beitrag anzeigen

Solange es nicht richtig beschrieben ist, suche ich mir aus, wie ich antworte.

Ich finde eine solche Verhaltensweise nicht zielführend - als Helfer sollte man schon versuchen, mitzudenken. Insbesondere da es so offensichtlich ist, dass die CheckBox2 nicht zum Schema passt.


GrußformelBeverly's Excel - Inn

__________________

Bitte im Beitrag eine kurze Rückmeldung auch in dem Fall geben, wenn ein Problem gelöst wurde - dies hilft auch anderen Usern, wenn sie den betreffenden Thread lesen.
Möchtest du dich außerdem für die Hilfe bei der Lösung deines Problems bedanken? Das kannst du ganz einfach durch die Bewertung eines Beitrags (Schalter unten links).

Geändert von Beverly (08.12.2018 um 16:22 Uhr).
Beverly ist offline  
verlinken auf Del.icio.us Diese Seite zu Mister Wong hinzufügen
Antworten Auf Beitrag antworten
Ads
Antworten


Aktive Benutzer in diesem Thema: 1 (Registrierte Benutzer: 0, Besucher: 1)
 
Themen-Optionen
Ansicht

Forumregeln
Es ist Ihnen nicht erlaubt, neue Themen zu verfassen.
Es ist Ihnen nicht erlaubt, auf Beiträge zu antworten.
Es ist Ihnen nicht erlaubt, Anhänge anzufügen.
Es ist Ihnen nicht erlaubt, Ihre Beiträge zu bearbeiten.

vB Code ist An.
Smileys sind An.
[IMG] Code ist An.
HTML-Code ist An.
Gehe zu


Alle Zeitangaben in WEZ +1. Es ist jetzt 09:15 Uhr.


Partner und Co.
Access-Paradies -Alles rund um die Datenbank Microsoft Access -Code -Programme-Tools -Tipps   Kostenlose Tipps & Tricks, Downloads und Programme   www.kulpa-online.com - Tipps - Tricks - Tutorials - Meinungen - Downloads uvm...   vb@rchiv · Willkommen in der Welt der VB Programmierung   Access-Garhammer - Hier finden Sie jede Menge Beispiel-Datenbanken zu Access und mehr ...   mcseboard.de   Die Top Seite für Excel-VBA-Makros uvm.

Powered by: vBulletin Version 3.6.2 (Deutsch)
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.

Copyright ©2000-2018 MS-Office-Forum. Alle Rechte vorbehalten.
Copyright ©Design: Manuela Kulpa ©Rechte: Günter Kramer
Eine Verwendung der Inhalte in anderen Publikationen, auch auszugsweise,
ist ohne ausdrückliche Zustimmung der Autoren nicht gestattet.