Threat intelligence is often discussed, but rarely understood. Starting with a precise definition, along with clear business goals, is essential.
For d = 1 To 31 If d > LastDayOfMonth Then Temp = "-" Else MyDate = DateSerial(2000 + MyYear, m, d) If Weekday(MyDate, vbMonday) - 1 < 5 Then LData.MoveFirst Temp = "." Do While Not LData.EOF If LUsers!uinits = LData!LInits Then If MyDate >= LData!LDateFrom And MyDate <= LData!LDateTo Then Temp = LData!LType Exit Do End If End If LData.MoveNext Loop Else Temp = "." End If End If
|How can I change the contents on an Excel workbook based on a lookup list for about 350 plus worksheets with a macro or code?||27||54|
|Trying to display the sum of values on a subform on the main form||6||20|
|vb6 - Transfer from MSHFlexgrid1 to xls issue||8||9|
|How to create a delete query to delete entire records||2||10|
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
14 Experts available now in Live!