thebestwhe.blogg.se - Excel split cells forward slash

VCounter = Range(A & Rows.Count).End(xlUp).RowĪ field:=Columns(vColumn).Column, Criteria1:=vFilterĭspCounter = Range(A & Rows.Count).End(xlUp).RowĭspFilter = Sheets(dspSummary).Cells(j, 1)Ī field:=Columns(dspColumn).Column, Criteria1:=dspFilterĪctiveWorkbook.SaveAs ThisWorkbook.Path & \Split Results\ & vFilterĪctiveWorkbook.SaveAs ThisWorkbook.Path & \Split Results\_Empty VColumn = InputBox(Please indicate which column you would like to split by, Column selection)Ĭolumns(A).RemoveDuplicates Columns:=1, Header:=xlYes