I have a large dataset containing data for various cities, and I need to separate the data of each city into a separate file so I can work on them further separately.
I've attached example sheets, the original file need to get transformed into three separate files containing data for separate cities. I would love any help on this?
Coy the code to the standard code module1.
Please Login or Register to view this content.
Any code provided by me should be tested on a copy or a mock up of your original data before applying it to the original. Some events in VBA cannot be reversed with the undo facility in Excel. If your original post is satisfied, please mark the thread as "Solved". To upload a file, see the banner at top of this page.
Just when I think I am smart, I learn something new!
Hi ! Try this !
As a VBA beginner starter demonstration :
PHP Code:Sub Demo1()
Dim P$, C%
P = ThisWorkbook.Path & Application.PathSeparator
With Application
.DisplayAlerts = False: .ScreenUpdating = False: .SheetsInNewWorkbook = 1
Workbooks.Add
With Sheet1.[A1].CurrentRegion.Columns
[A1].ColumnWidth = .Item(1).ColumnWidth
.Item(1).Copy [A1]
For C = 2 To .Count
[B1].ColumnWidth = .Item(C).ColumnWidth
.Item(C).Copy [B1]
ActiveWorkbook.SaveAs P & .Cells(C).Text, xlOpenXMLWorkbook
Next
End With
ActiveWorkbook.Close False
.DisplayAlerts = True: .ScreenUpdating = True
End With
End Sub
► Do you like it ? ► ► So thanks to click on bottom left star icon « ★ Add Reputation » !
Last edited by Marc L; 03-29-2020 at 11:24 PM. Reason: optimization …
Thanks dude, this worked perfectly.
Thanks for the rep. Don't forget to mark the thread as solved.Originally Posted by Choochi
regards, JLG
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks