У меня есть следующая строка кода VBA:
Set Rng = wb.Sheets("Sheet1").Range("A:A")
Set c = Rng.Find(Format(Date, "dddd, mmmm dd, yyyy"), LookIn:=xlValues)
Они всегда работали.Я не знаю, почему он внезапно перестал работать вчера.
Я проверил - искомое значение ячейки все еще имеет тот же формат даты.
У меня есть коды, которые устанавливают фильтр на текущийМесяц поиска даты.
wb.Worksheets("Sheet1").ListObjects("Table1").Range.AutoFilter Field:=1, Criteria1:= _
Month(Date) + 20, Operator:=xlFilterDynamic
Интересно, может ли быть возможно что-либо из перечисленного ниже и есть ли способы, как это исправить.
1) IЯ использовал Windows 7, но теперь я использую Windows 10.
2) Я использовал Excel 2013, но теперь я использую Excel 2016.
Я тестировал эти коды раньше в Windows 10 иExcel 2016 они работали до вчерашнего дня 1 апреля 2019 года.
Спасибо!