Excel Dosyasının Başka Bilgisayarda Çalışmaması veya kopyalanaması

[mustafa1205]

İyi Akşamlar. Benim sorum şu ; yaptığım excel dosyasının başka bilgisayara kopyalanmaması yada kopyalandığında çalışmamasını istiyorum. Forum eski konularında bulamadım. Bu mümkün mü acaba

 

[Mahir64]

İyi Akşamlar. Benim sorum şu ; yaptığım excel dosyasının başka bilgisayara kopyalanmaması yada kopyalandığında çalışmamasını istiyorum. Forum eski konularında bulamadım. Bu mümkün mü acaba

Merhaba
http://www.excel.web.tr/f57/ba-ka-bir-bilgisayarda-caly-masyn-t65866.html
http://www.excel.web.tr/f58/pc-bilgileri-wmi-t65698.html

 

[uzmanamele]

merhaba

bunu deneyiniz

Private Sub Workbook_Open()
Set fso = CreateObject("Scripting.FileSystemObject")
SeriNo = fso.GetDrive("C:\").SerialNumber
If SeriNo <> [COLOR="Red"]xxxxxxxx[/COLOR] Then
With ThisWorkbook
.Save
.ChangeFileAccess Mode:=xlReadOnly
.Close SaveChanges:=False
End With
End If
End Sub

 

[mustafa1205]

Sayın Uzmanamele buradaki "xxxx" olan yer hdd in seri nosu mu acaba

 

[mustafa1205]

bilgisayar adına göre yapılabilir mi acaba

 

[mustafa1205]

Malesef yapamadım. Yadımcı olabilirseniz çok sevinirim.Benim bilgisayarımın hdd seri no 1934919338, Bilgisayarımın adı " MUSTAFA1205" dir. Tercihen bilgisayar adına göre yada harddisk seri nosuna göre başka bilgisayara kopyalandığında belgenin çalışmamasını istiyorum. Yardımcı olabilirmisiniz acaba ? Teşekkür ederim

 

[Mahir64]

Merhaba
#CPU İD göre hazırlanmış dosya
#Donanım Bilgiler bulma (CPU İD no bulmanız için)
Bunlar işinize yarayacaktır inceleyin.

 

[mustafa1205]

Sayın Blacklord Elinize sağlık çok teşekkür ederim halloldu. Sadece sormak istediğim bilgisayar formatlandığında "CPU ID" değişiyormu yoksa sabit bir şeymi. Teşekkür ederim

 

[Mahir64]

Sayın Blacklord Elinize sağlık çok teşekkür ederim halloldu. Sadece sormak istediğim bilgisayar formatlandığında "CPU ID" değişiyormu yoksa sabit bir şeymi. Teşekkür ederim

Donanımsal bilgim tam değil ama değişmiyor diye biliyorum.

 

[mustafa1205]

Tekrar Teşekkürler sayın BlackLord

 

[Mahir64]

Tekrar Teşekkürler sayın BlackLord

Kolay gelsin
Gökhan beyin çalışmaları...
İyi çalışmalar :hey: