What you had find is a Third Party Addin for Excel. How to split data into multiple worksheets based on column in Excel? So I think that you visited the link mentioned below. Still on the Developer tab of the ribbon, click Macros.įrom the description of thread I understand that you are talking about "Enterprise" Tab.Change the two constants at the beginning of the code as needed - lngNameCol is the number of the NAME column and lngFirstRow is the first row with data *excluding the header row). WshSource.Rows(lngRow).Copy Destination:=wshTarget.Cells(lngTargetRow, 1) WshSource.Rows(lngFirstRow - 1).Copy Destination:=wshTarget.Cells(1, 1) WshTarget.Name = wshSource.Cells(lngRow, lngNameCol).Value Set wshTarget = Worksheets.Add(After:=Worksheets(Worksheets.Count)) If wshSource.Cells(lngRow, lngNameCol).Value wshSource.Cells(lngRow - 1, lngNameCol).Value Then LngLastRow = wshSource.Cells(, lngNameCol).End(xlUp).Row Copy the following code into the code module that appears:Ĭonst lngNameCol = 2 ' names in second column (B)Ĭonst lngFirstRow = 2 ' data start in row 2.Activate the Developer tab of the ribbon.In the list of 'Main Tabs' on the right, tick the check box labeled Developer.Select 'Customize Ribbon' in the navigation pane on the left.
0 Comments
Leave a Reply. |
AuthorWrite something about yourself. No need to be fancy, just an overview. ArchivesCategories |