Thread: Please help in microsoft.public.excel.programming

  Hi, Yep I know - that code's from an earlier answer where the sheet names weren't specified. I just put in 12 strings to give the OP the idea in case there wasn't a pattern. I subsequent re-postings they've adopted my convention! "Joel" wrote: > Sam: You can get the filename easily using the modification below. > > For i = 1 To 12 > FName =...

  Thanks I'll give this a test and see what its doing. Sorry for not seeing ur reply sooner. Thanks a lot for your help and sticking with it LiAD "Sam Wilson" wrote: > Hi, > > I've posted this to your other threads: > > Sub SummariseYear() > > Application.DisplayAlerts = False > > Dim xwb As Workbook > Dim xws As Worksheet > Set...

  Sam: You can get the filename easily using the modification below. For i = 1 To 12 FName = format(dateserial(2009,i,1),"mmm.xls") Set wb = Workbooks.Open(sPath & FName) "Sam Wilson" wrote: > Hi, > > I've posted this to your other threads: > > Sub SummariseYear() > > Application.DisplayAlerts = False > > Dim xwb As...