I like it better than mine but cleaned it up a bit

Sub Zeunasc1() 'cleaned up a bit
Dim r As Long
For r = 1 To Cells(Rows.Count, 1).End(xlUp).Row
If Range("A" & r).Value Like "obj*" Then
   objgrp = Cells(r, "a").Value
Else
   netobj = Cells(r, "a").Value
Cells(r, "c").Value = objgrp & netobj
End If
Next
Columns(3).SpecialCells(xlCellTypeBlanks).Delete
End Sub

Don Guillett
SalesAid Software
dguille...@gmail.com
-----Original Message----- From: Zeunasc
Sent: Tuesday, January 03, 2012 7:44 AM
To: MS EXCEL AND VBA MACROS
Subject: $$Excel-Macros$$ Re: Text manipulation

Actually came up with a very simple vb macro:

endrange = Range("A65000").End(xlUp).Row

For r = 1 To endrange

If Range("A" & r).Value Like "obj*" Then
   objgrp = Cells.Range("A" & r).Value
Else
   netobj = Cells.Range("A" & r).Value

Range("H" & r).Value = objgrp & netobj
End If

Next

From that I can make two tables, one for each firewall, and use
vlookups to compare them.

Thank you for the help!

On Jan 2, 10:11 pm, computer tricks 1 <rajanichintan...@gmail.com>
wrote:
On Jan 2, 3:11 pm, Zeunasc <timothy.ry...@gmail.com> wrote:







> I need to compare the object-groups between two firewalls for
> differences.  The raw data from the firewalls looks like this:

> object-group network ABCDEF
>  network-object 1.1.1.0 255.255.248.0
>  network-object 2.2.2.0 255.255.254.0
> object-group network GHIJKL
>  network-object host 3.3.3.3
>  network-object host 4.4.4.4
>  network-object host 5.5.5.5
>  network-object host 6.6.6.6

> So, I was thinking that I would need a way to preface every "network*"
> line with its object-group, making it something like this:

> object-group network ABCDEF network-object 1.1.1.0 255.255.248.0
> object-group network ABCDEF network-object 2.2.2.0 255.255.254.0
> object-group network GHIJKL network-object host 3.3.3.3
> object-group network GHIJKL network-object host 4.4.4.4
> object-group network GHIJKL network-object host 5.5.5.5
> object-group network GHIJKL network-object host 6.6.6.6

> Then I could use a vlookup to spot differences.  The problem is, I
> have no idea how to easily get the data into this format.  Any
> suggestions?  Different idea all together?

--
FORUM RULES (934+ members already BANNED for violation)

1) Use concise, accurate thread titles. Poor thread titles, like Please Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get quick attention or may not be answered.

2) Don't post a question in the thread of another member.

3) Don't post questions regarding breaking or bypassing any security measure.

4) Acknowledge the responses you receive, good or bad.

5) Cross-promotion of, or links to, forums competitive to this forum in signatures are prohibited.

NOTE : Don't ever post personal or confidential data in a workbook. Forum owners and members are not responsible for any loss.

------------------------------------------------------------------------------------------------------
To post to this group, send email to excel-macros@googlegroups.com
--
FORUM RULES (934+ members already BANNED for violation)

1) Use concise, accurate thread titles. Poor thread titles, like Please Help, 
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get 
quick attention or may not be answered.

2) Don't post a question in the thread of another member.

3) Don't post questions regarding breaking or bypassing any security measure.

4) Acknowledge the responses you receive, good or bad.

5) Cross-promotion of, or links to, forums competitive to this forum in signatures are prohibited.
NOTE  : Don't ever post personal or confidential data in a workbook. Forum 
owners and members are not responsible for any loss.

------------------------------------------------------------------------------------------------------
To post to this group, send email to excel-macros@googlegroups.com

Reply via email to