< návrat zpět

MS Excel


Téma: Překopírování dat rss

Zaslal/a 13.1.2014 16:54

Zdravím, mám 2 excelovské soubory. Soubor A a soubor B ( v každém je pouze jeden list). V souboru A mám hlavičku a potřeboval bych, aby se mi pomocí makra překopírovala data ze souboru B do souboru A hned pod hlavičku. Hlavička je (A1:A10). Můžete mi poradit. DAta se budou dynamicky přibývat a operace se budou opakovat čili budou řádky přibývat

Děkuji

Zaslat odpověď >

Strana:  « předchozí  1 2
#017269
avatar
cells mi překopíruje jen danou buňku můžete mi poradit případně upravit již vložené makro tak aby se mi okopírovala vybraná oblast.

Děkujicitovat
icon #017270
eLCHa
Soubory máte otevřené nebo chcete mít otevřen pouze soubor A?
V souboru B je více listů?
Na importovaném listu jsou pouze data ke kopírování?

edit - listy jsou v zadání - takže ten dotaz ruším ;)))citovat
#017271
avatar
mám otevřený pouze cílový soubor (B) tudíž pomocí makra se má otevřít A, zkopírovat data do B a soubor A zavřítcitovat
icon #017273
eLCHa
Oblíbená fráze Palooo
Len tak z brucha (neotestováno):
Sub subCopyData()
Dim w As Workbook
Set w = Workbooks.Open("Nejaky soubor - plna cesta k souboru A")

With w.Sheets(1).Cells(1).CurrentRegion
ThisWorkbook.Sheets(1).Cells(2, 1).Resize(.Rows.Count, .Columns.Count).Value = .Value
End With 'w.Sheets(1).Cells(1).CurrentRegion

w.Close
Set w = Nothing
End Sub
citovat
#017274
avatar
- ja to niekedy aj odskusam :))))

resize tiez napriklad nepouzivam
robim to cez range(cells(), cells())citovat

Strana:  « předchozí  1 2

Uživatelské menu

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

Menu

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.

On-line nástroje