Hogyan kell használni a VBA adatokat másolni egy könyvet a másikra, sirexcel
A kihívás az, hogy másolni egy bizonyos tartományban a jelenlegi elrendezés, nyitott egy másik munkafüzetet, és a másolt adatokat egy adott sejt, mentse a fájlt, és zárja be. Az alábbiakban a VBA-kódot.
2. lehetőség: Nyitott könyv futtatni makrók, hogy ő fedezte fel mi szükség van egy könyvet másolt onnan a szükséges adatok és tegye a mi nyitott könyv, zárja be a fájlt, amelyből az adatokat másolta
Egy másik példa - Adatok másolása tól az aktív megnyitni egy Excel-munkafüzetet több lapot (ebben a példában 3 lap) egy másik könyv, amely folyamatosan egy adott helyen. Az adatokat a szövegbe kerül az érték, plusz cellaformázási kerül át.
Köszönöm a figyelmet.
Üdvözlünk! Kérem, segítsen nekem a probléma megoldásában:
Van 2 fájlokat. Az első fájl tartalmazza adatoszlop fájl adatait naponta frissítik. A második - a döntő asztalon. Azt akarod, hogy automatikusan másolja oszlopok az első fájlt, és helyezze be a végén a második asztal.
Kell egy makrót kattintásra adatokat másolni egy adott oszlop statikus aktív oszlopon (ahol a kurzor).
Jó napot kívánok.
Kérem, mondja meg a makró kódot a következő funkciókat:
Van néhány dokumentumot. Az első dokumentum - az alapja az összes adatot, és a többi - a dokumentumok a másolni kívánt néhány adatot az adatbázisból.
Szeretném leírni szavakkal a makró az alábbiak szerint:
Nyissa meg a dokumentumot „Base” fül „Munka1” értékének másolása sejt C15, majd illessze be a dokumentum „Jelentés” fülön „Data” a területen F19.
Nyissa meg a dokumentumot „Base” fül „Munka1” értékének másolása sejt C18, majd illessze be a dokumentum „Jelentés” fülön a „Data” mezőbe a D20.
Nyissa meg a dokumentumot „Base” fül „Munka1” értékének másolása sejt C24, majd illessze be a dokumentum „Jelentés” lap „Data” L3 területen.
Igen, csak az érték a másolni kívánt (a stílus és így nem kell), és ha például egy adatbázis, amely a sejt kiürült, az üresség ki kell cserélni az értéket, ami már regisztrált korábban más dokumentumokat.
A programozás nem erős, ha lehetséges, egy rövid magyarázatot.
Példa csatolva. Digitális értékeket és szöveget lehet egyidejűleg. Azokat ki kell másolni változatlan (a képen). Parameter Fields 2, 3, stb Paraméter Ez nem játszik szerepet. Hogy én csak azt mutatta, hogy a sejtek lehetnek különböző helyeken.
Igen, a példában az emberek nevek azonosak, de a valóságban eltérő lehet, mert én vagyok a forgatókönyvet, és meghatározzák, hogyan lehet adatokat másolni, amely sejt. A helyzet a lista általában nem változik.
Jó estét kívánok. Ez megint.
Van egy új kihívás. Van egy fájl, amelyben a forrás adatok rendelkezésre állnak.
A makro, hogy segédkezett másolatokat csak az adott fájlt.
És tudod, hogy a makro dolgozni bármilyen más fájlt.
Ez, azt másolja a makrót egy másik fájlt, és azt állítja, külön.
sz. Még mindig a helyébe lép.
talán segíthet egy kicsit másképp.
Itt van egy makrót, amely másolatot a kívánt sávot, és másolja a megfelelő könyvet.
De ahogy az első kiviteli alakban, szükség van rá, a változások után a fő adatállomány, ne helyezze be ugyanazon a vonalon, és a következő.
Sub Knopka2 Click ()
„Macro Knopka2_Schelchok
„Billentyűzet: Ctrl + j
Workbooks.Open Filename: = "C: \ Users \ Slava \ Desktop \ Neuer Ordner \ 1.xlsm"
Selection.PasteSpecial Paste: = xlPasteColumnWidths, Működés: = xlNone, _
Ez lehet olyan egyszerű?
Nem, nem könnyebb. Ellenőrizze ismét alaposan. Van minden működik. Ezek nem cserélik ki, és behelyezzük a következő sort.
Most, az úton azt mondta, hogy nem szabad, hogy a G5000 és F5000 a G oszlopban semmit kerül be, így ő helyettesíti az adatokat, mint az utolsó sor mindig ugyanaz
Jó estét kívánok. Azt akarom, hogy köszönöm. Minden kiderült.
Csak módszer „lándzsa” változott egy kicsit kódot. És ez ebben a sorban
iLastRow = munkafüzetek ( «Kniga1.xlsm»). munkalapok ( «Munka1»). tartomány ( «F5000»). End (xlUp) .Row + 1
Köszönet újra.
Valami nem működik. Azt hiszem, valahol, hogy nem jön, hogy kiadja a másolatot a lap tartomány, ahonnan másolni szeretne, írja 400 hiba.
Itt egy kódot tettem:
„Nyisd meg a fájlt, amely a másolni kívánt adatokat
Workbooks.Open Filename: = "C: \ Central - 2c és 1,2,3p.xls"
„Másolja át a kívánt tartományt a nyitott könyv 1 lap
„Aktiválása azt akarják foglalni
Munkafüzetek ( «New blank.xls»). Aktiválása
„Izolált és beilleszteni a másolt adatokat az A1 cella
ActiveWorkbook.Worksheets ( «Keresetlevél»). Tartomány ( «A1»). Jelölje
„Bezárja a könyvet, amit másolt adatok
Munkafüzetek ( «Central - 2c és 1,2,3p.xls») bezárása.
Közép - 2c és 1,2,3p.xls - egy fájlt, amely a másolni kívánt.
2c és 1H lap, amely a másolni kívánt fájlt a fenti
Új blank.xls egy olyan dokumentum, amely a másolni kívánt
A keresetlevelet - a lista egy fájlt egy másik formában, hogy azt szeretnénk, hogy másolja a kiválasztott fenti listában.