salasana ****** taulukon suojauksessa?

Olen piilottanut taul2 taulukon. Haluan, että taul2 on suojattu salasanalla.
Nyt inputboxiin tulee "sala" selväkielisenä. Miten sen saa näkymään ****:nä?
Nyt koodi on näin.
Private Sub Cmd_nappi_Click()
sala = InputBox("Anna salasana")
If sala = "sala" Then
Sheets("taul2").Visible = True
Sheets("taul2").Select
Else
End If
End Sub

2

130

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • korvaa inputbox lomakkeella.
      Lisää siihen textbox, label ja 2commandbuttonia OK ja Peruuta

      oletusnimillä

      Peruuta nappiin koodi...
      Private Sub CommandButton2_Click()
      End
      End Sub

      OK nappiin koodi...
      Private Sub CommandButton1_Click()
      If TextBox1.Text = "sala" Then
      Sheets("taul2").Visible = True
      Sheets("taul2").Select
      End If
      End Sub

      ominaisuuksissa
      labelin caption esim. Kirjoita salasana
      lomakkeen caption salasana
      textbox PasswordChar esim *

      ton näytettävän merkin voit vapaasti valita...

      Keep EXCELing
      @Kunde

      • harrastaja123

        Kiitos toimii...


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

    Luetuimmat keskustelut

    1. Poliisi: Kymmenhenkinen pohjalaisperhe ollut vuoden kateissa kansainvälinen etsintäkuulutus Poliis

      Poliisi: Kymmenhenkinen pohjalaisperhe ollut vuoden kateissa – kansainvälinen etsintäkuulutus Poliisi pyytää yleisön apu
      Maailman menoa
      468
      4207
    2. Tässä totuus jälleensyntymisestä - voit yllättyä

      Jumalasta syntyminen Raamatussa ei tässä Joh. 3:3. ole alkukielen mukaan ollenkaan sanaa uudestisyntyminen, vaan pelkä
      Jälleensyntyminen
      319
      1745
    3. Mitään järkeä?

      Että ollaan erillään? Kummankin pää on kovilla.
      Ikävä
      117
      1577
    4. En kadu sitä, että kohtasin hänet

      mutta kadun sitä, että aloin kirjoittamaan tänne palstalle. Jollain tasolla se saa vain asiat enemmän solmuun ja tekee n
      Ikävä
      89
      1494
    5. Noniin rakas

      Annetaanko pikkuhiljaa jo olla, niin ehkä säilyy vienot hymyt kohdatessa. En edelleenkään halua sulle tai kenellekään mi
      Ikävä
      99
      1438
    6. Oisko mitenkään mahdollisesti ihan pikkuisen ikävä..

      ...edes ihan pikkuisen pikkuisen ikävä sulla mua??.. Että miettisit vaikka vähän missähän se nyt on ja oiskohan hauska n
      Ikävä
      60
      1405
    7. Lapuan sanomissa käy rytinä

      Pistivät sitten päätoimittajan pihalle
      Lapua
      52
      1366
    8. Helena Koivu : Ja kohta mennään taas

      Kohta kohtalon päivä lähestyy kuinka käy Helena Koivulle ? Kenen puolella olet? Jos vastauksesi on Helenan niin voisi
      Kotimaiset julkkisjuorut
      100
      1277
    9. Oot ihana

      Toivottavasti nähdään sattumalta jonain kesäpäivänä♥️🥺🫂
      Ikävä
      45
      1129
    10. Au pair -työ Thaimaassa herättää kiivasta keskustelua somessa: "4cm torakoita, huumeita, tauteja..."

      Au pairit -sarjan uusi kausi herättää keskustelua Suomi24 Keskustelupalvelussa. Mielipiteitä ladataan puolesta ja vastaa
      Tv-sarjat
      34
      1108
    Aihe