ник: Анатолий (Киев)
Function GetPartFromString(Text, Optional ByVal sSep As String = " ", Optional ByVal PartNum As Byte = 1) As String
On Error Resume Next
GetPartFromString = Split(Text, sSep)(PartNum - 1)
End Function
|
Эту функцию положите в модуле (создайте новый на вкладке "Модули");
Создайте запрос на основе вашей таблицы, который будет использоваться в источнике отчета. В конструкторе выберите поля ASNTEXT,DATE,SUM, и добавьте еще три такого вида:
Первое: GetPartFromString([ASNTEXT]; ";" ;
3)
Второе: GetPartFromString([ASNTEXT]; ";" ;
4)
Третье: GetPartFromString([ASNTEXT]; ";" ;
5)
Эти поля будут возвращать Иванова Светлана Петровна,ВВ625432 и 2840216080 соответственно.
Успехов в освоении Access.