-
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
-
válasz
kamikaze boci
#4974
üzenetére
Hali!
Korábban írtad, hogy 1 hete foglalkozol VB-vel. Nos, ha ennyire gyorsan sajátítasz el dolgokat, akkor javaslok egy dolgot.
Tessék az ACCESS berkeiben elmerülni, és az adatbáziskezelést VB-vel megtanulni.
Az ilyen feladatok alapszinten jók, de az igazán "profi" megoldás az az, hogy Access-ben kezelem az adatbázist, és annak segítségével állítok elő Excel táblát, vagy egyszerűen az Excel "külső adatok átvétele" segítségével...
Ráadásul így a user csak a végeredményt látja, nem kell még azzal is foglalkoznia, hogy engedélyezze a makrókat, stb(és még sok más is rejtve marad a user elött, amire tényleg semmi szüksége semm lenne). Szóval sokkal elegánsabb, jobb, profibb megoldáa az Access. Ott is létrehozhatsz grafikus felületet(form, button, dbcomponents, stb) amivel beviszed az adatokat, felügyeled, módósítod, törlöd, stb. Aztán egy sima lekérdezéssel akár, kész az eredménytábla, amit 3 kattintással beimportál az Excel...
Ezt jótanácsnak szántam, remélem élsz vele...
Fire.
-
Cuci3
tag
válasz
kamikaze boci
#4972
üzenetére
Hi!
Mágus nem vagyok, időm nem sok van, so én csak ránéztem a feladatra.
A másolást úgy oldanám meg, hogy beszúrok egy munkalapot, kimásolom a leszűrt ingatlanokat, majd onnan másolnám be a kellő oszlopokat az indítás lapra. Utána törölném a beszúrt munkalapot, és az indításon megformáznám a listát. A lista kijelöléséhez pedig ezt használnám:Sheets("Indítás").Range("B34").CurrentRegion.Select
Közben persze ki lehet kapcsolni az automatikus képernyőfrissítést (application.screenupdating), így a júzer nem lát semmit. Persze a végén vissza kell kapcsolni.

Ja, és biztos van ennél jobb megoldás.
Új hozzászólás Aktív témák
- Apple iPhone 13 128GB, Kártyafüggetlen, 1 Év Garanciával
- MacBook, Apple M1 / M2 kompatibilis dokkolók, DisplayLink 4K, USB-C, Type-C
- S21 Dobozában 128/8
- BESZÁMÍTÁS! ASRock B450M R5 5500 16GB DDR4 512GB SSD RTX 2060 6GB Zalman T3 Plus ADATA 600W
- Eladó EDIFIER ES prémium hangszórók ES300 / ES60 / ES20
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest



Fferi50