Miten saan Exelin VBA User Formissa toimimaan niin, että kun mulla on useampi check box, niin aina kun painaa check boxin valituksi, niin viereiseen labeliin tulee tekstiä.
Olen saanut niin että kun yhden boxin painaa valituksi, niin teksti ilmestyy labeliin, mutta ongelma ilmeneekin siinä vaiheessa kun valitsen kaksi check boxia aktiiviseksi. Kuinka saan näkymään sekä ekan boxin tekstin labelissä, sekä tokan boxin tekstin?
Esimerkkinä vaikka, että minulla on check boxeissa valittava mantereita ja haluan, että labeliin tulee näkyviin valittuun mantetereeseen kuuluvat maat. esim.
x Eurooppa -> labelissa lukee: Suomi, Ruotsi, Viro
x Aasia -> labelissa lukee sekä euroopan maat sekä aasian maat
Sekavasti selitetty, mutta toivottavasti joku edes tajusi ;)
VBA User Form ja CheckBoxit
1
303
Vastaukset
- vb2005
Option Explicit
Dim valitut_maat As Long
Private Sub UserForm_Initialize()
valitut_maat = 0
End Sub
Private Sub CheckBox1_Change()
If CheckBox1.Value = True Then
valitut_maat = valitut_maat 1
Else
valitut_maat = valitut_maat - 1
End If
muutateksti
End Sub
Private Sub CheckBox2_Change()
If CheckBox2.Value = True Then
valitut_maat = valitut_maat 2
Else
valitut_maat = valitut_maat - 2
End If
muutateksti
End Sub
Private Sub CheckBox3_Change()
If CheckBox3.Value = True Then
valitut_maat = valitut_maat 4
Else
valitut_maat = valitut_maat - 4
End If
muutateksti
End Sub
Sub muutateksti()
Dim s As String
If valitut_maat And 1 Then
s = "Suomi, Ruotsi, Viro"
If valitut_maat > 1 Then
s = s ", "
End If
End If
If valitut_maat And 2 Then
s = s "Kiina, Indonesia"
If valitut_maat > 3 Then
s = s ", "
End If
End If
If valitut_maat And 4 Then
s = s "Sambia, Egypti"
End If
Label1.Caption = s
End Sub
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Valtion alijäämä = yritystukien määrä = 10 mrd. euroa
Mutta persut eivät vaan suostu tasapainottamaan valtion budjettia, vaikka yritystuet on tiedetty haitallisiksi. Miksi p977393Suomi käyttää sosiaalietuuksiin suhteessa eniten rahaa koko maailmassa
Suomi käyttää sosiaaliturvaetuuksiin enemmän rahaa suhteessa bruttokansantuotteeseen kuin mikään muu maa maailmassa. Su3636483Grahn-Laasonen: "Kansalainen joutuu pettymään, jos demareita äänestää"
Ministeri viittaa tuoreeseen Helsingin Sanomien juttuun, jossa demarijohtajan keinoja Suomen suunnan muuttamiseksi esite613834Vähän fiksumpi Nimi kisa ? :=)
Kirjoita teidän etunimet allekkain. Jos nimissä on joku kirjain sama, poista se. Tee sama tarkistus kaikille kirjaimill293569Mikä on suurin luonne- eroavuus sinussa
Ja kaivatussasi? Vaikuttaako se huonoon vai hyvään suuntaan siinä, että teistä voisi tulla jotain?1922041Kenen haluaisit voittavan Amazing Racen: Tuomas ja Esko, Millu ja Karoliina vai Maria ja Vilma?
Amazing Race Suomi huipentuu lauantaina finaaliin. Jäljellä on kolme paria ja tiedossa on tehtäviä, jotka järkyttävät os181763- 611501
Gallup: Katsotko Salkkareita tai oletko katsonut?
Salatut elämät on suomalaisten suosikkisarja vuosikymmenestä toiseen. Salkkareiden parissa viettää aikaa sukupolvet laps181476Elämäni biisi starttaa uudessa muodossa - Voi olla pettymys faneille!
Elämäni biisi ja juontaja Katja Ståhl ovat suomalaisten suosikkeja. Lauantai-iltaisin ohjelma on vetänyt tv-katsojat arv11370Amazing Race Tomas rehellisenä Esko-appiukon, 63, tilasta: "Sairastelut ja..."
Tomas Grekov ja Esko Rotola-Pukkila ovat mukana Amazing Race Suomi -kisassa. Ja nyt vuorossa on finaali. Hankaluuksia m11357