По нажатию кнопок рассчитать - VBA
Формулировка задачи:
Помогите пожалуйста. По нажатию кнопок рассчитать: общую сумму стипендий по заданной группе и среднемесячную стипендию этой группы. Вывести в textbox1 и textbox2.
Решение задачи: «По нажатию кнопок рассчитать»
textual
Листинг программы
Private Sub CommandButton1_Click() Dim RowCount As Integer, I As Integer, Sum As Long Dim Group As String RowCount = Worksheets("Лист1").UsedRange.Rows.Count Group = TextBox3.Text For I = 2 To RowCount If Cells(I, 3).Value = Group Then Sum = Sum + Cells(I, 4).Value Next I TextBox1.Text = Sum End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д