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

128

    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. Epäily: Oppilas puukotti kolmea Pirkkalan koululla

      Tämänhetkisen tiedon mukaan ainakin kolme oppilasta on loukkaantunut puukotuksessa Pirkkalan Vähäjärven koululla. Myös e
      Pirkanmaa
      250
      6849
    2. Jos yhdistät nimikirjaimet

      Jos yhdistät sinun ja kaivattusi ensimmäisten nimien alkukirjaimet mitkä nimikirjaimet tulee? Sinun ensin ja sitten häne
      Ikävä
      66
      4294
    3. Jos olisit täällä

      Tosin en tiiä miks oisit. (Ja hävettää muutenkin kun ei muka muulla tavoin osaa kertoa tätäkään) Jos jollain pienellä
      Ihastuminen
      135
      3208
    4. Tämän hetken

      Terveiset kaivatullesi ⬇️
      Ikävä
      156
      2332
    5. Kesän odotuksia hyrynsalmella

      Kyllä kesällä hyrynsalmellakin on mahdollisuus osallistua kylän menoon monella tavalla . On kaunislehdon talomuseolla
      Hyrynsalmi
      18
      1870
    6. Pirkkalan koulussa puukotus, oppilas puukotti kolmea

      Ilmeisesti tyttöjä ollut kohteena.
      Maailman menoa
      170
      1607
    7. Vieläkö sä toivot

      Meidän välille jotain?
      Ikävä
      82
      1494
    8. Voi Rakas siellä

      Olet ollut mun ajatuksissa taas koko päivän. Olet ihmeellinen kertakaikkiaan ja arvostan sinua niin paljon❤️Minulla ei o
      Tunteet
      31
      1488
    9. Ohhoh! KAJ laukoi suorat sanat somessa - V-sana mainittu!

      Ohhoh! Mitäs mieltä olet tästä huumoriryhmä KAJ:sta? Bara bada bastu on kyllä aikamoinen korvamato... Lue lisää: https
      Euroviisut
      38
      1393
    10. Erika selvisi hienosti ennakkosuosikin paineista

      Hienostihan se meni. Erika jätettiin yksin, eikä häntä tuettu, oli euroviisukiusattu, silti suoriutui ensiluokkaisesti.
      Maailman menoa
      111
      1071
    Aihe