Excel - VBA - Makro - odeslání dat ze souboru A do souboru B

Programy pro práci v kanceláři (Word, Excel, Access…=>Office)

Moderátor: Mods_senior

Pavel Křivánek
nováček
Příspěvky: 1
Registrován: listopad 18
Pohlaví: Muž

Excel - VBA - Makro - odeslání dat ze souboru A do souboru B

Příspěvekod Pavel Křivánek » 26 lis 2018 15:04

Dobrý den,

Prosím o radu.

Mám na místním disku soubor A, který má list X, na tom listu jsou buňky A4 - AA4, které obsahují data.

Potřebuji data přenést do souboru B, který má list Y, na tomto listu jsou taktéž buňky A - AA, ale řádek se s postupem času mění, resp. se zaplňuje daty. Takže je potřeba najít první volný řádek a tam vepsat data.

Soubor B je umístěn ve firemní síti na známém místě, má známý a neměnný název.

Předem díky za raku



Reklama

karlos64
nováček
Příspěvky: 35
Registrován: červenec 18
Pohlaví: Muž

Re: Excel - VBA - Makro - odeslání dat ze souboru A do souboru B

Příspěvekod karlos64 » 27 lis 2018 22:22

Dobrý den,
já používám něco takového:

Sub Makro1()
'
' Makro1 Makro
'

'
'umístění zdroje (cesta)
ChDir "disk (např.C):\adresář\"
'otevření zdrojového souboru
Workbooks.Open Filename:="disk (např.C):\adresář\název zdrojového souboru.xlsm"
'název listu
Sheets("zdroje").Select
'oblast kopírování ve zdroji
Range("sloupecřádek:sloupecřádek").Select
'příkaz kopírování
Selection.Copy
'aktivace cílového souboru
Windows("název souboru.xlsm").Activate
Sheets("zdroje").Select
'vyhledání posledního volného řádku
Range("A500000").End(xlUp).Offset(1).Select
'vložení kopírované oblasti
ActiveSheet.Paste
'uzavření zdrojového souboru
Windows("název zdrojového souboru.xlsm").Activate
ActiveWorkbook.Close


End Sub

MePExG
Level 2
Level 2
Příspěvky: 169
Registrován: srpen 16
Pohlaví: Muž

Re: Excel - VBA - Makro - odeslání dat ze souboru A do souboru B

Příspěvekod MePExG » 28 lis 2018 21:30

Ja by som to staval trochu ináč. Súbory s údajmi dávať na dohodnuté miesto/a/ na serveri do adresárov užívateľov a zber na vyhodnotenie aj z viacerých adresárov zabezpečiť pomocou Power Query. Je to bez riadku programovania (iba naklikať ten zber) a výsledok nezobrazovať v tabuľke, aby nerachla na počte riadkov, ale v kontingenčnej/-ných/ tabuľke.


  • Mohlo by vás zajímat
    Odpovědi
    Zobrazení
    Poslední příspěvek
  • Excel - rozklikávací seznam v buňce nefunguje po odeslání/uložení souboru
    od Radkli » 14 srp 2019 16:25 » v Kancelářské balíky
    3
    1523
    od guest
    21 říj 2019 10:32
  • makro excel
    od pajdaj » 08 dub 2020 09:09 » v Kancelářské balíky
    4
    464
    od pajdaj
    09 dub 2020 07:24
  • Excel vzorec/makro?
    od chytilji » dnes, 10:37 » v Kancelářské balíky
    0
    43
    od chytilji
    dnes, 10:37
  • EXCEL makro - změna velikosti komentářů
    od Hurtol » 15 zář 2019 09:41 » v Kancelářské balíky
    4
    1434
    od Hurtol
    18 zář 2019 20:43
  • Excel (vba) - změna v buňce spustí makro
    od Andrea320 » 29 říj 2019 06:49 » v Kancelářské balíky
    5
    1042
    od X
    15 lis 2019 10:57

Zpět na “Kancelářské balíky”

Kdo je online

Uživatelé prohlížející si toto fórum: CommonCrawl [Bot] a 1 host