calculate course averages Free Excel Macros (VBA) | Excel Programs

Copy Macro

'For online Excel courses click: https://www.excelsizeyeter.com/excelwithkenan.com/udemy_giris.php 
 
1 ADET COMBO
'1 ADET COMMAND
'4 ADET TEXT
'5 ADET LABEL

Private Sub Command1_Click()
Label5.Caption = (Val(Text1) + Val(Text2) + Val(Text3) + Val(Text4)) / 4
End Sub

Private Sub UserForm_Activate()
Combo1.AddItem "DERSİNİZİN İSMİ"
Combo1.AddItem "DERSİNİZİN İSMİ"
Combo1.AddItem "DERSİNİZİN İSMİ"
Combo1.AddItem "DERSİNİZİN İSMİ"
Combo1.AddItem "DERSİNİZİN İSMİ"
Combo1.AddItem "DERSİNİZİN İSMİ"
Combo1.AddItem "DERSİNİZİN İSMİ"
Combo1.AddItem "DERSİNİZİN İSMİ"
Combo1.AddItem "DERSİNİZİN İSMİ"
End Sub

Private Sub Text1_Change()
If Val(Text1) > 100 Or 0 > Val(Text1) Then
MsgBox "GİRDİĞİNİZ SAYI 0 İLE 100 ARASI OLMALIDIR"
Text1.Text = ""
End If
End Sub

Private Sub Text2_Change()
If Val(Text2) > 100 Or Val(Text2)  100 Or 0 > Val(Text3) Then
MsgBox "GİRDİĞİNİZ SAYI 0 İLE 100 ARASI OLMALIDIR"
Text3.Text = ""
End If
End Sub

Private Sub Text4_Change()
If Val(Text4) > 100 Or 0 > Val(Text4) Then
MsgBox "GİRDİĞİNİZ SAYI 0 İLE 100 ARASI OLMALIDIR"
Text4.Text = ""
End If
End Sub

No	Macro Name
1	calculate course averages
2	excel operators hk
3	Delete a set of rows
4	Write numbers to a1: a5 and warns c1 if their total is 100
5	Write numbers to a1: a5 and give warnings to c1 if their sum is not 100
6	add save key to userforma
7	userforma save as key
8	dialog box without userform
9	type the date of the file and calculate how many days have passed
10	Calculate Cube Root: You can use this code to calculate the cube root without applying a formula. Checks all selected cells and converts numbers to cube roots.
11	Square Root Calculator: You can use this code to calculate the square root without applying a formula. checks all selected cells and converts numbers to square.
12	Calculate the sum of cells with only a certain cell color
13	give background color by number on active sheet / page2
14	specify partition, list how many files you have
15	calculate how many sheet / pages are there
16	Calculating uncalculable formulas (Use this if you type a formula but cannot calculate it)
17	if a1 is 0 on the active sheet / page, b1 is the b1
18	Write numbers to a1: a5 and warns c1 if their total is less than 100
19	flip the image on sheet / page 180 degrees
20	Let calculations from column a to column g (except g) calculate other open columns by pressing the button

Excel Free Macros (VBA)

Calculate Course Averages

Online Excel Courses

Services

How can we help you?

Subscribe to our Youtube Channel?

Keywords