Bilgisayar Adı veya Tam Bilgisayar Adı gösterme

Katılım
28 Ocak 2006
Mesajlar
69
mrb benim istediğim şimdi biz bir excel belgesini 3 kişi kullanıyoruz ağdan o excel belgesini hangi pc de açarsak o kişinin bilgisayar adını veya tam bilgisayar adını A1 hücresine yazmasını istiyorum yardımcı olursanız çok sevinirim şimdiden çok tşk...
 
Katılım
25 Mayıs 2007
Mesajlar
165
Excel Vers. ve Dili
türkçe vista işletim sistemi
excel2007
türkçe
aşağıdaki kodu yazınız.

Private Sub Workbook_Open()
Sheets("sheet1").Range("a1").Value = CreateObject("WScript.Network").computerName
End Sub
 
Katılım
28 Ocak 2006
Mesajlar
69
kodu yazdım ama hata verdi örnek bir excel sayfası göndersem hatanın nerden kaynaklandığını bulurmusunuz şimdiden tşk..
 
Katılım
28 Ocak 2006
Mesajlar
69
oraya bakmıştım ama yapamadım gönderdiğim örnekte yaparsanız sevinirim iyi çalışmalar tşk
 

Necdet

Moderatör
Yönetici
Katılım
4 Haziran 2005
Mesajlar
15,372
Excel Vers. ve Dili
Ofis 365 Türkçe
Kodu aşağıdaki şekilde yazınız

Kod:
Private Sub Workbook_Open()
Sheets(1).Range("a1").Value = CreateObject("WScript.Network").computerName
End Sub
 
Katılım
25 Mayıs 2007
Mesajlar
165
Excel Vers. ve Dili
türkçe vista işletim sistemi
excel2007
türkçe
ornek dosyanız ektedir. dosyayı açar açmaz sayfa1'de a1 hücresinde kullanıcı adını görebilirsiniz..

kolay gelsin.. :hey:
 
Katılım
2 Mart 2006
Mesajlar
117
PEKİ paylaşımdaki dosyayı açan tüm kullanıcaları gösteren bir makro varmı acaba?
 
Üst