Stop VBA Module erasing data

Hello all,

I've copied a module I found on ExtendOffice and modified it to suit my needs. When I click a button, it pulls all unique Employee IDs from column C of data exported from FileMaker (RawData!). It pastes these unique values in column A of a table on a different sheet (MainTool!).

The table in the main tool then uses the Employee IDs to cross reference the RawData for more information using an index match.

While the code works great and does exactly what I want it to, it also deletes all values and formulas (including all my index match stuff) in columns F onward.

I'd like it to only replace the data in column A without deleting anything.

Please Login or Register  to view this content.

If there's no values in column A before pressing the button, the module works fine. But if I need to update the values already in the Main Tool and press the button again, here's what happens (Employee names & table headers erased):

sample.JPG

I think it erases all of my formulas because it's deleting duplicates, but even changing where it copies the range (xRng.Copy Range("A8")) to a cell below the original unique values (I have 97 unique values; I changed Range("A8") to Range("A105")) in the hopes of having the macro delete duplicates below the ones connected to formulas did not work.

Any help is greatly appreciated.

Hello bakerman2,

That seems to have worked! Thank you so much for your help.