ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   binary inverse (https://www.excelbanter.com/excel-discussion-misc-queries/93802-binary-inverse.html)

boardmaker

binary inverse
 

To make my life a little easier is there any way to get a binary number
to inverse. Example. 1110 in a1 so then b1 would become 0001.


--
boardmaker
------------------------------------------------------------------------
boardmaker's Profile: http://www.excelforum.com/member.php...o&userid=34854
View this thread: http://www.excelforum.com/showthread...hreadid=551647


mooncrawler

binary inverse
 
Public Function binverse(wCell As String) As String
Dim x, y As Integer
Dim nResult As String
nResult = vbNullString
x = Len(wCell)
For y = 1 To x
If Mid(wCell, y, 1) = "1" Then
nResult = nResult & "0"
Else
nResult = nResult & "1"
End If
Next
binverse = nResult
End Function




"boardmaker"
schreef in bericht
...

To make my life a little easier is there any way to get a binary number
to inverse. Example. 1110 in a1 so then b1 would become 0001.


--
boardmaker
------------------------------------------------------------------------
boardmaker's Profile:
http://www.excelforum.com/member.php...o&userid=34854
View this thread: http://www.excelforum.com/showthread...hreadid=551647




David Biddulph

binary inverse
 
"boardmaker" wrote
in message ...

To make my life a little easier is there any way to get a binary number
to inverse. Example. 1110 in a1 so then b1 would become 0001.


One way would be =DEC2BIN(2^(LEN(A1))-1-BIN2DEC(A1),LEN(A1))
--
David Biddulph



[email protected]

binary inverse
 
boardmaker wrote:
To make my life a little easier is there any way to get a binary number
to inverse. Example. 1110 in a1 so then b1 would become 0001.


I presume you mean one's complement, not inverse. And 0001 is the
complement of 1110 only in a 4-bit world.

The one's complement of a 4-bit binary number (in A1) can be computed
by:

=dec2bin(16 - bin2dec(A1) - 1, 4)


daddylonglegs

binary inverse
 

Here's one way

=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(A1,1,2),0,1),2,0 )


--
daddylonglegs
------------------------------------------------------------------------
daddylonglegs's Profile: http://www.excelforum.com/member.php...o&userid=30486
View this thread: http://www.excelforum.com/showthread...hreadid=551647



All times are GMT +1. The time now is 04:46 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com