Guest User

Untitled

a guest
Sep 24th, 2018
85
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.43 KB | None | 0 0
  1. Activeworkbook.Sheets("Sheet1").Range("A1") = objwdDoc.ContentControls(12).Range.Text
  2.  
  3. Activeworkbook.Sheets("Sheet1").Range("A1") = format(objwdDoc.ContentControls(12).Range.Text, "DD/MM/YYYY")
  4.  
  5. Activeworkbook.Sheets("Sheet1").Range("A1") = format(objwdDoc.ContentControls(12).Range.Text, "MM/DD/YYYY")
  6.  
  7. date1 = format(objwdDoc.ContentControls(12).Range.Text, "MM/DD/YYYY")
  8.  
  9. Activeworkbook.Sheets("Sheet1").Range("A1") = date1
Add Comment
Please, Sign In to add comment