Макрос работает так, при нажатии кнопки перенос ,переносит все данные из листа (табель) в лист (вредность) кроме данных залитым зеленым цветом . Нужно добавить чтобы числа меньше 9,18 не переносились .
Добавить в существующий макрос еще одну функцию
12.12.2024 18:29:20
|
|
|
|
12.12.2024 23:43:26
dima18031997, достаточно дописать
If wsSource.Cells(i, j).Interior.Color <> greenColor And sourceData(i, j) > 9.18 Then Но так и даты обработает, и разряды, а они там много где, усложнять нужно код... Но в примере других меньше 9.18 и нет ))
Изменено: |
||||
|
|
|||