< návrat zpět

MS Excel


Téma: kopírování dané oblasti buněk do jiného souboru rss

Zaslal/a 9.3.2016 14:52

Zdravím vás pánové.
Potřebuji od Vás pomoc s makrem, které by mi umožnilo, pomocí kliknutí na tlačítko, vybrat soubor(vždy to bude soubor "něco_výkony_LINX");(něco = vždy jiné označení), následně otevřít, zkopírovat pevně danou oblast buněk(B4:Y48) do jiného souboru ("STŘIHAČKA - pomůcka") do buňky A2 a otevřený soubor následně zavřít.
Mockrát děkuji za rady

Zaslat odpověď >

#030676
avatar
Ještě upřesním, že kopírované buňky (B4:Y48) se vždy nacházejí v sešitě "výkony"citovat
#030690
Jeza.m
Předpokládám že makro budeš spouštět z cílového souboru. Pak je třeba někde si definovat to "něco".

Application.ScreenUpdating = False
Dim nazev As String
Dim soubor as String
Dim ws1 As Worksheet

nazev = "výkony" 'jméno listu ze kterého budeme kopírovat
soubor = "C:\něco_výkony_LINX.xlsx" 'zdrojový soubor
Dim wb As Workbook

Set ws1 = Sheets("výkony") 'Název listu do kterého budeme kopírovat

Set wb = Workbooks.Open(soubor, False, True)

Dim ws2 As Worksheet
Set ws2 = wb.Sheets(nazev)

ws2.range("B4:Y48").copy
ws1.range("A2").PasteSpecial xlPasteAll

wb.Close False
Application.ScreenUpdating = True
citovat
#030753
elninoslov
Alebo aj bez makra.
1. Do Tabuľky v zošite "Výběr.xlsx" pripísať to "něco".
2. Ak bude vykonaná nejaká zmena v tejto Tabuľke, tak v "STŘIHAČKA - pomůcka.xlsx" sa postaviť na B4 a upraviť definovaný názov HDN, potom dať Obnoviť všetko na karte Údaje, inak netreba.
3. Iba meniť vo "Výběr.xlsx" rozbaľovací zoznam v D1. Na základe tejto bunky sa "STŘIHAČKA - pomůcka.xlsx" aktualizuje.
Příloha: zip30753_kopiruj-z.zip (71kB, staženo 23x)
citovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

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

Aktivní diskuse

Jak odstraním duplicitní údaje

elninoslov • 24.4. 8:57

Vyhledej

PavDD • 24.4. 8:56

Vyhledej

elninoslov • 24.4. 8:47

Vyhledej

PavDD • 24.4. 8:29

Jak odstraním duplicitní údaje

Mirek8 • 24.4. 8:20

Jak odstraním duplicitní údaje

Mirek8 • 24.4. 8:00

Relativní cesta - zdroje Power Query

Alfan • 24.4. 7:44