Rakamları İkili sisteme çevirme

[algil]

Rakamları Ýkili sisteme çevirme

Merhaba Arkadaşlar

Bir hücreye girdiğim bir sayıyı diğer hücrede ikili sisteme çeviren bir makro veya fonksiyona ihtiyacım var.

Ã?rneğiğin:
A1 hücresine 34 değeri yazdığımda B1 hücresine 10010
A2 hücresine 35 değeri yazdığımda B2 hücresine 10011

gibi devam eden seri var.

Yani normal sayıyı ikili sisteme çevirmem gerekiyor
Zamanım kısıtlı olduğu için tam olarak araştıramadım
yardımcı olursanız sevinirim.

 

[Haluk]

Analysis ToolPak eklentisini ilave ettikten sonra;

=DEC2BIN(A1)

A1 hücresindeki 34 değeri, formülün yazıldığı hücrede 100010 olarak görünür.


Veya, kullanıcı tanımlı bir fonksiyon isterseniz;

Function Dec2BinR(Sayi As Long) As Variant
     While Sayi > 0
        If (Sayi Mod 2) Then
            RetVal = 1 & RetVal
        Else
            RetVal = 0 & RetVal
        End If
        Sayi = Int(Sayi / 2)
    Wend
    Dec2BinR = RetVal
End Function

 

[algil]

Teşekkürler Sn Haluk
Ancak bu kadar olurdu

 

[kingboy]

çok teşekkürler arkadaşım bişey daha sorabilirmiyim mesela bu sonucu 14 bit şeklinde yaz dersem nasıl olacak

yani sonuç 12 bit de olsa başına iki adet 0 ekletebilirbiyiz

 

[özlemcik]

Merhaba

Excelde 20050221130220004000 rakamını yazdığımda excel kendiliğinden yuvarlama yaparak 20050221130220000000 bu rakama dönüştürüyor. Hücreleri biçimlendir menüsünden bazı ayarlarla oynamış olabilirim.Acil yardımınızı bekliyorum.
Saygılar.

 

[Merhum İdris SERDAR]

Merhaba

Excelde 20050221130220004000 rakamını yazdığımda excel kendiliğinden yuvarlama yaparak 20050221130220000000 bu rakama dönüştürüyor. Hücreleri biçimlendir menüsünden bazı ayarlarla oynamış olabilirim.Acil yardımınızı bekliyorum.
Saygılar.

Excelin dijit sınırı 16'dır. Girdiğiniz sayının başına ' işareti koyarak veya sayıyı girmeden önce hücreyi metin olarak biçimlendirirseniz olur. Ancak aritmetik işlemde kullanamazsınız.

.

 

[Merhum İdris SERDAR]

çok teşekkürler arkadaşım bişey daha sorabilirmiyim mesela bu sonucu 14 bit şeklinde yaz dersem nasıl olacak

yani sonuç 12 bit de olsa başına iki adet 0 ekletebilirbiyiz

.


http://www.excel.web.tr/showthread.php?t=78002

Buraya bakın.

.

 

[özlemcik]

Teşekkürler Sn Yurttaş,
Bunları nasıl biliyorsunuz hayret ediyorum gerçekten.
Başarılarınızın devamını diliyorum. Hoşçakalın.

 

[özlemcik]

Merhabalar,

Forumda o kadar aramama rağmen bulamadım. Şimdi bir kayıt tutmam gerekiyor. Patronumun yemek alıp almadığı günleri kaydedip ay sonunda ne kadarlık yemek yemişse onun parasını ödemek için. İşte bunu yapabilmem için de tarihleri baştan sona yazmam gerekiyor. Bunu ben değilde excel kendiliğinden otomatik yapamaz mı ?

Ya da ustalarımızdan bana bunun için sade küçük bir program yapmalarını rica ediyorum. Program taslağını ekte bilgilerinize sundum. Tabi siz dahada güzel yaparsınız biliyorum Saygılar.

 

[özlemcik]

Neden hala bi cevap gelmedi. Acaba yanlış yere mi mesaj gönderiyorum ?

 

[Necdet]

Merhaba Sayın özlemcik,

Sorduğunuz sorunun konu başlığı "Rakamları İkili Sisteme Çevirme", Lütfen konu başlıklarına dikkat ederek sorularımızı yöneltelim, herhangi bir kirliliğe neden olmamak için.