Hozzászólások
-
SzerzőBejegyzés
-
Sziasztok!
Köszönöm a tippet az értékké alakításról. Most már jól fut a makróm.
Még egyszer köszönöm.
SzTR
Sziasztok!
Köszi a tippet az értékké alakításról, valószínűleg ezt fogom csinálni. Viszont az összegzéseket meg akarom képletként tartani, így végig kell mennem az összes soron, megvizsgálva, hogy képlet vagy csatolás van-e benne. Ezt nem tartom túl elegáns megoldásnak, ezért akartam a csatolás megszűntetésével megoldani a problémát.
Magát a kódot így képzelem el az értékké alakításról egy cikluson belül. (Nem tudom, mennyire ismerős a .formulalocal illetve a .formula tulajdonság):if left(activecell.Formula,4) <> „SUM” then ‘ha nem összegzés képlet van a cellában
activecell.Value=activecell.Value ‘akkor legyen a cella érték
endifMaga a file úgy néz ki, hogy egy nagy táblában vannak a költséghelyek (92 oszlop x 230 sor). Ez a tábla egyébként külső állományokra hivatkozik, ahol az egyedi költségek vannak.
Van egy külön lap, amin kiválaszthatom a költséghelyet, ekkor a lap VKERES-sel beolvassa a kiválasztott költséghely adatait a nagy táblából. Majd egy szűrővel a nemnulla sorokat elrejtem, ezután másolom a lapot, mentem és megszakítom a csatolást.
Mindezt persze egy ciklusban, mivel 92 költséghely mentése manuálisan elég nagy munka, és unalmas is.Üdv és köszi,
SzTR
Nagyon szépen köszönöm! Megnéztem, elegáns a kód. Majd berakom a personal.xls-be. Ott már van úgyis pár saját függvény.
Sz.
Szia Imre!
Köszönöm szépen a tippet és a lioket is.
Sz.
Szia Imre!
Ma dolgoztam az SQl-szerverrel és beugrott egy lehetséges megoldás, amit szeretnék itt megosztani.
A problémám az volt, hogy a dátumot nem tudtam dinamikusan változtatni. Mivel nekem alaovetően a lekérdezés gyorsasága számít, így sok esetben csak az adott év vagy hónap adatai kellenének az SQL-szerverről.Az SQL-ben a feltételt így módosítanám:
HAVING CorrectedDate >= CONVERT(DATETIME, CONCAT(year(Getdate()), ‘-‘, month(Getdate()),’-01′), 102)Azaz a rendszerdátum évét és hónapját összefűzöm egy karakterlánccá, amit aztán dátumformátummá alakítok. Pl. a mai napon futtatva a parancsot, az Excel ezt a feltételt küldené az SQL-szervernek:
HAVING CorrectedDate >= CONVERT(DATETIME, ‘2017-07-01’), 102)Persze itt felmerül az évváltás és a hónapváltás kérdése, de ezeket szerintem már könnyebb kezelni.
Üdv,
SzilveszterSzia Imre!
Megpróbáltam a makrórögzítést és működő dolognak tűnik. Lehet, hogy ez lesz a vége a történetnek.
A makrózással nincs gond, teljesen világos, amit írtál.Köszönöm:
Szilveszter
Szia!
Elnézést a késői reagálásért, de csak most tudtam tesztelni a válaszban foglaltakat.
Sajnos a kapcsolathoz nem nagyon értek, csak használom… De mellékelek egy képernyőképet a kapcsolatról és az SQL parancsról. A cégspecifikus adatokat kitakartam, ezért vannak üres foltok a képen.
Kérdőjellel sajnos nem megy, hibaüzenetet kapok. Próbáltam a ‘Munka1!A1’ és #Munka1!A1# és @Munka1!A1 megoldásokat is. Mindegyikre hibaüzenetet kaptam, hol ilyet, hol olyat, de a lényeg, hogy nem jutottam előrébb. Lehet, hogy a megoldás a „Paraméterek” nyomógomb lenne, de sajnos az inaktív.Előre is köszönöm:
Szilveszter
Attachments:
You must be logged in to view attached files. -
SzerzőBejegyzés
