Microsoft Excel

трюкиприёмырешения

Настраиваем учет внесения денежных средств при платных образовательных услугах при помощи Excel и сети Интернет

Отчет по учащемуся

Один из наиболее востребованных отчетов при учете оплаты за обучение представлен на рис. 4.38. Здесь сотрудник, работающий с книгой Microsoft Excel, щелчком на поле со списком должен выбрать интересующего его учащегося. После этого таблица (начиная с пятой строки) заполняется информацией с листа Квитанции. Перейдем к технической реализации данного листа. Для заполнения поля со списком (Name — People) можно воспользоваться процедурой Worksheet_Activate, которая представлена в листинге 4.30. Она автоматически выполняется при активизации рабочего листа Отчет, и в результате в поле со списком заносятся фамилии учащихся.

Рис. 4.38. Отчет по учащимся

Рис. 4.38. Отчет по учащимся

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
' Листинг 4.33. Процедура обработки щелчка на кнопке Создать файл
Private Sub CommandButton3_Click()
N = 0
' Подсчет числа квитанций
While Cells(N + 5, 1).Value <> ""
	N = N + 1
Wend
Open "C:oplata.txt" For Output As #1
For i = 1 To N
If Cells(i + 4, 3).Value = "оплачено" Then
' Внесение номера договора
	a = Cells(i + 4, 1).Value 
    Print #1, a
' Внесение даты договора
	b = Cells(i + 4, 2).Value
    Print #1, b
End If
Next
Close #1
End Sub

Теперь пользователю необходимо в заполненном поле со списком выбрать конкретного учащегося, что приведет к отображению информации обо всех выписанных и оплаченных квитанциях по учащемуся. Для этого нам потребуется оформить процедуру People_Click в виде, представленном в листинге 4.31.

1
2
3
4
5
6
7
8
9
10
11
12
// Листинг 4.34. Файл index.html
<html><head><title>Оплата обучения</title>
<style type="text/css">
a {text-decoration:none; font-size:14pt;}
a:hover {text-decoration:underline; color:green; background-color:#CCFFCC;}
</style></head>
<body>
<a href="stud.php">Раздел для студентов</a>
<br>
<a href="stud.php">Администрирование</a>
</body>
</html>

1 2 3 4 5 6 7 8


Top