add username and password Free Excel Macros (VBA) | Excel Programs

Copy Macro

'For online Excel courses click: https://www.excelsizeyeter.com/excelwithkenan.com/udemy_giris.php 
 
ThisWorkbook" kısmına yazın

Private Sub workbook_open() 
Application.Visible = False 
UserForm1.Show 
End Sub

'Dosyanıza ekleyeceğiniz Userforma bir CommandButton ve iki Textbox yerleştirin ve aşağıdaki kodu Userformun kod kısmına girin

Private Sub CommandButton1_Click() 
If TextBox1.Value = "Ali" Or TextBox1.Value = "Veli" Then 
goto Kontrol2 
Else 
Unload UserForm1 
MsgBox "Üzgünüm girdiğiniz kullanıcı adı hatalı.", vbCritical, "HATA" 
ActiveWorkbook.Close 0 
Exit Sub 
EndIf 
Kontrol2: 
If TextBox2.Value = "123" Or TextBox2.Value = "456" Then 
MsgBox "Programa girişiniz onaylanmıştır.", vbInformation 
Unload Me 
Application.Visible = True 
Else 
Unload UserForm1 
MsgBox "Üzgünüm girdiğiniz parola hatalı.", vbCritical, "HATA" 
ActiveWorkbook.Close 0 
Exit Sub 
EndIf 
End Sub

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer) 
If CloseMode  1 Then Cancel = True 
End Sub

'Ayrıca Textbox2'nin Properties kısmında bulunan "PasswordChar" bölümüne "*" (yıldız) işareti koyarsanız girilen parola ekranda "*****" şeklinde görünecektir.  -

No	Macro Name
1	add username and password
2	excel operators hk
3	Can the characters typed in the inputbox appear as "*****" (password or password characters)?
4	Track and Report User Changes in an Excel worksheet or workbook
5	add buttons to an existing menu bar
6	add menu to file edit menu
7	Encrypt all book and sheet / pages 2
8	Adding a password to commandbuton
9	sending queries to the internet
10	password
11	back all encrypted sheet / pages
12	Encrypt the whole book-you give the password
13	excel crack
14	give background color by number on active sheet / page
15	address2 in the status bar
16	closing message
17	add time as menu
18	add time as menu (most reliable)
19	Show progress in status bar: You can use this macro to show the progress of a macro code in the status bar. This code will add up to 5000 serial numbers to your sheet / page and will progress along with the status bar.
20	fonts in word

Excel Free Macros (VBA)

Add Username And Password

Online Excel Courses

Services

How can we help you?

Subscribe to our Youtube Channel?

Keywords