Filling in columns counting by Hex
You didn't tell us how the front part of the values in Columns B and C are
specified, so I hard-coded what you showed us into the following macro (you
will have to adjust this on your own or tell us how this information is
derived so we can show you how to do it). Also your specification on which
cells to operate on was kind of sketchy, so I took the easy way out and
simply made the code operate on each cell in the current selection...
Sub HexSplitter()
Dim Cell As Range, HexNum As String
For Each Cell In Selection
HexNum = Right("0000" & Hex(Right(Cell.Value, 5)), 4)
Cell.Offset(0, 1).Value = "100.100.1." & CLng("&H" & Right(HexNum, 2))
Cell.Offset(0, 2).Value = "00-00-00-00-" & Format(HexNum, "@@-@@")
Next
End Sub
--
Rick (MVP - Excel)
"Ron" wrote in message
...
Oh yeah...if it could go down a certain number of rows, which I would tell
it, or until it hit a filled cell in Column B or C...that would help.
Thanks, wizards
"Ron" wrote:
3 columns:
A B C
042-0-0-01234 100.100.1.210 00-00-00-00-04-D2
I will have a list in column A, numerical...042-0-0-01234,042-0-0-01235,
etc
Column C will have a MAC and the last 2 segments are based on the last 5
of
column A. e.g. 01234 = 04D2 (first 4 segments are fixed)
Column B is decimal of last segment of column C, e.g. D2 = 210
I would like to scroll down column A, and fill in column B anc C, which I
am
doing manual right now.
Way beyond me.....Any ideas?
Thanks,
Ron
|