Hirdetés
- GoodSpeed: Munkaügyi helyzet Hajdú-Biharban: észak és dél
- sziku69: Fűzzük össze a szavakat :)
- sziku69: Szólánc.
- GoodSpeed: Te hány éves vagy?
- Real Racing 3 - Freemium csoda
- hcl: Amúgy mi a terv?
- Luck Dragon: Asszociációs játék. :)
- Geri Bátyó: Agglegénykonyha különkiadás – Bors
- koxx: A bajnokok egere? Lamzu Maya Champions Edition 8K gamer egér
- Sub-ZeRo: Euro Truck Simulator 2 & American Truck Simulator 1 (esetleg 2 majd, ha lesz) :)
-
LOGOUT
A Microsoft Excel topic célja segítséget kérni és nyújtani Excellel kapcsolatos problémákra.
Kérdés felvetése előtt olvasd el, ha még nem tetted.
Új hozzászólás Aktív témák
-
Sutyi73
csendes tag
Sziasztok! Segítséget szeretnék kérni. Adott egy munkaidő nyilvántartási táblázat, amiben a BL5-ös cellában összegezni szeretném azoknak a celláknak az összegét amiben a tm + szám szerepel. Jelen példában tm 1,5 + tm 3 = 4,5
Köszönettel Sutyi73
Itt a minta:
[link] -
Sutyi73
csendes tag
-
Sutyi73
csendes tag
Üdv!
Eddig eljutottam, de nem jól működik. Mi lehet a hiba? A másolt adatokat szépen egymás alá kellene folyamatosan írnia, de nem úgy csinálja.Sub Munka1()
Dim wb As Workbook
Set wb = ActiveWorkbook
Dim directory As String, fileName As String, sheet As Worksheet
directory = "D:\2019.08\"
fileName = Dir(directory & "*.xlsx")
Do While fileName <> ""
Workbooks.Open fileName:=directory & fileName, ReadOnly:=True
Range("A2:E" & ActiveSheet.UsedRange.Rows.Count).Copy
Destination = wb.Worksheets("Célmunkalap").Range("A" & wb.Worksheets("Célmunkalap").UsedRange.Rows.Count + 1)
Windows("Órák.xlsm").Activate
Range("A" & wb.Worksheets("Célmunkalap").UsedRange.Rows.Count + 1).Select
ActiveSheet.Paste
Workbooks(fileName).Close
fileName = Dir()
Loop
End Sub -
Sutyi73
csendes tag
Üdv! Segítséget szeretnék kérni.
Adott egy könyvtár, amiben xlsx fileok vannak. Egy táblázatban kellene összesíteni ezeknek a fileoknak adatait. Ezt hogyan lehet kivitelezni. Az A oszlopban levő számok egy egy embert jelentenek, a G oszlopban levők pedig munkaórákat. A cél, hogy egy táblázatban ezeket összesítsük. A könyvtárban az xlsx állományok 2019.08.04 N, 2019.08.04 É, 2019.08.05 N stb. elnevezésűek. Kérlek ha tudtok segítsetek.Bocsi nem akartam még egyszer kirakni.
-
Sutyi73
csendes tag
Illetve a destination sornál syntax errort ír.
Illetve még egy kérdés. Ha két ugyanolyan szám szerepel az A oszlopban, akkor azt össze kell vonni úgy, hogy az E oszlop értékeit össze kell adni. Az A oszlop marad.
Tehát: A B C D E A B C D E
38 12.5 38 16,5
25 8 ==> 25 8
38 4Köszi a segítséget.
-
Sutyi73
csendes tag
Üdv! Segítséget szeretnék kérni.
Adott egy könyvtár, amiben xlsx fileok vannak. Egy táblázatban kellene összesíteni ezeknek a fileoknak adatait. Ezt hogyan lehet kivitelezni. Az A oszlopban levő számok egy egy embert jelentenek, a G oszlopban levők pedig munkaórákat. A cél, hogy egy táblázatban ezeket összesítsük. A könyvtárban az xlsx állományok 2019.08.04 N, 2019.08.04 É, 2019.08.05 N stb. elnevezésűek. Kérlek ha tudtok segítsetek.
Új hozzászólás Aktív témák
Fferi50- BestBuy topik
- Anime filmek és sorozatok
- GoodSpeed: Munkaügyi helyzet Hajdú-Biharban: észak és dél
- Call of Duty: Black Ops 7
- Melyik tápegységet vegyem?
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- One otthoni szolgáltatások (TV, internet, telefon)
- exHWSW - Értünk mindenhez IS
- sziku69: Fűzzük össze a szavakat :)
- Milyen légkondit a lakásba?
- További aktív témák...
- BESZÁMÍTÁS! GIGABYTE B760M i7 12700 32GB DDR4 1TB SSD RX 7800 XT 16GB ASUS A31 PLUS ARGB 750W
- AKCIÓ! Apple MacBook Pro 16 M4 Pro 48GB RAM 4TB SSD macbook garanciával hibátlan működéssel
- Eladó XpertVision GT 1030 Silent 2GB videokártya
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- í kilenc! AKCIÓS PRECÍZIÓS KÉSZÜLÉK! 7670 i9-12950HX 64GB RAM 1TB SSD Nvidia RTX A3000 12GB 1 év gar
Állásajánlatok
Cég: Laptopszaki Kft.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest