çalışma kitabına aynı anda birden fazla kişinin veri girişi yapması

[mimamoste]

Merhaba arkadaşlar
Ekte örnek dosyamı ağ üzerinde iki veya üç kişi tarafından aynı anda kullanmak istiyoruz. Ancak ilk açan veri girişi yapabiliyorken sonradan açanlar salt okunur açabiliyor. Sonradan açan kişilerinde veri girişi yapabilmesi mümkün müdür. Şifre: i135 Tüm çabalarıma rağmen çözemedim. İlginiz için şimdiden teşekkürler.

 

[Leoncio]

Merhaba,
Aşağıdaki kodları boş bir modüle yapıştırın ve deneyin.

Sub WorkbookShare()​

'Excel dosyasını paylaşıma açar​

Application.DisplayAlerts = False​

If Not ActiveWorkbook.MultiUserEditing Then​

ActiveWorkbook.SaveAs FileName:=ActiveWorkbook.FullName, _​

accessMode:=xlShared​

End If​

Application.DisplayAlerts = True​

End Sub​

Sub WorkbookNotShare()​

'Excel dosyasının paylaşımını iptal eder​

Application.DisplayAlerts = False​

ActiveWorkbook.ExclusiveAccess​

Application.DisplayAlerts = True​

End Sub​

 

[EmrExcel16]

Merhaba , ayrıca aşağıdaki konuya da göz atmanızı öneririm.

Paylaşılan çalışma kitabı özelliği

 

[mimamoste]

teşekkürler Leoncio uygulayayım ve teşekkürler önerin için EmrExcel16 inceleyeyim.

 

[mimamoste]

Merhaba , ayrıca aşağıdaki konuya da göz atmanızı öneririm.

Paylaşılan çalışma kitabı özelliği

sevgili dostum. verdiğin link ile uygulama yapmıştım ancak "Bu çalışma kitabı excel tabloları veya XML eşlemeleri içerdiğinden paylaşılamıyor." uyarısı veriyor.

 

[mimamoste]

Merhaba,
Aşağıdaki kodları boş bir modüle yapıştırın ve deneyin.

Sub WorkbookShare()​

'Excel dosyasını paylaşıma açar​

Application.DisplayAlerts = False​

If Not ActiveWorkbook.MultiUserEditing Then​

ActiveWorkbook.SaveAs FileName:=ActiveWorkbook.FullName, _​

accessMode:=xlShared​

End If​

Application.DisplayAlerts = True​

End Sub​

Sub WorkbookNotShare()​

'Excel dosyasının paylaşımını iptal eder​

Application.DisplayAlerts = False​

ActiveWorkbook.ExclusiveAccess​

Application.DisplayAlerts = True​

End Sub​

Sevgili dostum boş modüle yapıştırdım malesef hata uyarısı veriyor.

 

[ozuberk]

Merhaba Gözden Geçir menüsünde yer alan Çalışma Kitabını Paylaş alanından dosyayı paylaşabilirsiniz.

 

[Leoncio]

Örnek dosyayı indirerek denermisin.

test.xlsm dosyasını indir - download

test.xlsm dosyasını indir, download. Dosya.tc .Dosya Upload. Dosya Paylaş. Dosya Yükle

s6.dosya.tc