Hirdetés
- Luck Dragon: Asszociációs játék. :)
- sziku69: Fűzzük össze a szavakat :)
- sziku69: Szólánc.
- MasterDeeJay: i7 4980HQ asztali gépben (vs i7 4770)
- MasterDeeJay: Ram gondolatok 2026 január - DDR3-as gép is lehet megoldás? Mi a minimum?
- sh4d0w: Nyitlocker
- Cifu: Űrhajózás 2025 - Összefoglaló írás
- eBay-es kütyük kis pénzért
- Parci: Milyen mosógépet vegyek?
- Luck Dragon: Alza kuponok – aktuális kedvezmények, tippek és tapasztalatok (külön igényre)
-
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
-
Fferi50
Topikgazda
válasz
bucihost
#43454
üzenetére
Szia!
Akkor ez egy PowerQuery lekérdezés... (Lehet, hogy írtad valahol, bocs ha így volt).
A Formula tulajdonságát kell megváltoztatnod:ActiveWorkbook.Queries("Lekérdezés1"). Formula:= _"let" & Chr(13) & "" & Chr(10) & " Forrás = MySQL.Database(""X.X.X.X"", ""dbname"", [ReturnSingleDatabase=true, Query=""SELECT#(lf)SUM(MENNYS * EGYSAR) AS ERTEK,#(lf)DATUM,#(lf)SID#(lf)#(lf)FROM tabla#(lf)WHERE DATUM between '2020-03-30' AND '2020-03-30'#(lf)GROUP BY DATUM, SID;""])" & Chr(13) & "" & Chr(10) & "in" & Chr(13) & "" & Chr(10) & " Forrás"
A két dátum helyére & -al összefűzve írhatod a két cella értékét:...between '" & Range("X1").Value & "' AND '" & Range("Y1").Value & ""# stb...
Arra ügyelj, lehet hogy a dátumot alakítanod kell, hogy megfelelő legyen a formátuma.
Ellenőrizheted, ha az immediate ablakba beírod:
Debug.Print Activeworkbook.Queries("Lekérdezés1").Formula és Entert nyomsz.
Az Activeworkbook helyett írhatod természetesen a konkrét nevesített Workbook objektumot is.
Üdv.
Új hozzászólás Aktív témák
Hirdetés
- Használt, karcmentes Google Pixel 9 Pro Fold Obsidian színben, 256 GB tárhellyel és 6 hónap garanciá
- LG 55G4 - 55" OLED evo - 4K 144Hz & 0.1ms - MLA Plus - 3000 Nits - NVIDIA G-Sync - FreeSync Premium
- Dell Latitude 5290 i5 8350U, 8GB RAM, SSD, jó akku, EU bill., szép állapot, számla, 6 hó gar - 12.18
- ÚJ könyv: Walter Isaacson Elos Musk - keménykötésű
- ÁRGARANCIA!Épített KomPhone Ryzen 7 7700X 32/64GB RAM RTX 5070 Ti 16GB GAMER PC termékbeszámítással
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: Central PC számítógép és laptop szerviz - Pécs
Város: Pécs
Fferi50
