- Kempingezés és sátrazás
- sziku69: Fűzzük össze a szavakat :)
- Luck Dragon: Asszociációs játék. :)
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- gban: Ingyen kellene, de tegnapra
- Geri Bátyó: B550 szűk keresztmetszet, de mi és miért?
- Chosen: Canon 5D II - portrézás 2025-ben
- Doky586: Helyreállítási partíció létrehozása (javítása)
- Gurulunk, WAZE?!
- bitpork: Augusztus 2- szombat jelen állás szerint.
-
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
-
ulrik19
tag
sub akármi() ekvivalens a public sub akármi() használatával
vagyis "kintről" elérhető.ugyanakkor: private sub akármi() esetében a hatókör nem engedi, hogy máshonnan meghívják, ezért a makróindításnál sem látszik. DE, a 3 sub-nak egy modulban kell lenniük.
egyébként szerintem mindig célszerű kitenni a private/public kulcsszót, hogy totál egyértelmű legyen.
-
Cuci3
tag
Nem biztos, hogy értjük egymás gondolkodását. A következő folyamat megalkotása nem lehetséges:
CSV megnyitása mellékletből -> Progi indítása (valami bővítményként lehetne csatolni az Excelhez, és valamelyik menübe berakni, vagy valami gombot hozzárendelni) -> Ha tagolt, akkor a rendezés lefut. Ha nem tagolt, akkor előbb lefut a Szövegből Oszlopok majd a rendezés -> Mosolygás, öröm, boldogság -
Cuci3
tag
Nos Neked az Adatok/Szövegből oszlopok menüpont kellene 2003 alatt. 2007-ben nem tom hol van és hogy hívják. (ezt majdcsak elmeséli valaki)
És szerintem egypár rögzített makróval rá lehet jönni a szintaktikára.
Én mindig is úgy tudtam, hogy a pontosvesszővel tagolt fájl a csv, a vesszővel tagolt a txt - lehet, hogy szakbarbár vagyok -
Hali!
1. Az, hogy megpróbálod a munkatársak számára a legegyszerűbben kezelhetővé tenni, az dicséretes.
2. Nem tettem korra kitételt a válaszomban, egyszerűen aki képtelen minimális energiát befektetni, hogy fejlődjön, vagy 5szöri elmagyarázás után sem képes egy primitív feladatot elvégezni, annak semmi keresnivalója Excel előtt, függetlenül hány éves...
Ember nélkül nincs számítógép, jó szakember nélkül meg több bosszúságot okoz, mint örömöt..Szép a hobbid, de gondolom neked is lenne mással eltölteni az időd, mint megírni egy összetett makrót.3. Nos, mivel írtad, hogy CSV-be kapod alapból, ezért nem igazán értem, mit kellene átnevezni...Ezenkívül az sem világos, hogy miért nem nyílik mag a tagolás automatikusan, hisz pont az a gond, hogy a területi beállítások nem egyeznek meg, a CSV-ben található tagoló karakterekkel(többek közt)...
Valóban félreérthető voltam, hogy "megnyitni", arra értettem, amit írtál, azaz adatok importálása, ott meg KELL hogy nyíljon. Véleményem szerint, ez még mindig egyszerűbb, mint egy összetett makró, amiben fájlkezelésről/feldolgozásról formátumok kinyeréséről, stb stb kell gondoskodni, mindezeket persze hibakezeléssel felügyelve...4. Igen, az alap adatformázás az a területi beállítások leánykori neve...
Nem azt írtam, hogy a területi beállításoknak nincs köze a számformátumokhoz, hanem arra gondoltam, hogy a CSV-nek bármi köze lenne hozzá. Ha nem módosíthatod(jogok) miatt a területi beállítást, akkor azt makróval sem fogod egyszerűen megoldani.
A CSV NEM TÁROL FORMÁTUMOT! pl ezer forint, az így lehet letárolva a CSV-ben
1000
1,000
1,000 Ft
1 000
1 000 Ft
Az első változat kivételével az összes többi SZÖVEG, ergo át kell majd alakítanod számmá, ha számolni is szeretnél még vele a későbbiekben, DE simán nem fogod tudni átalakítani, mert a területi beállítások egyből formázzák is számként avagy pénznemként, DE ÚGY ahogy a területi beállításokban szerepel. Ezt a makróval csak úgy kerülheted ki, hogy EGYÉNI cellaformázást alkalmazol pl
#,###,### Ft (ezt csak hasra ütésre írtam, semmi értelme amúgy)
Tehát még egy dolog, amiről a makrónak gondoskodnia kell, arról már nem is beszélve, hogy az email-ből is automatikusan kiszedi a csatolmányt a megadott címről stb stb.
Ezért tartanám egyszerűbb megoldásnak, ha mindezt az alkalmazottaknak is megtanítanád(tudom, tovább tart mint egy gombra kattintás), de legalább fejlődnének és később már ilyen dolgokkal nem kellene foglalkozni.Kézenfekvő megoldás lenne elsőre, hogy a rendszergazdának szólni, hogy hát állítsa be "normálisan" a területi beállításokat, csak Én meg tudom, hogy az nem véletlen, nagyon valószínű, hogy valamilyen adatbázis kezelő, vagy "sima" adatbázis miatt van így belőve, ezért ha átállítaná "Excel kompatibilisre", akkor meg ott lenne gond...
5. A makró természetesen megírható, ez nem is kérdés, de nagy odafigyelést és kellő alapot igényel, nem egy ilyen 10 soros cuccról van/lesz szó, univerzálisnak és megfelelő hibakezeléssel ellátottnak kell lennie.
(pl fel kell ismerni a tagoló karaktert, majd a számformátumot (1000 vagy 1,000 stb), hány számjegy, az szám vagy pénznem stb stb)Természetesen a Te döntésed lesz mit választasz, ha a makrót, akkor sok sikert!
(ha meg a tanítást, akkor sok türelmet a "nebulókhoz)Fire.
UI: Delila_1 biztosan segíteni fog, hacsak nem már estére berakja Neked a komplett makrót(ahogy ismerem)
-
HAli!
Magam részéről nem foglalkoznék semmilyen makróval, mert szükségtelen, másrészt meg a Vezérlőpultnak ehhez semmi köze. Amikor Excel-lel megnyitsz egy CSV fájlt, akkor automatikusan végigvezet a tagolás menetén, kiválasztható egyszerűen, hogy mi a tagoló karakter(vagy meg is adható egyedi ha szükséges).
Ha valaki ezt nem tudja elsajátítani(nem tudod elmagyarázni neki), akkor add a kezébe a munkakönyvét, mert ezt általánosban tanítják.
Fire.
UI: makróhoz csak akkor nyúlj, ha nincs más megoldás, ugyanis egy csomó biztonsági problémát vet fel, hisz akkor azt is be kell állítanod, hogy kérdés nélkül lefusson a makró, ezáltal nem lesz vizsgálva a tevékenysége és még jó pár negatív dolog, amit nem részleteznék...
-
rtom
senior tag
-
Delila_1
veterán
A With sorban megadunk egy objektumot, amire a változtatások vonatkoznak. Jelen esetben a kijelölt terület (selection) hátterét (interior). A további sorok ponttal kezdődnek, amit úgy kell értelmezni, mintha a With sorban írtakat folytatnánk (With nélkül):
selection.interior.colorindex=15
selection.interior.pattern=xlsolid 'nincs mintázat
selection.interior.patterncolorindex=xlautomatic 'a mintázat színeA két utóbbi kitörölhető, mivel alapbeállítás, és akkor már nincs szükség a With, End With-ra sem.
Ezt a makrót most rögzítettem, a karakter típusát változtattam meg. '******-gal jelöltem, ami nem szükséges, törölhető.
With Selection.Font
.Name = "Tahoma"
.Size = 10 '******
.Strikethrough = False '******
.Superscript = False '******
.Subscript = False '******
.OutlineFont = False '******
.Shadow = False '******
.Underline = xlUnderlineStyleNone '******
.ColorIndex = xlAutomatic '******
End WithVégül ennyi marad: Selection.Font.Name = "Tahoma"
-
Delila_1
veterán
cells(x,25).select
selection.font.colorindex=színkód 'karater színe
selection.interior.colorindex=színkód 'háttér színeRögzítesz egy makrót, ahol megváltoztatod a karakter-, ill. a háttér színét. Onnan kimazsolázod azt, amire kiváncsi vagy.
Próba:For sor = 1 To 255
Cells(sor, 1).Select
Selection.Value = "Színkód=" & sor - 1
Selection.Font.ColorIndex = sor - 1
Cells(sor, 2).Select
Selection.Interior.ColorIndex = sor - 1
Next -
Köszi!
És kérdezhetek még egyet?
Munkaidő számítás.
Nálunk csak azt számolják túlórának ha 30 percet
meghaladja a túlórád. Magyarul ha 8:30 felett van a munkaidőd akkor
van fél órád túlóra.Ha nem éred el a 31 percet, akkor nincs (15 percet
nem számolnak).
Addig eljutottam hogy az első oszlop az érkezés idejét tartalmazza
(pl. 7:00 ).
A második oszlop a távozás idejét (pl: 16:00)
És a harmadik oszlop a ledolgozott órák számát ( pl. 8:40 )erre meg is
van a képlet.
A harmadik oszlopba kellene nekem az hogy van-e túlórám , ha igen
akkor mennyi az összes munkaidő,tehát ha 8:30 alatt dolgoztam akkor
8:00 legyen vagy az adott óra, ha felette akkor a túlórával
összesitett idő.
A negyedik oszlopba kellene csak a túlóra ideje.Ezeket a képletek nem tudom sehogy összehozni.
Új hozzászólás Aktív témák
Hirdetés
- BESZÁMÍTÁS! Gigabyte H610M i5 13400F 16GB DDR4 512GB SSD RX 6700XT 12GB DeepCool MATREXX 40 650W
- ASUS TUF Gaming F15 FX506 - 15.6"FHD IPS 144Hz - i5-11400H - 8GB - 512GB - RTX 3050 Ti - 1,5 év gari
- 0% THM 3 havi részlet! Beszámítás, 27% áfa, Sapphire Nitro+ RX 9070XT 16GB készletről
- Samsung Galaxy A13 64GB, Kártyafüggetlen, 1 Év Garanciával
- BESZÁMÍTÁS! ASROCK H310CM i5 9600K 32GB DDR4 500GB SSD RTX 3050 8GB DeepCool Tesseract SW 500W
Állásajánlatok
Cég: CAMERA-PRO Hungary Kft
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest