tALT

Untitled

Dec 6th, 2016
916
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. 5:
  2. On Error GoTo 6
  3.     Workbooks.Open Filename:=cudir & "\" & "05_май" & "\" & "DSDI905_0516.xls"
  4. 6:
  5. On Error GoTo 7
  6.     Workbooks.Open Filename:=cudir & "\" & "06_июнь" & "\" & "DSDI905_0616.xls"
  7. 7:
  8. On Error GoTo 8
  9.     Workbooks.Open Filename:=cudir & "\" & "07_июль" & "\" & "DSDI905_0716.xls"
RAW Paste Data