• 15 апреля стартует «Курс «SQL-injection Master» ©» от команды The Codeby

    За 3 месяца вы пройдете путь от начальных навыков работы с SQL-запросами к базам данных до продвинутых техник. Научитесь находить уязвимости связанные с базами данных, и внедрять произвольный SQL-код в уязвимые приложения.

    На последнюю неделю приходится экзамен, где нужно будет показать свои навыки, взломав ряд уязвимых учебных сайтов, и добыть флаги. Успешно сдавшие экзамен получат сертификат.

    Запись на курс до 25 апреля. Получить промодоступ ...

Поиск по двум датам

  • Автор темы ILIMDAR
  • Дата начала
I

ILIMDAR

Всем здравствуйте. Нужна помощь. как сделать поиск по двум датам

With Baza.Spreadsheet1.Sheets("ProdajaK")
e = 2
r = 1
Do While .Cells(e, 1) > ""
If DTPicker1 = .Cells(e, 2) Or DTPicker2 = .Cells(e, 2) Then
r = r + 1
Spreadsheet1.Sheets("Sheet1").Cells(r, 1) = .Cells(e, 2) 'Text2.Text
Spreadsheet1.Sheets("Sheet1").Cells(r, 2) = .Cells(e, 1) 'Text2.Text
Spreadsheet1.Sheets("Sheet1").Cells(r, 3) = .Cells(e, 3) 'Text3.Text
Spreadsheet1.Sheets("Sheet1").Cells(r, 4) = .Cells(e, 4) 'Text3.Text
End If
e = e + 1
Loop
End With
 
Для ответа нужно войти/зарегистрироваться
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!

Верх Низ