Bu dosya, hücredeki metni Hex (onaltılık) koda çevirmek ve Hex kodu yeniden orijinal metne dönüştürmek için hazırlanmış bir örnektir. Dönüştürme hem makro ile toplu olarak hem de kullanıcı tanımlı fonksiyon (KTF) ile hücre içinden yapılabilir.
Önemli: Dosya makro içerir (.xlsm), açarken makroları etkinleştirmeniz gerekir.
Fonksiyon, metnin her karakterinin ASCII kodunu Asc ile alır, Hex ile onaltılık sisteme çevirir ve Right ile iki haneye tamamlar. Örneğin "deneme" metni 64656E656D65 olarak elde edilir.
Önemli: Dosya makro içerir (.xlsm), açarken makroları etkinleştirmeniz gerekir.
Dosyanın içeriği
- Sayfa1: B sütununda "Değer" başlığı altında dönüştürülecek metinler (exceldestek.com, exceldepo.com, deneme), G sütununda "KTF" başlığı altında bunların Hex karşılıkları yer alır.
- Module1: Üç prosedür içerir: MetindenSayiya, MetintenHexe ve HextenMetine.
Kullanılan formüller
G3 hücresinde, B3 hücresindeki metni Hex koda çeviren KTF çağrılır:=MetintenHexe(B3)
Makrolar
- MetindenSayiya: Sayfa1 üzerindeki B3:B5 aralığındaki her değeri MetintenHexe fonksiyonundan geçirir ve sonucu bir sağdaki (C) hücreye yazar.
- MetintenHexe: Metni karakter karakter Hex koda çeviren fonksiyondur; hücrelerde formül olarak kullanılabilir.
- HextenMetine: Hex kodu ikişerli gruplar halinde okuyup Chr ile karakterlere çevirir, böylece şifrelenen değer orijinal metne döner.
Nasıl kullanılır
- Dosyayı açın ve makroları etkinleştirin.
- B sütununa dönüştürülecek metinleri yazın.
- Formülle çevirmek için G sütunundaki formülü ilgili satıra kopyalayın.
- Makro ile çevirmek için Alt+F8 ile MetindenSayiya makrosunu çalıştırın; sonuçlar C3:C5 hücrelerine yazılır. Makro yalnızca B3:B5 aralığını işler, farklı bir aralık için koddaki aralık adresi değiştirilir.
- Hex kodu geri çözmek için herhangi bir hücrede HextenMetine fonksiyonunu Hex değerin bulunduğu hücreye bağlayarak kullanın.