Hello
Can anyone please tell what is wrong with my code. When I run this Sub CalcWriteMisc() everything works perfectly.
Sub CalcWriteMisc() 'Calculates and writes misc. items to MiscItemsDB
Dim ws2 As Worksheet: Set ws2 = ThisWorkbook.Sheets("DataEntryItemsDB")
Dim ws3 As...