• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Galerie
• Fórum

MS Excel

Téma: Parametrický odkaz na umístění v cloudu-onerive

Zaslal/a vasekp 9.4.2023 14:05

Dobrý den.
Níže přikládám funkci, kterou mi napsal někdo schopnější než já. Základem bylo, že funkce hledala umístění jiných souborů ve složce, která ve stejné složce jako excelovský soubor, v kterém tato funkce byla použita. Fungovalo mi to na dropboxu kde adresa souboru byla stále na místním disku, ale nyní používám onedrive a adresa souboru je na síti (https://sgroupholding.sharepoint.com/) a vytvořená funkce neumí přečíst toto internetové umístění. Neřešil jste někdo něco podobného? Nebo nevíte, jak na to?

Function HYPLNK(C As String) As String

Dim Cesta As String, Subor As String

With ThisWorkbook

Cesta = .Path & "\SMLOUVY\"

Soubor = Dir(Cesta & "*")

On Error Resume Next

While Soubor <> vbNullString

If InStr(Left(Soubor, 6), C) > 0 Then HYPLNK = Cesta & Soubor: Exit Function

Soubor = Dir()

Wend

End With

End Function

Zaslat odpověď >

---

VasekPpp(19.4.2023 10:59)#054832

Já vím, že to je trochu advanced, ale nikdo zkušený zde?citovat

lubo(19.4.2023 12:51)#054835

Mrkni na:

https://stackoverflow.com/questions/33734706/excels-fullname-property-with-onedrivecitovat

Vasekppp(9.5.2023 11:31)#054926

Vskutku komplexní problematika. Díky moc, vyzkouším :)citovat

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse