yksinkertainen salasanan maski

jippoja

Eli koodin pätkä on tällainen:

Private Sub CommandButton1_Click()
sPassword = InputBox("Enter Your Password")
If sPassword = "passu" Then
Sheets("1").Visible = True
Sheets("2").Visible = True
Sheets("1").Select
Else
MsgBox "Password incorrect!"
Exit Sub
End If
End Sub

Saako tuon MsgBoxin tekstin maskeerattua ettei näe mitä siihen kirjoittaa? Tai onko toista yhtä yksinkertaista tapaa tuohon salasana hommaan?

1

353

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • excelin taukukon painikkeeseen koodi

      Private Sub CommandButton1_Click()
      UserForm1.Show
      End Sub

      lisää VBA puolella userform ja siihen komentopainike ja tekstiruutu. Tekstiruudun ominaisuuksissa, Password kohtaan laita haluamasi merkki jota toistetaan normaalistihan se on * ...


      lomakkeelle koodi

      Private Sub CommandButton1_Click()

      If TextBox1 = "passu" Then
      Sheets("1").Visible = True
      Sheets("2").Visible = True
      Sheets("1").Select
      Else
      MsgBox "Password incorrect!"
      Exit Sub
      End If
      End Sub

    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Luetuimmat keskustelut

    1. Lavrov suivaantui Stubbille perustellusti.

      Lavrov perusteli suivaantumistaan tosiasioilla Suomen tarinasta sotiemme jälkeen, tutkija Tynkkynen ja pankkihenkilö Sol
      Maailman menoa
      474
      1685
    2. Sukupuolia on vain kaksi- kohukassista tuli kova tuomio perheenisälle oikeudessa.

      https://www.iltalehti.fi/kotimaa/a/4d4db0d9-4dda-4ba6-a699-25d725683ad6 Miten näin normaalista kassissa olevasta tekstis
      Maailman menoa
      371
      1464
    3. Se ei ihan oikeasti vaatisi kuin yhden

      Tekstiviestin... Jos rakastat minua vielä toivoisin että laittaisit minulle viestiä. Rakastatko? Oletko oikeasti niin pe
      Ikävä
      64
      1318
    4. Eronnut Janni Hussi palaa julkisuuteen - Aloittaa uudessa työssä, joka on aivan uusi pesti Suomessa

      Janni Hussi on saanut viime aikoina kohujulkisuutta, kun hänen ja Joel Harkimon avioliitto päättyi eroon kesällä 2025. H
      Suomalaiset julkkikset
      15
      1279
    5. Et saa mua ikinä

      Oma vikasi. Naiselta.
      Ikävä
      100
      875
    6. JM lukkoliike

      Mihin helvetin kuuseen te olette tällä kertaa siirtäneet Lukkoliikkeenne? Sen kerran kun ensimmäisen ja viimesen kerran
      Jämsä
      19
      836
    7. Miten kesäsi meni?

      Oletko tyytyväinen siihen? Oliko kaivattusi mielessäsi? Lähennyitkö vai etäännyitkö hänen kanssaan?
      Ikävä
      65
      716
    8. Helena Ahti-Hallberg uudessa elämäntilanteessa - Paljastaa eläkehaaveestaan Espanjassa: "Mä.."

      Oi, kuulostaa ihanalta eläkepäivillä! Helena Ahti-Hallberg on ostanut kakkoskodin Espanjasta ja hänellä on puolisonsa ka
      Eläke
      7
      712
    9. Pankin avajaiset

      Osuuspankin uuden toimitilan viralliset avajaiset vetävät väkeä. Kyllä oli outo nauhan leikkaus, kun leikkaajat pyllisti
      Kuhmo
      15
      681
    10. Ketä ikävöit?

      Tuntomerkkejä jos täällä oikeat kohtaavat❤️
      Ikävä
      38
      656
    Aihe