Access SQL   ›   ACCESS SORULARI VE ÖRNEK UYGULAMALARI   ›   ACCESS SORULARI   ›   [FORM] %userprofile% Klasörüne Erişim

[FORM] %userprofile% Klasörüne Erişim
atyaty
Yeni Üye 15-40

*
Kayıt Tarihi: 26.08.2010
Toplam 7 konu açtı.
Toplam 28 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2019,
Beğeniler: 0 / 0
#1
access-sql-6  23-09-2023, 21:49
Arkadaşlar kullandığım Acces dosyasında bazı verileri Excel dosyasından aktarıyorum. Ancak farklı bilgisayarlardan bu dosyaya ulaşıp güncelleme yapıyorum bunun içinde onedrive kalsöründe bir dosya oluşturdum. dosya adı ve yeri aşağıdaki gibi


%userprofile%\OneDrive\Dijinet\VeriTabani\KurVerileri.xlsm

form üzerinde bir düğmeye tıklayınca aşağıdaki kodu çalıştıyorum.

Call Shell("C:\program Files\Microsoft Office\root\Office16\EXCEL.EXE %userprofile%\OneDrive\Dijinet\VeriTabani\KurVerileri.xlsm", vbNormalNoFocus)

veee aşağıdaki hata mesajını alıyorum...

%25userprofile%25/OneDrive/VeriTabani/Kurverileri.xlsm öğesini bulamadık. Taşınmış, yeniden adlandırılmış veya silinmiş olabilir mi?

eğer aynı dosyayı bilgisayarda başka bir dizine koyarsan hiç sorun olmuyor. sıkıntı %userprofile% ifadesinde diye düşünüyorum.
ancak OnoDrive başka başka makinalarda user altında olduğu için %userprofile% kullanarak veya başka bir şekilde komutu çalıştırmam mümkün mü acaba...

Biraz karışık mı oldu acaba inşallah derdimi anlatabilmişimdir.



  Bul
  Alıntı
Bu mesajı beğenenler:
dsezgin
Forum Yöneticisi

*
Kayıt Tarihi: 24.03.2013
Toplam 27 konu açtı.
Toplam 9.096 yorum yaptı.
Toplam 1.103 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2013,
Beğeniler: 57 / 240
#2
23-09-2023, 22:07
Call Shell("C:\program Files\Microsoft Office\root\Office16\EXCEL.EXE " & Environ$("USERPROFILE") & "\OneDrive\Dijinet\VeriTabani\KurVerileri.xlsm", vbNormalNoFocus)

olarak deneyiniz.
Access Fonksiyonlarının(Deyimler), Sorgu da kullanımı
Rapor veya-Pdf-Dosyalarını Birleştirme Uygulaması



  Website   Bul
  Alıntı
Bu mesajı beğenenler:
atyaty
Yeni Üye 15-40

*
Kayıt Tarihi: 26.08.2010
Toplam 7 konu açtı.
Toplam 28 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2019,
Beğeniler: 0 / 0
#3
23-09-2023, 22:14
Süper oldu çok teşekkür ederim günlerdir buna takılmış durumdaydım...

Çok teşekkür ederim.



  Bul
  Alıntı
Bu mesajı beğenenler:
atyaty
Yeni Üye 15-40

*
Kayıt Tarihi: 26.08.2010
Toplam 7 konu açtı.
Toplam 28 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2019,
Beğeniler: 0 / 0
#4
12-10-2023, 19:38
Bir sorunum daha oluştu ...
iki gündür uğraşıyorum sizin daha önce callsehell için vermiş olduğunuz kodu evirip çevirdim ama yine de beceremedim.

Sıkıntım şu,
userprofile altındaki bir dizinden bir excel dosyasının sayfasını bağlantılı tablo yönetisinden bağlamak istiyorum.

Dosyanın adı ve konumu: %userprofile%\OneDrive\Dijinet\VeriTabani\KurVerileri.xlsm
bu dosya içindeki "KurVerileri" sayfasını bağlantılı tablo olarak access içine nasıl bağlarım ???

şimdiden teşekkürler



  Bul
  Alıntı
Bu mesajı beğenenler:
dsezgin
Forum Yöneticisi

*
Kayıt Tarihi: 24.03.2013
Toplam 27 konu açtı.
Toplam 9.096 yorum yaptı.
Toplam 1.103 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2013,
Beğeniler: 57 / 240
#5
13-10-2023, 00:59
Visual Basic
  1. On error resume Next
  2. docmd.deleteobject acTable,"ExcelSayfaAdi"
  3. DoCmd.TransferSpreadsheet acLink, acSpreadsheetTypeExcel12, "ExcelSayfaAdi", Environ$("USERPROFILE") & "\OneDrive\Dijinet\VeriTabani\KurVerileri.xlsm", True



Modül de prosedüre taşıyıp, çalıştırın.
Access Fonksiyonlarının(Deyimler), Sorgu da kullanımı
Rapor veya-Pdf-Dosyalarını Birleştirme Uygulaması



  Website   Bul
  Alıntı
Bu mesajı beğenenler:
atyaty
Yeni Üye 15-40

*
Kayıt Tarihi: 26.08.2010
Toplam 7 konu açtı.
Toplam 28 yorum yaptı.
Toplam 0 puanı bulunmakta.
Mevcut Office Sürümü:
Office 2019,
Beğeniler: 0 / 0
#6
13-10-2023, 09:55
Çalıştırmayı başardım şu an için işimi görüyor teşekkür ederim ancak...
Modülde Prosedüre taşıyın ne demek onu çok bilmiyorum.

Yani kodu yazıp Bir modül oluşturdum
Modülün adı: ExceldenOtomatik_TabloBaglama
-----------------------
Option Compare Database

Sub ExcelBaglama_otomatik()
DoCmd.TransferSpreadsheet acLink, acSpreadsheetTypeExcel12, "KurVerileri", Environ$("USERPROFILE") & "\OneDrive\Dijinet\VeriTabani\KurVerileri.xlsm", True

End Sub
-----------------------------
modülü manuel olarak çalıştırdığımda sorun, yok ama bunu nasıl otomatik hale getiririm hala bulamadım.

Gerçekten büyük bir dertten kurtardınız. Çok teşekkür ederim.



  Bul
  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  Spam Klasörüne Gitmemesi ates2014 0 218 28-06-2024, 23:49
Son Mesaj: ates2014
  [VBA] Ağ Konumunda Temp Klasörüne Kopyalayıp çalıştırma serdem48 6 1.193 28-11-2019, 08:45
Son Mesaj: serdem48
  access e ağ üzerinden çoklu erişim ccollezium 32 43.617 06-06-2018, 16:27
Son Mesaj: cemilhas
  [FORM] Ağ üzerinde paylaşılan klasör ve dosyalara erişim izni ercansahiner 1 1.941 30-03-2013, 23:53
Son Mesaj: onur_can
  [MAKRO] Hızlı erişim araç cubuğu talatgürler 4 2.636 05-09-2012, 23:18
Son Mesaj: talatgürler
  [FORM] programa internetten erişim seror 4 2.125 25-06-2012, 17:57
Son Mesaj: Gokay05
access-sql-13 veri erişim sayfası hatası okotan 5 3.721 25-10-2011, 17:50
Son Mesaj: Maceraperest
  Form ve tablolara erişim için kullanıcı adı ve şifre koymak vantilator 2 7.752 14-07-2011, 10:21
Son Mesaj: vantilator

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi