[es] - [Excel VBA] Onemogućen unos u tekstualnim kontrolama na formularu

Gix_
Milenkovic
Lyon (France)

Član broj: 113036
Poruke: 167
*.w90-28.abo.wanadoo.fr.

Profil

[Excel VBA] Onemogućen unos u tekstualnim kontrolama na formularu

^{19.12.2007. u 18:13}

Pozdrav za sve.
Opet novi problem koji nikako neshvatam iz kog razloga nastaje pa da pitam za pomoc.
Da bih izbegao pogrešno kucanje u pojedine TBoxove stavio sam ih na Enabled, kada izaberem opciju "Broj Carte Sim" funkcionise kako treba
(oslobodimi TBoxove koje trebam modificirati 14 - 27). Medjutim, ako izaberem opciju "Broj Centrale" onda nesto nefunkcionise neoslobodjava mi TBoxove 14 - 27
Samo da napomenem da oslobodjavanje TBoxova je dozvoljeno ukoliko ComboBox poseduje neku vrednost ako ne onda svi TBoxovi ostaju na .Enabled

Zahvaljujemse unapred na vasoj pomoci.

_{[Ovu poruku je menjao Jpeca dana 19.12.2007. u 19:27 GMT+1]}

Nepostoje idiotska pitanja, samo idioti ne postavljaju pitanje !!!

Prikačeni fajlovi

Controle_TBox_Enabled.zip - 18.33k

^{19.12.2007. u 18:13}

Jpeca
Predrag Jovanović
Božic i sinovi - škola računara
Pančevo

Moderator
Član broj: 25683
Poruke: 1124
*.bisinter.net.

Jabber: jpeca@elitesecurity.org

Profil

Re: [Excel VBA] Onemogućen unos u tekstualnim kontrolama na formularu

^{19.12.2007. u 20:04}

U prilogu koji si postavio ne radi ni slučaj sa Broj Carte Sim ni Broj centrale. Uslov nisi dobro napisao. Umesto dva IF koje si koristio:

Code:

If Me.ComboRechercherModif.Value = True Then
    For TBox = 21 To 27
        Me.Controls("Textbox" & TBox).Enabled = True
   Next
End If
If Me.ComboRechercherModif.Value = "" Then
    For TBox = 14 To 27
        Me.Controls("Textbox" & TBox).Enabled = False
    Next
End If

logički je ispravnije koristiti IF .. THEN ...ELSE strukturu. Takođe nije mi jasno zašto u jednom slučaju koristiš 21 do 27 a u drugom 14 do 27?
Ako sam dobro razumeo trebalo bi nešto ovako:

Code:

If Me.ComboRechercherModif.Value <> "" Then
    For TBox = 14 To 27
        Me.Controls("Textbox" & TBox).Enabled = True
   Next
Else
    For TBox = 14 To 27
        Me.Controls("Textbox" & TBox).Enabled = False
    Next
End If

Dva u dva ide jednom ako možeš da ga ućuškaš

^{19.12.2007. u 20:04}

Gix_
Milenkovic
Lyon (France)

Član broj: 113036
Poruke: 167
*.w86-219.abo.wanadoo.fr.

Profil

Re: [Excel VBA] Onemogućen unos u tekstualnim kontrolama na formularu

^{20.12.2007. u 09:55}

Re,
Ponekad me strasno nervira da ispadnem ovakva budala, jer sada vidim da pravim neke greske totalno glupe.
Napisaosam ovako kodu prvi put

Code:
If Me.ComboRechercherModif.Value = "" Then
    For TBox = 14 To 27
        Me.Controls("Textbox" & TBox).Value = ""
            Me.Controls("Textbox" & TBox).Enabled = False
Else
    For TBox = 21 To 27
        Me.Controls("Textbox" & TBox).Enabled = True
            Next
                End If

naravno nije funkcionisalo jer nisam nikako ukapirao damije falio Next pre linije Else
Inace zasto 14-27 i 21-27 iz razloga jer zelim dozvoliti modifikaciju samo za TBox 21-27 naravno sa kondicijom akoje Combo popunjen
Jos jednom hvala na pomoci

PS: jedno malo dopunsko pitanje za liniju kojusi napisao

Code:
If Me.ComboRechercherModif.Value <> "" Then

zasto koristis kondiciju <> zar nije dovoljno ""
nemojse smejati vidi moj potpis

Nepostoje idiotska pitanja, samo idioti ne postavljaju pitanje !!!

^{20.12.2007. u 09:55}

Jpeca
Predrag Jovanović
Božic i sinovi - škola računara
Pančevo

Moderator
Član broj: 25683
Poruke: 1124
212.200.27.*

Jabber: jpeca@elitesecurity.org

Profil

Re: [Excel VBA] Onemogućen unos u tekstualnim kontrolama na formularu

^{20.12.2007. u 10:17}

Citat:

Zašto koristis kondiciju <> zar nije dovoljno ""

Pa zavisi kako želiš da postaviš uslov

Code:

If Me.ComboRechercherModif.Value <> "" Then

znači ako nije prazno (različiti od praznog), a ovo bi bilo ako jeste prazno:

Code:

If Me.ComboRechercherModif.Value = ""

U principu svejedno, zavisi šta ti je logičnije i da ostale linije koda prate usvojenu logiku.

Dva u dva ide jednom ako možeš da ga ućuškaš

^{20.12.2007. u 10:17}

Gix_
Milenkovic
Lyon (France)

Član broj: 113036
Poruke: 167
*.w86-219.abo.wanadoo.fr.

Profil

Re: [Excel VBA] Onemogućen unos u tekstualnim kontrolama na formularu

^{20.12.2007. u 10:52}

Ok razumeosam logicnoje kad bolje razmislim posle tvog obrazlozenja hvalati i budi pozdravljen.

Nepostoje idiotska pitanja, samo idioti ne postavljaju pitanje !!!

^{20.12.2007. u 10:52}