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