hex3dec

[Guest]

I want to make a macro that copies a cell value that is in hex, converts it to decimal, increments that number by 1, converts that number to hex and then pastes it in the cell below.

The HEX2DEC command doesnt work from VBA module????

 

[Guest]

Either that or I need to know how to get a macro to increase numbers counting in HEX....

 

[Tom Ogilvy]

application.Run "ATPVBAEN.XLA!Hex2DEc, Range("A1")"


from the immediate window:

Range("A1").Value = "FB"
? application.Run( "ATPVBAEN.XLA!Hex2DEC", Range("A1"))
251


so
Range("A1").Value = "FB"
vVal = application.Run( "ATPVBAEN.XLA!Hex2DEC", Range("A1"))
? vVal
251
vVal = vVal + 1

Range("A2").Value = Application.Run( "ATPVBAEN.XLA!DEC2HEX", vVal)

? Range("A2").Value
FC

--
Regards,
Tom Ogilvy

I want to make a macro that copies a cell value that is in hex, converts

it to decimal, increments that number by 1, converts that number to hex and
then pastes it in the cell below.

 

[Chip Pearson]

In Excel, go to the Tools menu, choose Add-Ins, and select
"Analysis Tool Pak VBA". This will load the ATPVBAEN.XLA add
in.


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com

message

Thanks again Tom, where is the ATPVBAEN.XLA supposed to be

loacated?