ExcelBanter - Help me please

ExcelBanter (https://www.excelbanter.com/)

- Excel Programming (https://www.excelbanter.com/excel-programming/)

- - Help me please (https://www.excelbanter.com/excel-programming/367429-help-me-please.html)

hey all,

i had to write a program a while ago, actually in C, that is able t
convert for example a dec in hex or any other number in binary, hex
oct....now i am having problems with writing the same in VBA. it woul
be great if somebody could post a code of a small VBA program that ca
convert any numbers.
Heres the code of the C program, just to get you an idea of what i a
talking about. Sorry for my bad english but i am from austria.

thanks again, darcus

#include <stdio.h

void main ()
{
/* Variable (Zeichen) definieren */
unsigned char cZeichen;
printf("\nBitte geben Sie ein beliebiges Zeichen ein: "); scanf("%c"
&cZeichen);
/* Anlegen einer Tabelle zur Umrechnung des eingegebenen Zeichens */
printf("\n-----------------------------------------------------------------");
printf("\n|\tASCII\t|\tDez.\t|\tHex.\t|\tOkt.\t|\n ");
printf("\-----------------------------------------------------------------\n");
/* Berechnung des gesuchten Wertes für eingegebenes Zeichen */
printf("\|\t%c\t|", cZeichen); /* Ausgabe des oben eingegebene
Zeichens in ASCII */
printf("\t%d\t|", cZeichen); /* Ausgabe des eingegebenen Zeichens al
Dezimalzahl */
printf("\t%x\t|", cZeichen); /* Ausgabe des Zeichens als Hexadezimal
*/
printf("\t%o\t|\n", cZeichen); /* Ausgabe des Zeichens als Oktalzah
*/
printf("\-----------------------------------------------------------------\n");

--
darcu
-----------------------------------------------------------------------
darcus's Profile: http://www.excelforum.com/member.php...fo&userid=3644
View this thread: http://www.excelforum.com/showthread.php?threadid=56211

num = 123456789

sHex = Hex(num)
num2 = CLng("&H" & sHex)

sOct = Oct(num)
num3 = CLng("&0" & sOct)

MsgBox sHex & vbCr & num2 & vbCr & vbCr & vbCr & sOct & vbCr & num3

num4 = &HFFFFFF
MsgBox num4, , "&HFFFFFF"

num5 = &O123
MsgBox num5, , "Oct:123"

Regards,
Peter T

"darcus" wrote in
message ...

hey all,

i had to write a program a while ago, actually in C, that is able to
convert for example a dec in hex or any other number in binary, hex,
oct....now i am having problems with writing the same in VBA. it would
be great if somebody could post a code of a small VBA program that can
convert any numbers.
Heres the code of the C program, just to get you an idea of what i am
talking about. Sorry for my bad english but i am from austria.

thanks again, darcus

#include <stdio.h

void main ()
{
/* Variable (Zeichen) definieren */
unsigned char cZeichen;
printf("\nBitte geben Sie ein beliebiges Zeichen ein: "); scanf("%c",
&cZeichen);
/* Anlegen einer Tabelle zur Umrechnung des eingegebenen Zeichens */

printf("\n-----------------------------------------------------------------"
);
printf("\n|\tASCII\t|\tDez.\t|\tHex.\t|\tOkt.\t|\n ");

printf("\-----------------------------------------------------------------\n
");
/* Berechnung des gesuchten Wertes für eingegebenes Zeichen */
printf("\|\t%c\t|", cZeichen); /* Ausgabe des oben eingegebenen
Zeichens in ASCII */
printf("\t%d\t|", cZeichen); /* Ausgabe des eingegebenen Zeichens als
Dezimalzahl */
printf("\t%x\t|", cZeichen); /* Ausgabe des Zeichens als Hexadezimale
*/
printf("\t%o\t|\n", cZeichen); /* Ausgabe des Zeichens als Oktalzahl
*/

printf("\-----------------------------------------------------------------\n
");

}

--
darcus
------------------------------------------------------------------------
darcus's Profile:
http://www.excelforum.com/member.php...o&userid=36449
View this thread: http://www.excelforum.com/showthread...hreadid=562113

thank you very very much! but another question, is there a possibilit
to convert the entered number in a binary number? i was trying to fin
any function or so but didnt come up with anything....thanks again!

darcu

--
darcu
-----------------------------------------------------------------------
darcus's Profile: http://www.excelforum.com/member.php...fo&userid=3644
View this thread: http://www.excelforum.com/showthread.php?threadid=56211

to convert the entered number in a binary number?

Could you illustrate what you mean with an example of number entered and
what that should convert to.

Regards,
Peter T

"darcus" wrote in
message ...

thank you very very much! but another question, is there a possibility
to convert the entered number in a binary number? i was trying to find
any function or so but didnt come up with anything....thanks again!

darcus

--
darcus
------------------------------------------------------------------------
darcus's Profile:
http://www.excelforum.com/member.php...o&userid=36449
View this thread: http://www.excelforum.com/showthread...hreadid=562113