bravo64
Altın Üye
- Katılım
- 21 Eylül 2005
- Mesajlar
- 184
- Excel Vers. ve Dili
- ofis 365 İngilizce
- Altın Üyelik Bitiş Tarihi
- 25-10-2024
Merhaba değerli üstadlar,
Bir hasta takip excel(ofis 365 kullanıyorum, bilgisayarım MacOs) dosyam var..Hastalara ait pdf dosyaları onedrive bulutta yer alıyor.Klasör adı "test". içinde 5097 adet pdf dosyası var.
watcher adlı hasta takip dosyamda (bu dosyada onedrive içinde) aşağıdaki kod ile hasta numarasına göre hyperlink ile dosyaları açabiliyordum..
İlgili kod:
Sub hyper1()
Set S1 = ActiveSheet
S1.[c1].ClearContents
ActiveSheet.Hyperlinks.Add Anchor:=S1.Range("c1"), Address:=ThisWorkbook.Path & "/" & "test" & "/" & S1.Range("c5").Value & ".pdf"
S1.Range("c1").Hyperlinks(1).Follow (True)
End Sub
Ancak şimdi sadece onedrive'daki test klasöründeki ilk 30 dosyayı açabiliyorum, ilk 30 dan sonraki numaraya göre çalıştırdığımda ilk pdf dosyasını açıyor sürekli ..5097 dosyam var sonuçta..Örnek 31. sıradaki "1114.pdf" dosyasını web üzerinden açmaya başlarken, hemen ilk pdf dosyasını açıyor..Ama ilk 30 daki dosyalar sorunsuz açılıyor.(ekte resimde)
Çok araştırdım kodları değiştirdim ama olmadı..
Bu konuda çözüm önerisi olabilecek var mı acaba?
Tüm Hocalarımıza ve üyelerimize saygılar sunarım..
Bir hasta takip excel(ofis 365 kullanıyorum, bilgisayarım MacOs) dosyam var..Hastalara ait pdf dosyaları onedrive bulutta yer alıyor.Klasör adı "test". içinde 5097 adet pdf dosyası var.
watcher adlı hasta takip dosyamda (bu dosyada onedrive içinde) aşağıdaki kod ile hasta numarasına göre hyperlink ile dosyaları açabiliyordum..
İlgili kod:
Sub hyper1()
Set S1 = ActiveSheet
S1.[c1].ClearContents
ActiveSheet.Hyperlinks.Add Anchor:=S1.Range("c1"), Address:=ThisWorkbook.Path & "/" & "test" & "/" & S1.Range("c5").Value & ".pdf"
S1.Range("c1").Hyperlinks(1).Follow (True)
End Sub
Ancak şimdi sadece onedrive'daki test klasöründeki ilk 30 dosyayı açabiliyorum, ilk 30 dan sonraki numaraya göre çalıştırdığımda ilk pdf dosyasını açıyor sürekli ..5097 dosyam var sonuçta..Örnek 31. sıradaki "1114.pdf" dosyasını web üzerinden açmaya başlarken, hemen ilk pdf dosyasını açıyor..Ama ilk 30 daki dosyalar sorunsuz açılıyor.(ekte resimde)
Çok araştırdım kodları değiştirdim ama olmadı..
Bu konuda çözüm önerisi olabilecek var mı acaba?
Tüm Hocalarımıza ve üyelerimize saygılar sunarım..
