View Single Post
  #2 (permalink)  
Old September 6th, 2007, 11:42 PM
Shasur Shasur is offline
Friend of Wrox
Points: 3,060, Level: 23
Points: 3,060, Level: 23 Points: 3,060, Level: 23 Points: 3,060, Level: 23
Activity: 0%
Activity: 0% Activity: 0% Activity: 0%
 
Join Date: Sep 2005
Location: , , .
Posts: 812
Thanks: 1
Thanked 53 Times in 49 Posts
Default

My guess would be

Replace
filename = "C:\Users\lthuynh\Documents\MH\Lab Data Collection_ final_aag2"
'Set compfile = Workbooks.Open(filename:=filename, Format:=5)

with

filename = "C:\Users\lthuynh\Documents\MH\Lab Data Collection_ final_aag2.xls"
Set compfile = Workbooks.Open(filename:=filename, Format:=5)

Try and let me know if it is still creating problem

Cheers
Shasur

http://www.dotnetdud.blogspot.com

VBA Tips & Tricks (http://www.vbadud.blogspot.com)
Reply With Quote