Copy to an existing wb or create new wb if it does not based on ce
You have two choices ( or due both).
1) check if the file exists using DIR(filename) FName = dir(Filename) if FName = "" then 'file doesn't exist else 'file does exist end if 2) Check column A for customer Customer = Range("D5") set c = Columns("A").Find(what:=Customer, _ lookin:=xlvalues, lookat:=xlwhole) if c is nothing then 'customer doesn't exist else 'customer does exist end if "winnie123" wrote: Hi If I had a customer name in Cell D5, which has been selected from a validation list is it possible to 1. check a summary sheet to see if the file already exists and if so add data to the next available row. The summary sheet would have the customer name in A4 downwards, B4 downwords would be the hyperlink to the file. 2. use that customer name to create a new file, would need to copy header row as well as data. Then update the summarry sheet to include the new Customer name and file path. At the moment I have a macro from RDB which copies all unique vales into new workbooks and creates this summary page with the hyperlinks. As more records gets added it may mean that the macro is creating 300 files which will take time. So I am looking at just adding the new reord to the existing file or create new. Any help and advise would be appreciated as always. Thankyou Winnie |
All times are GMT +1. The time now is 10:45 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com