UPDATE Sheet1 SET Date1 = '"& data1 & "' Where Vertical = '" & Combo1.text & "'"
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)