MS Excel

Téma: Hypertextový odkaz ovládací prvek

Zaslal/a tajgers 19.5.2020 2:10

Dobrý den,
Chtěl jsem se zeptat na radu, mam níže uvedené makro které má za ušel otevírat externí odkazy v měřítku 60%
Ale funguje to pouze na hypertekovyodkaz v buňce a já potřebuji ať to funguje při kliknouti třeba na obrázek nebo jiny ovládací prvek.
Hypertexoveodkazy neustále se mění.
Předem děkuji všem za ochotu a pomoc

Private Sub Workbook_SheetFollowHyperlink(ByVal Sh As Object, ByVal Target As Hyperlink)

Dim WS As Worksheet, bAct As Worksheet

Application.ScreenUpdating = False

Set bAct = ActiveWorkbook.ActiveSheet

For Each WS In ActiveWorkbook.Worksheets

WS.Activate

ActiveWindow.Zoom = 60

Next WS

bAct.Activate

Application.ScreenUpdating = True

End Sub

Zaslat odpověď >

Nebyly zaslány žádné odpovědi.

Uživatelské menu

Nejste přihlášen(a)

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.