Split data in GML file into Excel file


I have a GML file, please find it attached.  I was wondering if there is an automated way in Excel to parse the data in the file.  So all I need from the GML file is the Source and Destination data.  I would like to create two columns in an Excel, one that says Source and once that says Destination.  I would like to insert the source and destination data from the GML file into those respective columns in the Excel file.  But I have to be sure that they match what is the GML file.

Does anybody know of an automated way to do this, as I am sure there is one.

Thank You.
Who is Participating?

[Product update] Infrastructure Analysis Tool is now available with Business Accounts.Learn More

I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

please post a sample copy of the GML file.
navid86Author Commented:
I apologize, forgot to post it.  I am posting it in Excel file format, because EE won't accept .GML attachment.  All I did was just copy and paste from GML file into column a of Excel.

Does this version of the file look like what you see?
Learn SQL Server Core 2016

This course will introduce you to SQL Server Core 2016, as well as teach you about SSMS, data tools, installation, server configuration, using Management Studio, and writing and executing queries.

navid86Author Commented:
Yes, thats exactly what I see in the GML file.
Do you mean the values that follow the source and target strings?
navid86Author Commented:
yeah so I would like one column to say source and the other target.  Then add the corresponding values to the column.  So an example from the GML file is this:

    source 1435
    target 1278

I would like it to be in two columns in excel like this.

Source          Target
1435             1278

Just have to make sure that those values match up with what is in the txt file, like make sure 1435's target is 1278.
something like this?

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
navid86Author Commented:
Yes, except is there anyway to make the column headings source and target and remove source and target from the rows and just leave the numbers?
I thought that's what I posted
navid86Author Commented:
Sorry, didnt see your second post.  Thank you very much for your help!  Just so I know for future reference how did you do this?
I did this manually
* import as fixed text, starting with the "source" string column, not importing the first column.
* fill right two columns
* add a new worksheet
* copy the second column into the new worksheet
* Select the usedrange cells and apply an autofilter
* do a custom filter (does not begin with s)
* Delete the rows
* copy the column back to the original worksheet
* repeat for the third column, with a different custom filter (does not begin with t)
In the original worksheet
* select the second column
* Edit replace all "source " with nothing
* select the third column
* Edit replace all "target " with nothing
* change the column headers for the second and third columns to source and target
* delete the first column
* Save As Excel format

If you need to do this on multiple occasions, you could record a macro with these steps or you could create some VBA code to do this programmatically with a different process.
navid86Author Commented:
great thank you!
Here is an example of a code-centric solution.

Option Explicit

Public Sub ParseSourceTarget()
    Dim wks As Worksheet
    Dim rng As Range
    Dim rngCell As Range
    Dim rngTgt As Range
    Set wks = ActiveSheet
    Set rng = wks.UsedRange
    Set rngTgt = wks.Range("B2")
    Application.ScreenUpdating = False
    For Each rngCell In rng
        Select Case True
            Case rngCell.Value Like "*source #*"
                rngTgt.Value = Split(rngCell.Value, "source ")(1)
            Case rngCell.Value Like "*target #*"
                rngTgt.Offset(0, 1).Value = Split(rngCell.Value, "target ")(1)
                Set rngTgt = rngTgt.Offset(1)
        End Select
    wks.Range("B1").Value = "source"
    wks.Range("C1").Value = "target"
    Application.ScreenUpdating = True
End Sub

Open in new window

in the code-centric solution, I read the file as fixed text with a single column, starting with the first column.
navid86Author Commented:
Cool, thanks for taking the time to post the VBA code.
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
Microsoft Excel

From novice to tech pro — start learning today.