[Yardım]  Excelde yapılan kayıt

VBA Makrolar ile ilgili sormak istedikleriniz, yapmak istedikleriniz hakkında yardım alabileceğiniz bölümdür.

Excelde yapılan kayıt

İleti#1)  sylarrr1907 » 05 Şub 2019 10:16

Arkadaşlar herkese selamlar,

Excel ile alakalı yardım isteyecektim. İki konu var ayrı ayrı yazarak meşgul etmek istemedim.
1- Bir kullanıcı herhangi bir Excel dosyasını açtığında kullanıcı adı ve sicilini girerek açsın ve açılan excellde belirtiğim hücrede kullanıcı adı ve sicili görünsün.
2- Herhangi bir Excel dosyasında en son kayıt ( save ) yapan kullanıcı adını bir hücrede görmek istiyorum.
Arkadaşlar bakıldığından genel olarak aynı isteklere benziyor ancak farklı farklı dosyalara bu işlemleri yapacağım acaba böyle bir makro mevcut mudur yardımcı olabilir misiniz.
Şimdiden teşekkür ediyorum.
Kullanıcı avatarı
sylarrr1907
Yeni Başlamış
 
Kayıt: 26 Nis 2017 13:47
Meslek: Kargo ofis
Yaş: 36
İleti: 18
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: istanbul

Cevap: Excelde yapılan kayıt

İleti#2)  CENGİZHANTAHA » 05 Şub 2019 12:38

viewtopic.php?f=4&t=28275&p=212991&hilit=yetki#p212991
Bir inceleyin isterseniz. Belki işinizi görür.
Kullanıcı avatarı
CENGİZHANTAHA
Yeni Başlamış
 
Kayıt: 20 Kas 2018 09:29
Meslek: EMEKLİ
Yaş: 47
İleti: 53
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: SAKARYA

Cevap: Excelde yapılan kayıt

İleti#3)  sylarrr1907 » 05 Şub 2019 13:28

Arkadaşım,

İlk önce cevabın alakan için teşekkür ederim. Vermiş olduğun linki bayağı bir inceledim hatta bayağı [yummy] o kadarki kendi isteğimi unuttum diyebilirim. Sitemiz / siteniz okadar çok veri bilgi ile dolu ki insan isteğine cevap ararken başka başka bilgilerle karşılaşıyor şahsen bir cevap ararken bir sürü bilgi edindim. Bu arada çok uzattım ama [fısıltı] kendi isteğimi unuttum, belirtiğim gibi sizin verdiğiniz linki inceledim ancak verdiğiniz linkte sadece yetkilendirme için cevaplar var benim isteğim daha başka bir şey.
İstemiş olduğum konuda yardımcı olacak arkadaşlara şimdiden teşekkür ederim.
Kullanıcı avatarı
sylarrr1907
Yeni Başlamış
 
Kayıt: 26 Nis 2017 13:47
Meslek: Kargo ofis
Yaş: 36
İleti: 18
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: istanbul

Cevap: Excelde yapılan kayıt

İleti#4)  Erkan Akayay » 05 Şub 2019 14:43

1. soru kolay. Sitede bulursunuz. Arama yapın.
2. soru için
Kod: Tümünü seç
Sub Son_degistiren()
Range("A1").Value = ActiveWorkbook.BuiltinDocumentProperties("Last Author")
End Sub
Kullanıcı avatarı
Erkan Akayay
Site Dostu
 
Kayıt: 20 Ağu 2008 11:59
Konum: YALOVA
Meslek: Bilgi İşlem
Yaş: 49
İleti: 4027
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İSTANBUL

REKLAM
Excel Logo XML Oluşturucu
Logo Object Designer ile Uyarlama

Cevap: Excelde yapılan kayıt

İleti#5)  sylarrr1907 » 05 Şub 2019 15:09

Erkan Bey,

Cevabınız için teşekkürler. Belirtiğiniz gibi 1. sorumun cevabına yakın siteden temin ettim. diğeri için sisin dediğiniz makroyu uyguladığımda herhangi bir sonuç alamıyorum. Yanlış birşey mi yapıyorum acaba yardımcı olur musunuz.
Kullanıcı avatarı
sylarrr1907
Yeni Başlamış
 
