Friends you will be able to learn #userform coding to add #data #entry in #excel via developer tab for making your data entry work very easy to add in excel. #explore #learning #education #vba #school #college #student
How to make and design userform with coding for data entry in excel Part 1 • Learn to make and design Userform for...
#explore #excel #learning #userform #Explore #excel #learning #knowledge #userform #data #datascience #python #machinelearning #programming #deeplearning #coding #datascientist #bigdata #javascript #java #sql #mysql #php #developer #school #student #college #university #teacher #teaching #computer #vision #businessanalytics #businessanalysis #online #onlineclasses # #computerscience #googleanalytics #dataanalytics #html #knowledge #java
Explore Twitter Account : / explore43629915
Explore Facebook Account : / explore-104591981615566
#explore #learning #education #vba #school #college #student #small #business #learn #education #knowledge #learning #spreadsheet
Coding:
Private Sub CommandButton1_Click()
Dim x As Long
Dim y As Worksheet
Set y = Sheet1
x = y.Range("A" & Rows.Count).End(xlUp).Row + 1
With y
.Cells(x, 1).Value = TextBox1.Text
.Cells(x, 2).Value = TextBox2.Text
.Cells(x, 3).Value = ComboBox1.Text
If OptionButton1.Value = True Then
.Cells(x, 4).Value = "Male"
End If
If OptionButton2.Value = True Then
.Cells(x, 4).Value = "Female"
End If
End With
End Sub
Private Sub CommandButton2_Click()
Unload Me
End Sub
Private Sub CommandButton3_Click()
Unload Me
UserForm1.Show
End Sub
Private Sub CommandButton4_Click()
End Sub
Private Sub TextBox2_Change()
TextBox2.Text = Application.WorksheetFunction.Proper(TextBox2.Text)
End Sub
Private Sub UserForm_Click()
TextBox1 = Application.WorksheetFunction.Max(Sheet1.Range("A5:A1000")) + 1
End Sub
#explore #Explore
Disclaimer -
video is for educational purpose only.Copyright Disclaimer Under Section 107 of the Copyright Act 1976, allowance is made for "fair use" for purposes such as criticism, comment, news reporting, teaching, scholarship, and research. Fair use is a use permitted by copyright statute that might otherwise be infringing. Non-profit, educational or personal use tips the balance in favor of fair use.