Search:

Okay, I just tried in a new file and it worked.

So, I will figure out the conflict on my end. Thanks.

Still giving the runtime at lPtr = PeekPtr(VarPtr(vArray) + 8).

Thanks wqweto;

@wqweto, I am getting a Runtime 13 error at the line "lPtr = Peek(VarPtr(vArray) + 8)" in the GetArrayDimension function from this thread. I am using Excel 2003. (Sub Demo_ArrayDims.)



Public...

@LeanDroA; Can you post the GetbSize routine?

@Wqweto; Can you share the binary read and write codes: ReadBinaryFile and WriteBinaryFile?

baData = ReadBinaryFile("c:\path\to\input.file")
AesCryptArray baData, ToUtf8Array("pass")...

@Schmidt, Thanks. The first code is better suited to the requirement.

@Schmidt, one issue, when i run it for say 18 and 23, i get an overflow error ... i tried changing to Double, but still an overflow.

As a reference, when i run 18 and 23 on planet calculators...

I am trying to replicate the Splitting Method for fractions.

Given two integers p, q, the method states that using the identity 1/n = 1/(n+1) + 1/(n(n+1)):
Step 1:Write p/q as the sum of p unit...

Thanks, eveyone!

@passel;

These links below give the value of pi in binary as 11.00100 10000 11111 10110 10101 00010 00100 00101 10100 01100 00100 01101 00110 00100 11000 11001 10001 01000 10111 00000 . . .

So,...

I want to read the binary file of 1,048,576 binary digits of pi after the radix point. The file can be downloaded from: http://weitz.de/files/pi.zip

The file is meant to be read byte by byte (i.e....

Quick question ... why are we using H554D instead of B2AA as init?

Got it ... thanks.

Not giving the right output. I modified the init to &hB2AA (as per online tool), but no match still.

@wqweto; Can you help me with the CRC-16/RIELLO?

@wqweto; Thanks this works!

I am referencing a set of VBA CRC codes posted at:
https://www.vbforums.com/showthread.php?801523-Generating-a-unique-fixed-length-hash-in-VB6
by @Schmidt.

How can the helper functions be used...

I will add another example,

For instance, with d = 3/5, the binary is 0.100110011001100110011001100110011001100110011001100110011001 with repeating bits 1001.
- To 5 places (next bit, 5+1 th, is...

I am using just Excel VBA.

I need help with the rounding of binary strings. I am not sure I have applied the tie-breaking rule correctly.

This gives an explanation of "nearest even" method. ...

@The trick; is there a test code on the usage? I am struggling with the Sub usage.

Similarly, the value 12345 with a standard binary of 0011000000111001 has the following output:

64-bit Double: 40C81C8000000000 | 0-10000001100-1000000111001000000000000000000000000000000000000000...

@dilettante;

I am not faffing around :) ... I am talking about half-precision floating numbers here. The code that I shared converts between unsigned and signed 64-bit double-precision...

How can one modify the below code to output 16-bit Half instead of 64-bit Double?


Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" ( _
Destination As Any, _
Source...

@Elroy; can your translation be modified to handle doubles?

@dilettante; thanks.

I know :) but was trying to implement the ABS logic.

I want to convert the below c code to VBA. I have attempted but the output is not what it should be. Any suggestions?


01: float myAbs(float x)
02: {
03: // copy and re-interpret as 32 bit...

The udf below outputs swapped long after WORD swap. It handles perfectly positives. How can it be modified to handle negative input? For es=xample, with n = +305419896 the output is 2018915346. But...

@couttsj;

I tried but this still does not give me the following for N = "&HEDCBA988" (Decimal -305419896) ... THE UINT32 and UINT16 Values listed as:

"UINT32 - Big Endian (ABCD):"; '...

The following code outputs the swapped values basis the High and Low WORD and BYTE of a value. Most of the output matches with the output from the online calculator at...

@Elroy;

I was wondering if there is an updated version of SVD? Also, I am getting value error while using it in Excel. Can I seek help?