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
salasana ****** taulukon suojauksessa?
2
103
Vastaukset
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
Suomi julkaisi varautumisoppaan
Että sellanen tappaus. Kun kriisitilanne iskee, niin on mentävä nettiin ja luettava ohjeet suomi.fi -sivuilta. Onkohan j2282025Kuhmo tekisi perässä
Lomauttakaa kaupungin talolta turhat lattiankuluttajat pois, kuten naapuripitäjä101768Miehille kysymys
Onko näin, että jos miestä kiinnostaa tarpeeksi niin hän kyllä ottaa vaikka riskin pakeista ja osoittaa sen kiinnostukse571279Onko telepatia totta
Epäilen että minulla ja eräällä henkilöllä on vahva telepatia yhteys. Jos ajattelen jotain hän julkaisee aiheesta jotaki801165Missä Kaisa Lepola, siellä filunki ja sekasotku
Näin se taas nähtiin, ajolähtöjen taakse on joka kerta jääneet savuavat rauniot, oli työpaikka mikä tahansa.171008Nainen, olen niin pettynyt
Ehkä se tästä vielä paremmaksi muuttuu. Yritän itseäni parantaa ja antaa itse itselleni terapiaa, mutta eihän se mitään89954TTK:sta tippunut Arja Koriseva teki erityisen teon kyynelsilmin: "Mä olen ihan järjettömän..."
Kiitos tuhannesti Tanssii Tähtien Kanssa -tansseistanne, Arja Koriseva ja Valtteri Palin! Lue lisää: https://www.suomi15950- 46915
- 70812
Haluaisin jo
Myöntää nämä tunteet sinulle face to face. En uskalla vain nolata itseäni enää. Enkä pysty elämäänkin näiden kanssa jos42804