Ok. I think I have found the problem. I was testing with small files. The files were so small that no copy progress would appear. I have now tested with large amounts of files and I do now get a progress. Apologies for my stupidity but thank you for the response. Just to double check, I have tested the copy with my original code with the large files and I do not get a progress bar with it. GUICopy is working a treat. New code below.

Code:
  Function CopyUser()

   dim $serverPath,$localPath
   $serverPath = 'F:\Share\' + $User.text 
   $localPath = 'c:\data\User\'
   If exist($serverPath)
      GUIcopy($serverPath + '\*.*', $localPath)
   EndIf

EndFunction