MS Excel

Téma: Změna hypertextového odkazu po proceduře

Zaslal/a Raders486 14.1.2021 15:26

Dobrý den.
Pro rozesílání úkolů na jednotlivé kolegy, používám rozdělovník v příloze.
Nevím proč, ale někdy se stane, že po provedení procedury a odeslání emailem se změní adresa hypertextového odkazu.

Mohl by se na to prosím někdo podívat a napsat mi co dělám špatně?

Původní adresa odkazu:
\\dc1\Dokumenty\28_Analýza kvality\SLOŽKY_REKLAMACE_PT_LC\8D\2021\Interní 8 D -reklamace\007_8D Report_PT_Špatný svár.xlsx

Adresa odkazu po proceduře
007_8D%20Report_PT_Špatný%20svár.xlsx

V proceduře zkopíruji odkaz a následně vkládám takto:
rng.Copy
With NewWB.Sheets(1)
.Cells(1).PasteSpecial Paste:=8
.Cells(1).PasteSpecial Paste:=xlPasteAll
.Cells(1).Select
Application.CutCopyMode = False
End With

Už jsem zkoušel vkládat i jinak, ale marně

Příloha: rar

49470_rozdelovnik-akci.rar (30kB, staženo 15x)

Zaslat odpověď >

Raders486(14.1.2021 16:40)#049472

Mohlo by toto být řešení?

rng.SpecialCells(xlCellTypeVisible).Copy
With NewWB.Sheets(1)
.Cells(1).PasteSpecial Paste:=8
.Cells(1).PasteSpecial xlPasteAll
.Cells(1).Select
Application.CutCopyMode = False
End With
na místo rng.copy bych použil rng.SpecialCells(xlCellTypeVisible).Copy
a pro vložení
.PasteSpecial xlPasteAllcitovat

cmuch(26.1.2021 20:02)#049592

Nezkoumal jsem sešit, ale v prvé řadě bych se zbavil mezer, to také hodně pomáhá.

Jinak %20 je označení mezery, ten odkaz přestane fungovat?citovat