[raus]

Сообщение от mariya

У нас так борются с остатками:
1.Поручили отделу информатизации создать прогу, которая сравнивает нашу базу штрафов ГИБДД и базу гаишников с уже оплаченными штрафами. Данная прога выводит совпадения по оплаченным штрафам.... хорошо, что базы выводятся в виде таблиц excel.

в студию...

Сообщение от mariya

, но ответ обработать сложно.

в смысле?

[mariya-ipristav]

Сообщение от raus

в студию...

Когда я писала............................. прога была в разработке, которая представляла собой макрос, выделяющий цветом совпадающие ячейки, но после тестирования мы столкнулись с такой проблемой: В базе ГИБДД постановление содержит серию и номер ( 67 СМ 123456), а наша канцелярия забивает только номер постановления (123456), а в разных сериях есть одинаковые номера. Теперь стоит задача- как объединить ячейки в таблице с разными форматами .Попробовать сравнивать например такую строку в 2-х базах: "ИВАНОВ123456". Может, вы поможете решить эту проблему?



Sub Main()

Dim i As Long, x As Range, Fst As String
Application.ScreenUpdating = False
Workbooks("Книга1.xls").Sheets(1).Activa te
With Workbooks("Книга2.xls").Sheets(1)
Columns("A").Interior.ColorIndex = xlNone
.Columns("A").Interior.ColorIndex = xlNone
For i = 1 To Cells(Rows.Count, "A").End(xlUp).Row
Set x = .Columns("A").Find(what:=Cells(i, "A"), LookAt:=xlWhole)
If Not x Is Nothing Then
Cells(i, "A").Interior.ColorIndex = 6
Fst = x.Address
Do
.Cells(x.Row, "A").Interior.ColorIndex = 6
Set x = .Columns("A").FindNext(x)
Loop While Fst <> x.Address
End If
Next
End With

End Sub

[mariya-ipristav]

Сообщение от raus

в смысле?

Времени не хватает, мы работаем в таком режиме: вторник с 8-00 до 15-00 и четверг с 16-00 до 20-00 мы осуществляем личный прием граждан, все остальное время мы должны, вернее обязаны проводить на участке. Опишу примерно мой рабочий день в понедельник, к 9 утра приходишь на работу , у тебя есть 30 минут, чтобы сдать деньги, а процедура сейчас поменялась, на штраф 100 рублей тебе надо оформить 3 документа- сама квитанция, объявление, постановление о распределении денежных средств с утверждением у старшей-минут 10 стоишь в очереди, чтобы подписать постановление, помимо тебя впереди еще 10 приставов. После 10 часов, все приставы едут на участок, кроме дежурных (замы ходят по кабинетам и проверяют, кто не уехал). С 9-30 до 10-00 ты ищешь охрану и брата пристава, у которого участок рядом, с 10-00 до 13-00 ходим на его территории, с 13-45 до 18-00 на твоей. Обед на участке- у меня как раз лесная зона, обедаю на пеньке))))))) и так понедельник, часть вторника, среда , часть четверга, пятница. В 70 % должник отсутствует дома, и ты работаешь почтальоном. Но надо не забывать, что тебе надо разложить запросы, сделать списание, отправить на работу, ответить на обращения, сдать ежедневные и недельные отчеты и на это у тебя только - вторник и четверг. И поэтому возникает вопрос об эффективности рабочего дня?