Exel Yardım...

[Pusat_1299]

Arkadaşlar Merhaba,

Aranıza yeni katıldım. Bir konuda yardımınıza ihtiyacım olacak.

Şöyle ki,

Exel de benim çalışıp hazırladığım raporu başkasına gönderdiğimde gönderdiğim kişinin değil de benim çalıştığım Exelim olduğunun arka planda bilinmesini istiyorum. Yani kabak gibi belli olmasın ihtiyacım olduğunda bu benim diyebileyim.
Bu mümkün müdür ? Yapabilir miyim ?

Şimdiden cevaplarınız için teşekkür ederim.

 

[cems]

Bu örnekte sayfa1 a3 hücresine Pusat_1299 yazıldığında sayfanın yapımcısı bilgisi gelir

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Sheets("sayfa1").Select
If Sheets("sayfa1").Range("a3") = "" Or Sheets("sayfa1").Range("a3") <> "Pusat_1299" Then
Exit Sub
Else
If Sheets("sayfa1").Range("a3") = "Pusat_1299" Then
MsgBox " Bu dosya Pusat_1299 tarafından 13.05.2017 tarihinde hazırlanmış ve kullanıma sunulmuştur", vbCritical, "Pusat_1299"
End If
End If

End Sub

Kodların çalışacağı sayfayı ya da hücreyi ya da mesajın içeriğini siz kendinize göre ayarlarsınız , ben sayfa1 in her zaman varolacağı fikriyle bu şekilde yaptım. VBA kısmına şifre de koyarsanız ola ki farkedilirse kodlar silinemez .


http://s4.dosya.tc/server4/nvw6v2/hazirlayan.rar.html