Kayıt: 26 Nis 2017 13:47
Meslek: Kargo ofis
Yaş: 36
İleti: 18
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: istanbul

Cevap: Excelde yapılan kayıt

İleti#6)  Erkan Akayay » 05 Şub 2019 21:09

Kaydedilmiş bir dosya üzerinde çalışacaktır.
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
Erkan Akayay
Site Dostu
 
Kayıt: 20 Ağu 2008 11:59
Konum: YALOVA
Meslek: Bilgi İşlem
Yaş: 49
İleti: 4027
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İSTANBUL

REKLAM
ETA - Excel Konsolide Raporlama
ETA Excel Personel Entegre Raporu

Cevap: Excelde yapılan kayıt

İleti#7)  sylarrr1907 » 07 Şub 2019 07:29

Erkan Bey,

İlk önce cevabınız için teşekkür ederim. Ancak benim isteğim herhangi bir buton olmadan save yapan kullanıcının ismi herhangi bir hücrede görünmesi, bu konuda yardımcı olabilir misiniz.
Kullanıcı avatarı
sylarrr1907
Yeni Başlamış
 
Kayıt: 26 Nis 2017 13:47
Meslek: Kargo ofis
Yaş: 36
İleti: 18
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: istanbul

Cevap: Excelde yapılan kayıt

İleti#8)  Erkan Akayay » 07 Şub 2019 08:01

Ben size komutu göstermiştim. İlgili yere yazacaktınız.

Modüle değil Thisworkbook (Bu çalışmakitabı) yazınız.

Kod: Tümünü seç
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Sheets("Sayfa1").Range("A1").Value = ActiveWorkbook.BuiltinDocumentProperties("Last Author")
End Sub
Kullanıcı avatarı
Erkan Akayay
Site Dostu
 
Kayıt: 20 Ağu 2008 11:59
Konum: YALOVA
Meslek: Bilgi İşlem
Yaş: 49
İleti: 4027
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İSTANBUL

Cevap: Excelde yapılan kayıt

İleti#9)  sylarrr1907 » 07 Şub 2019 09:37

Erkan Bey,

Özür dileyerek sizin dediğiniz gibi her şeyi yapmaya çalıştım, ancak bir türlü başaramadım dosyayı ekledim bir kontrol edebilir misiniz nerede yanlış yapıyorum.
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
sylarrr1907
Yeni Başlamış
 
Kayıt: 26 Nis 2017 13:47
Meslek: Kargo ofis
Yaş: 36
İleti: 18
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: istanbul

Cevap: Excelde yapılan kayıt

İleti#10)  Erkan Akayay » 07 Şub 2019 13:41

Excel güvenlik ayarlarında rKaydederken dosya özellikleirndne kişisel bilgileri kaldır onayını kaldırın.

Diğer bir yöntem ise Environ("Username") kullanabilirsiniz.

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Sheets("Sayfa1").Range("A1").Value = Environ("UserName")
End Sub
Bu iletideki ekleri görmek için gerekli yetkilere sahip değilsiniz.
Kullanıcı avatarı
Erkan Akayay
Site Dostu
 
Kayıt: 20 Ağu 2008 11:59
Konum: YALOVA
Meslek: Bilgi İşlem
Yaş: 49
İleti: 4027
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: İSTANBUL

Cevap: Excelde yapılan kayıt

İleti#11)  sylarrr1907 » 08 Şub 2019 08:06

Erkan Bey,

Yardımlarınız ve ilgi alakanız için çok teşekkür ederim. En sonunda başardım. şkşk
Kullanıcı avatarı
sylarrr1907
Yeni Başlamış
 
Kayıt: 26 Nis 2017 13:47
Meslek: Kargo ofis
Yaş: 36
İleti: 18
 
Cinsiyet: Bay
Bulunduğunuz İl / Semt: istanbul


Forum Genel Makro Soruları

Online Kullanıcılar

Bu forumu görüntüleyenler: Bing[Bot], Google [Bot] ve 3 misafir

Bumerang - Yazarkafe