• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

hucreye deger gırılınce bılgısayar adını yazsın

  • Konbuyu başlatan Konbuyu başlatan kneehot
  • Başlangıç tarihi Başlangıç tarihi
Katılım
4 Ekim 2007
Mesajlar
632
Excel Vers. ve Dili
OFFİCE 365
Arkadaslar merhaba. yapmak ıstedıgım ortak kullanılan bır tabloda kımın ne ekleyıp cıkarttıgnı takıp amaclı bellı bır hucreye deger gırılınce baska bır hucreye ıslemın yapıldıgı bılgısayarın adının yazılması. anlasılır olması ıcın ornek ekledım. farklı cozum onerılerı varsa onlarıda uygulayabılırım. sımdıden yardımlara cok tesekkurler.
 

Ekli dosyalar

Sayfa Kodu'na:
Kod:
Private Sub Worksheet_change(ByVal Target As Range)
If Not Intersect(Target, Range("B4:B22")) Is Nothing Then
Target.Offset(0, 6) = Environ$("computername") & " - " & Environ$("username")
End If
End Sub

şeklinde deneyin.
 
Merhaba,

bence paylaştırılan dosyada kimin ne yaptığını anlamak için excel'in "Değişiklikleri İzle" seçeneğini aktif hale getirin.
 
Geri
Üst