-
Fototrend
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
-
Mutt
senior tag
válasz
Yutani
#53162
üzenetére
Szia,
Jól sejtem hogy kimutatást/összegzést akarsz csinálni a különböző cégekre és csak az adatokat akarod behúzni könnyedé, hogy a kész formulák kiadják az eredményt?
Ha igen, akkor szerintem próbáljuk meg Power Query-vel megoldani, ha a fájlok felépítése hasonló.
Két lekérdezést tudok most elképzelni:
1. Mappából a lehetséges fájlnevek kilistázása.
2. A kiválasztott fájlon adatátalakítás szükség szerint.üdv
-
Fferi50
Topikgazda
válasz
Yutani
#53169
üzenetére
Szia!
Egy példa, ami alapján el lehet indulni: A képletet a makró irja be a B2 cellába!!!
A munkalap kódlapjára (lapfülön jobb egérgomb - kód megjelenítése) az alábbi makrót kell beilleszteni:Private Sub Worksheet_Change(ByVal Target As Range)If Intersect(Target, Range("E1:H1")) Is Nothing Then Exit SubApplication.EnableEvents = FalseRange("B1").Formula = "='" & Range("E1").Text & "\[" & Range("F1").Text & "]" & Range("G1").Text & "'!" & Range("H1").TextApplication.EnableEvents = TrueEnd Sub
Ha változtatod az F1:H1 cellákban levő adatot, akkor változik a képlet a B1 cellában és megjelnik az új eredmény. Ebben a formában kell beírni, azaz az útvonal végére nem kell \ és kell a fájl kiterjesztés.
Figyelem, hibakezelés nincs benne. Először töltsd ki a négy cellát és utána másold be a makrót, különben hibaüzeneteket fogsz kapni.
Makróbarátként kell menteni!
Üdv. -
föccer
nagyúr
válasz
Yutani
#53162
üzenetére
Hűűű, ha jól sejtem, akkor vagy adatfrisstés kell neked, vagy makrózni kell.
Függvények csak adatfrissítésen keresztül fognak tudni olyan file-ból frissíteni, ami nincs nyitva.
Vagy makróból mgnyitod a szükséges fájlokat, kiszeded belőle a szükséges adatokat és bezárod ami nem kell.
Új hozzászólás Aktív témák
- Nintendo Switch 2
- Kormányok / autós szimulátorok topikja
- Fotók, videók mobillal
- MWC 2026: Kezünkben a Vivo V70, megvan a magyar ára is
- Formula-1
- Andras-G: Az internet veszélyei [2. rész] - Facebook Marketpalce
- PlayStation 3
- Milyen billentyűzetet vegyek?
- gban: Ingyen kellene, de tegnapra
- Azonnali VGA-s kérdések órája
- További aktív témák...
- Jó ÁRON ELADÓ! Üzleti HP Elitebook 1040 G9 Laptop! / i5-1245U 16GB 256GB FHD
- MSI Crosshair 16 i7-14700HX 14. gen 16gb ddr5 + RTX 4060 (140W) + 240Hz QHD+
- Telefon felvásárlás!! iPhone 15/iPhone 15 Plus/iPhone 15 Pro/iPhone 15 Pro Max
- Dell Vostro 3425 6magos Ryzen 5 5625U 8GB RAM 256GB SSD
- Apple MacBook Air 13 (2020) M1 8GB/500GB használt, megkímélt 82% akku
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
A munkalap kódlapjára (lapfülön jobb egérgomb - kód megjelenítése) az alábbi makrót kell beilleszteni:
Fferi50