- Örömkönnyek és üres kezek a TriFold startjánál
- Milyen okostelefont vegyek?
- One mobilszolgáltatások
- Vivo X300 - kicsiben jobban megéri
- iPhone topik
- Külföldi prepaid SIM-ek itthon
- OnePlus Nord 5 - lehűti a kedélyeket
- Xiaomi 15T Pro - a téma nincs lezárva
- Honor Magic V5 - méret a kamera mögött
- Google Pixel topik
-
Mobilarena
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
- AMD Navi Radeon™ RX 9xxx sorozat
- Végleg lemondott a régi gépekről a Steam
- The Division 2 (PC, XO, PS4)
- Örömkönnyek és üres kezek a TriFold startjánál
- Kellemes karácsonyi ünnepeket!
- A Windows 11 nem akarja ránk erőltetni az AI applikációkat – vagy mégis?
- Nintendo Switch 2
- Samsung Galaxy Felhasználók OFF topicja
- NVIDIA GeForce RTX 4080 /4080S / 4090 (AD103 / 102)
- Gumi és felni topik
- További aktív témák...
- Játékkulcsok olcsón: Steam, Uplay, GoG, Origin, Xbox, PS stb.
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- MEGA AKCIÓ! - Jogtiszta Windows - Office & Vírusirtó licencek- Azonnal - Számlával - Garanciával
- Windows 10/11 Home/Pro , Office 2024 kulcsok
- MS SQL Server 2016, 2017, 2019
- Apple iPhone 13 Pro 1TB,Újszerű,Dobozával,12 hónap garanciával
- GYÖNYÖRŰ iPhone 14 Pro Max 256GB Space Black-1 ÉV GARANCIA - Kártyafüggetlen, MS4149
- GYÖNYÖRŰ iPhone 13 Mini 128GB Midnight - 1 ÉV GARANCIA -Kártyafüggetlen, MS4195, 94% Akksi
- BESZÁMÍTÁS! MSI B550M R5 5600X 16GB DDR4 512GB SSD RTX 3070 8GB Lian Li Lancool 207 GIGABYTE 750W
- PS Plus előfizetések kedvező áron
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: Laptopszaki Kft.
Város: Budapest
Fferi50

