how to merge duplicate rows in excel kultools

When you use this code, you must be cautious.Ĭombine multiple duplicate rows into one Kutools for Excel

This code is only applied for two columns, if you have more than two columns, this code will only combine first two columns and remove other columns data.

This code can destroy the original data, when you use it, you’d better back up the data first.Ģ. And then click OK, the values in column B have been combined into one record and separated by spaces.ġ. Then press F5 key, and a prompt box pops out to remind you to select a range that you need to combine. WorkRng.Range('A1').Resize(Dic.Count, 1) = (Dic.keys) Set Dic = CreateObject('Scripting.Dictionary')ĭic(arr(i, 1)) = Dic(arr(i, 1)) & ' ' & arr(i, 2) Set WorkRng = Application.InputBox('Range', xTitleId, WorkRng.Address, Type:=8) VBA code: combine multiple rows into one Sub CombineRows() Click Insert > Module, and paste the following code in the Module Window.

Hold down the ALT + F11 keys, and it opens the Microsoft Visual Basic for Applications window.Ģ. So, if you have two columns data, this code will do a favor for you.ġ. The following VBA code can help you combine duplicate rows based on the value of column A, and the following code is only applied for two columns. Amazing! Using Efficient Tabs in Excel Like Chrome, Firefox and Safari! Save 50% of your time, and reduce thousands of mouse clicks for you every day!

How to merge duplicate rows in excel kultools