< návrat zpět
MS Excel
Téma: Propojení sešitu
Zaslal/a Foopa 12.3.2013 13:34
Dobrý den,
potřebuji poradit, jak co nejjednodušeji propojim cílový sešit s více zdrojovýma sešitama. Podmínka je, že potřebujívyzobat jenom část (např. pouze 1 konkrétní tabulku, nikoliv celý sešit). Děkuji za radu
Richard99(12.3.2013 14:01)#012229 Úplně jednoduše
copy - paste special - link
v češtině to bude asi
kopírovat - vložit jinak - vložit propojení
rozhodně to však nedoporučuji používat
citovat
eLCHa(12.3.2013 15:39)#012240 rozhodně to však nedoporučuji používat
Pročpak? Já jsem s tím už roky spokojený.
citovat
Opičák(12.3.2013 16:02)#012244 Něco podobnýho se tu řešilo. Bylo potřeba "vytahat" určitá data ze všech souborů v adresáři.
oprava:
http://wall.cz/index.php?m=topic&id=11684
citovat
Opičák(12.3.2013 16:11)#012246 Vyzkoušej tohle, jednoduché a funkční.
Samozřejmě musíš změnit řádek s odkazem na umístění souboru, ze kterého chceš získat data a zadat co chceš získat.
Sub ReferToExcel()
Dim xlApp As Excel.Application
Dim wb As Excel.Workbook
Dim ws As Excel.Worksheet
Dim x As Long, y As Long
Set xlApp = New Excel.Application
Set wb = xlApp.Workbooks.Open("C:\dokumenty_moje\pokus.xlsm")
Set ws = wb.Sheets("List1")
x = 5
y = 10
MsgBox "Row 5, Col 10 value=" & ws.Cells(x, y).Value
wb.Close False
Rem --- konec quit excel app ---
xlApp.Quit
Set xlApp = Nothing
Set wb = Nothing
Set ws = Nothing
End Subcitovat