SHARE
TWEET

Untitled

a guest Jun 20th, 2019 48 Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. Dim time1, time2, time3, time4 As Range
  2.  
  3.     Set time1 = Range(Cells(5, 4), Cells(numDays + 4, 5))
  4.     Set time2 = Range(Cells(5, 6), Cells(numDays + 4, 7))
  5.     Set time3 = Range(Cells(5, 8), Cells(numDays + 4, 9))
  6.     Set time4 = Range(Cells(5, 10), Cells(numDays + 4, 11))
  7.      
  8. With Selection.Borders(xlEdgeLeft)
  9.         .LineStyle = xlContinuous
  10.         .ColorIndex = xlAutomatic
  11.         .TintAndShade = 0
  12.         .Weight = xlThin
  13.     End With
RAW Paste Data
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy. OK, I Understand
 
Top