• DİKKAT !

    Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı ya da giriş yapmalısınız. Foruma üye olmak Dosya Yükleme tamamen ücretsizdir.

Çözüldü Şifreli Yazı

Bu konu çözüldü olarak işaretlenmiştir. Çözülmediğini düşünüyorsanız konuyu rapor edebilirsiniz.
Durum
Konu Çözümlendiği İçin Kapatılmıştır.

hakki83

Yeni Üye
Katılım
9 Ağu 2021
Mesajlar
767
Çözümler
3
Aldığı beğeni
234
Excel V
Office 2016 TR
Konu Sahibi
Selamlar

Bir çalışma yapmak istedim.
Konu: Şifreli Yazı

İki kişi arasında aynı dosya mevcut olacak.

İlk önce, bilgisayar klavyesindeki görünen harflere, karıştırılmış harfler tayin edileceK (Sayfa1).

Birbirlerine gönderecekleri mesajı; bu excel dosyası ile şifreli hale getirecekler (Sayfa2).


Birbirlerinden gelen şifreli mesajı bu excel dosyası ile okunur hale getirecekler (Sayfa3).

Tabi bunun gibi farklı onlarca çeşit dosya yapılabilir. İlk aklıma geleni yaptım.

Böyle bir dosya için kod oluşturabilir miyiz?
 
Konu Sahibi
Bu kişiler aynı bilgisayarda mı çalışıyor?
Tine iki kişi aynı dosyada mı çalışıyor ?
Ali Cimri Hocam şöyle canlandırayım.

Aslında eğlencelik düşündüğüm bir çalışmaydı. Ama hiç belli olmaz.

Bir kişiye özel bir mesaj göndermek istediğimizde, böyle bir dosya belki işe yarayabilir.

Diyelim ki iki kişi birbirlerine yazı gönderiyorlar. Ve bu makrolu Excel dosyası iki tarafta da var.

Mesajı şifreleyip gönderdiğimiz için sadece bu dosyaya sahip kişiler bu yazıyı okuyabilecek haliyle.

Diledikleri zaman harflerin karşılıklarını değiştirebilirler.

Diyeceksiniz ki; “Excel dosyasını şifreleyip göndersinler”

Doğru, ben olsam ben de excel dosyasını şifreleyip gönderirim karşı tarafa; fakat dediğim gibi biraz eğlencelik bir çalışma.
 
Konu Sahibi
Hocam tam boşluk, nokta virgülü unuttum diye mesaj yazcaktım, dosyanızı gördüm, siz eklemişsiniz.

Emeğinize sağlık, fakat denemeler yaptım, sayfa3 te şifreli mesajı yapıştırdım, çevirmedi.
Sayfa2’de de denedim, bu sefer de kodda hata verdi. Nerede hata yaptım acaba.
 
Konu Sahibi
Ali Cimri hocam emeğinize sağlık çok güzel olmuş.

Satır atlama alt enter’i de ben ilave ettim. Tabi karşılığı yine alt enter oldu.

Fakat;
Gördüğüm iki şey kaldı, bilmiyorum çözülebilir mi,

— Küçük harfle yazılan yazılar, küçük harfle çevrilmesi gerekirken, büyük harfle çevriliyor.

— Küçük ve büyük A harfinin karşılığında, küçük ve büyük I harfi olduğu için ve küçük ı harfi VBA’ya tam uymayan bir harf olduğu için;

kelimenin tamamını büyük de yazsak,
tamamını küçük de yazsak,
A harfleri küçük olarak çevriliyor.

Bilmiyorum bu düzeltilebilir mi?
:)
 
Sadece büyük harfler kaldı gerisini sildim. normal yazıyı büyük harfle yazın.
 
Çözüm
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
Geri
Üst