PC-HELP.CZ

Zdravím a žádám o pomoc,
mám udělanou kontingenční tabulku dodavatelů a z té si do druhého listu tahám další data. nachystal jsem si makro ale po spuštění mi to napíše Run time error 1004:

jelikož jsem makro dělal uplně poprvé opravdu si s tím nevím rady, možná to vubec nepůjde, možná ano.
Proto Vás prosím o radu :)

makro zde:


Sub Makro13()
'
' Makro13 Makro
'
' Klávesová zkratka: Ctrl+q
'
Range("U1").Select
ActiveSheet.PivotTables("Seznam dodavatelů").PivotCache.Refresh
Sheets("tab. Obraty").Select
ActiveWorkbook.Worksheets("tab. Obraty").AutoFilter.Sort.SortFields.Clear
ActiveWorkbook.Worksheets("tab. Obraty").AutoFilter.Sort.SortFields.Add Key:= _
Range("D2:D1000"), SortOn:=xlSortOnValues, Order:=xlDescending, DataOption _
:=xlSortNormal
With ActiveWorkbook.Worksheets("tab. Obraty").AutoFilter.Sort
.Header = xlYes
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
End Sub

Vítej na PC-Help

Nejlepší bude, když sem přiložíš sešit.

Nebo napiš na kterém řádku to nahlásí chybu.

sešit bohužel přiložit nemohu
také mi pořád po otevření sešitu vyskakuje Upozornění zabezpečení: byla zakázána datová připojení.
Už jsem tam vložil digitální podpis..Digital signature, ale asi to bylo k ničemu. vše pořád zakázané a nefunkční :)

--- Doplnění předchozího příspěvku (09 Led 2013 13:03) ---

ještě bych mohl připojit tohle, ukáže se po "spuštění" makra

A makro spouštíš na listu "seznam dodavatelů" nebo na jiném listu ?

spuštím na jimém listu
spustím na listu 1, na listu 2 to udělá kontingenční tabulku a na 3. listu to udělá takovou výstupní tabulku

to makro co tady máš tak aktualizuje kont.tab, pak na jinem listu akorat zesortuje data.

ano jen to seřadí od největšího k nejmenšímu.
Problém s makrem jsem ted vyřešil. Problém byl s tím spouštěním na jiném listu. Už je to OK.
ještě bych poprosil o radu co s tím hlášením?
pujde tento excelovský sešit i na jiných PC?

Půjde, ale pokud se z těch jiných pc nedostane na ta propojení co máš nastaveny tak se to nepropojí a data budou pořád stará (ta původní).

tak na jiném PC to nejde, problémy se zabezpečením, povolením maker a obsahů. nejde prostě v tomto sešitě nějak vše povolit?

To se povoluje na konkrétním PC.
Když se dá ručně povolit makra a datová propojení tak to také nejde?
Nebo se to vůbec nezeptá, jestli to chce uživatel povolit?

tak to je pruser .)
potřebuju aby to fungovalo na každým PC ve firmě
Jinak vyskakuje jen to: Byla zakázána datová připojení

Když uděláš nějaký jiný sešit jen z nějakým makrem a ten pak spustíš na jiném PC tak jak se to zachová?