- Samsung Galaxy S10e - esszenciális
- Motorola Edge 40 - jó bőr
- Milyen okostelefont vegyek?
- Honor Magic6 Pro - kör közepén számok
- Mobil flották
- Xiaomi 13 - felnőni nehéz
- Poco X6 Pro - ötös alá
- Android szakmai topik
- Samsung Galaxy S24 Ultra - ha működik, ne változtass!
- Samsung Galaxy S21 és S21+ - húszra akartak lapot húzni
Hirdetés
-
Retro Kocka Kuckó 2024
lo Megint eltelt egy esztendő, ezért mögyünk retrokockulni Vásárhelyre! Gyere velünk gyereknapon!
-
PC-s demót kap a The Alters
gp A teljes kiadás már konzolokon is elérhető lesz majd, a próbaverziót azonban csak Steamen és Microsoft Store-ban érjük majd el.
-
Közeledik az X Fold3 Pro
ma A kínai bemutató után megtartotta a Vivo a nemzetközit, de még nem Európában.
-
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
-
mexel
veterán
Sziasztok! S.O.S.-ben egy olyan kérdésem lenne, hogy hogyan lehet megyszámolni azt, ha egy oszlopban a cellákban van "a,b,c,d,e,f,g,h,i" betűk, és azt szeretném megtudni hogy az oszlopban hány darab a, vagy b vagy stb betű van.Remélem érthető
-
Delila_1
Topikgazda
Szavanként megszámolod, végül összegzed. A szerkesztőlécen látod a C2 képletét, amit jobbra-, és le másolsz.
Szerk.: csak az angol ABC betűit vittem be az első sorba, kiegészítheted a magyar ékezetesekkel.
[ Szerkesztve ]
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
mexel
veterán
válasz Delila_1 #20752 üzenetére
Köszi, de sajnos nem így van. Egy cellában van több is, így: "a,b,c,d" az alatta lévőben "d,f,i" stb.
Azt szeretném, hogy tudjam egy oszlopban pl hány darab b van. Közben szűrővel mejdnem sikerült, csak az a baj, hogy az egy cellában lévő betűk közé vesszőt tettek és a szűrő azt nem külön a-nak vagy b-nek látja, hanem pl a,b-nek. Ha jól sejtem akkor így nem is lehet majd számolni az értékekkel. Hogyan kell elválasztani a cellában lévő értékeket? -
Delila_1
Topikgazda
Az Összesen sorban (20. sor) SZUM függvény van, ami betűnként megszámolja, hogy az A oszlopban hány a, b, c, stb. karakter található.
Nézd meg, hogy az alma szónál az A betűhöz 2-t írt a függvény, a ribizlihez 3 db i-t.
Szűrni úgy tudsz, hogy *a*-t írsz keresési feltételnek. Ez azokat a sorokat szűri ki, amik tartalmaznak a betűt. Ám összeszámolni nem tudja.
[ Szerkesztve ]
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
mexel
veterán
válasz Delila_1 #20754 üzenetére
Sajnos nem vagyok jó excelben nagyon A szummal nem tudom kiíratni hogy mennyi betű van. Mit kell megadni a szum-nak?
A szűrő alul kiírja mennyit talál, csak ahogy írtam ott az a baj, hogy ha egy cellában vesszővel elválasztva van több beetű akkor azt nem külön látja. Tehát ha minden cellában az van hogy "a,b,c" akkor úgy látja hogy nincs a betű, csak "a,b,c" érték van.
[ Szerkesztve ]
-
Brain75
senior tag
válasz Delila_1 #20750 üzenetére
2010-ben kellett megoldanom.
Igen valóban nem írtam oda. Elfelejtettem.
Legközelebb odaírom.Köszönöm.
/LOGITECH Kormány, Játékvezérlő, Hangfal, Egér, Billentyűzet, Dell, Toshiba, Fujitsu, Acer notebookok és minden egyéb elektronikai termék szakszerű, gyors JAVÍTÁSÁT vállalom/
-
mexel
veterán
válasz Delila_1 #20758 üzenetére
Feltettem ide egy mintát. Így néz ki az oszlop, és alul a betűkhöz kellene beírnia hogy mennyi van belőlük. Van erre valami ötlet?
Biztos van egyszerű megoldás, csak nem tudom mi
Ha valaki tud valamit örömmel veszem. Remélem a linkről letölthető ahová feltettem.
Sőt inkább ide is feltettem, talán ez jobb. -
motinka
tag
sziasztok
Egy kis segítségre lenne szükségem.
Egy naptárt szeretném, ha egy táblázatban dupla klikkelésre felpattanna bármelyik cellában, de az alábbi csak a jelölt cellákban engedi. Mit kell átírni, hogy az egész táblázatban minden cellában működjön?Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Select Case Target.Address
Case "$B$1", "$B$2", "$B$3"
Cancel = True
Call OpenCalendar
End Select
End Suba megoldást előre is köszönöm
MoTiNka
-
mexel
veterán
Hopp, lejárt a szerkesztési időm, még valami:
Az eredményt ha beírja a függvény, vagy bármi a cellába, azt hogyan tudom megcsinálni, hogy az érték elé pl beírjam hogy a= és az egyenlő jel után írja az értéket?
-
Delila_1
Topikgazda
válasz motinka #20761 üzenetére
if target.column=2 then
Nem kell a select case, ha a teljes B oszlopon be akarod hozni duplaklikkre a naptár vezérlőt.
Teljes táblázatnál
if target.address="$A$1:$H$50" thenTermészetesen a saját táblázatod címét kell megadnod, fix hivatkozással.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Delila_1
Topikgazda
A darabteli függvény azokat a cellákat számolja össze, amikben előfordul a keresett érték. Ha bármelyik cellában többször szerepel a kérdéses karakter, hamis eredményt kapsz.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
mexel
veterán
válasz Delila_1 #20768 üzenetére
Köszi, adott cellákban csak egyszer szerepel az érték ami kell, erre tökéletes lehet. fentebb linkeltem egy mintát hogy miről isvan szó.
Ha egy cellában manuálisan rögzítve van egy ilyen pl: " a = 32 " akkor abból lehet dolgozni a 32-vel mint számmal, vagy a számot külön cellába kell tenni?
-
alfa20
senior tag
Sziasztok,
Makróban alapesetben így szoktam megnyitni és előkészíteni a tábláimat:
Workbooks.Open Filename:=kpt_allnev, UpdateLinks:=False
kpt_nev = ActiveWorkbook.Name
kpt_fulnev = ActiveSheet.Name
mivel általában egy fül szokott csak lenni, most viszont van egy olyan táblám amiben rengeteg a fül, hogy változtassam meg, hogy az "összesített" nevű legyen a "kpt_fulnev"?"Az agy olyan, mint az ejtőernyő: csak akkor működik, ha nyitott." (Thomas Dewar)
-
Delila_1
Topikgazda
Pl. ha a D3 cella értékét akarod így kiíratni, akkor ="a=" & D3
Formátumként is megadhatod az egyéni kategóriában:
"a=" # ##0, akkor nem kell a cellába beírnod az idézőjelek közötti részt.Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
GrandS
senior tag
Egy Excel tábla soraiba hiperhivatkozások (dokumentumletöltő linkek) vannak rögzítve. Ha rákattintok, azt mondja: "A megadott fájl nem nyitható meg" Ha a hivatkozás szerkesztésével kimásolom és beillesztem a linket egy böngészőbe, automatikusan letölti. Mi a hiba?
-
alfa20
senior tag
válasz Delila_1 #20772 üzenetére
Köszönöm, ismételten
ha több táblám van amivel dolgozom, akkor így tegyem be a makró elejére?
pl:
Dim tbl1_fulnev As WorkSheet
Set tbl1_fulnev = Sheets("blabla1")
Dim tbl2_fulnev As WorkSheet
Set tbl2_fulnev = Sheets("blabla2")
Dim tbl3_fulnev As WorkSheet
Set tbl3_fulnev = Sheets("blabla3")A 'Dim' az mit csinál?
általában úgy készítek egy makrót, hogy a már készekből át teszem amit tudok használni, a többit meg makró rögzítésbe készítem, majd megpróbálom kielemezni mi mit csinál és az alapján alakítom."Az agy olyan, mint az ejtőernyő: csak akkor működik, ha nyitott." (Thomas Dewar)
-
Delila_1
Topikgazda
válasz alfa20 #20779 üzenetére
Igen, annyi különbséggel, hogy a Dim sorokat a makró elejére szoktuk bevinni, hogy később könnyebben megtaláljuk.
Dim tbl1_fulnev As WorkSheet, tbl2_fulnev As WorkSheet, tbl3_fulnev As WorkSheet
Alá már jöhetnek az értéket adó Set sorok.A Dim változónév As Típus helyet foglal a memóriában a változónak. Ennek az az előnye, hogy ha a makró írása közben elgépeled egy változó nevét, aminek helyet foglaltál, már az indításkor rád kiabál, hogy nincs dimenzionálva egy változó. Ha ezt a lehetőséget kihagyod, nehezebben találod meg a hibát, ami abból adódhat, hogy 1-1 karakter eltéréssel írtad be a változót több helyre. Érdemes hozzászokni a dimenzionáláshoz.
Példa:
Szoveg="Ez itt egy szöveg"
Range("A10")=Szöveg
Ha nem deklaráltad a Szoveg változót, az A10 üres lesz, mert a Szöveg változó üres string, nem adtál neki értéket. Az is lehet, hogy nulla lesz az A10, mert nem közölted a VBA-val, hogy a Szöveg milyen típusú (szöveg, dátum, szám, logikai, stb.) változó legyen. Keresheted a hibát, és könnyű átsiklani 1 betű eltérésen. Ha viszont foglaltál neki helyet, indításkor jön az üzenet, hogy nincs Szöveg változód.A VBE Tools | Option menü Editor fülén jelöld be a Require Variable Declaration négyzetet. Ettől kezdve a moduljaid tetején automatikusan megjelenik az Option Explicit felirat, ami kötelezővé teszi a változók deklarálását, futtatáskor azonnal figyelmeztet a hiányra.
Szerk.: a helyfoglaláskor ne hagyd ki a típus megadását sem, akkor egy dátumot váró változónak nem adhatsz véletlenül szöveg típusú értéket. Előfordulhat, hogy 1-1 változóhoz változó típusú adatot kellene rendelned, ilyenkor a típust elhagyhatod, vagy Variant-ra állítod.
[ Szerkesztve ]
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
bteebi
veterán
válasz kőbaltazár #20777 üzenetére
Szia!
Olyan lapon futtatod, amin már egyszer lefuttattad? Akkor nem fog menni, mert ha a lap védve van, akkor nyilván nem tudsz a celláin változtatást végrehajtani. Ezt elkerülendő szúrj be a makró elejére egy olyan sort, hogy ActiveSheet.Unprotect.
Cancel all my meetings. Someone is wrong on the Internet.
-
#02644736
törölt tag
Sziasztok!
Nekem olyanban lenne szükségem segítségre, hogy van egy vizsgáló berendezés, aminek az adatait beolvasom excelbe. Van olyan függvény, amivel meg tudom keresni az A oszlopban az utolsó előtti beírt értéket? (Az utolsó a Test Complete de az utolsó előtti egy szám, amivel számolnom kéne)
Előre is köszönöm a segítséget!
Norbi
-
detroitrw
addikt
-
Delila_1
Topikgazda
válasz motinka #20786 üzenetére
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Column=3 Then OpenCalendar
End SubEz akkor indítja a calendart, ha a C (harmadik) oszlop bármelyik celláján kattintasz duplán.
Persze nem tudom, mit tartalmaz az OpenCalendar makród.Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
alfa20
senior tag
Sziasztok,
megint sikerült elakadnom, de most képlettel:
Adott az A2-es cella aminek az értéke ha az alábbi szám valamelyike (130;131;132;133;160;161;170;171;190;191;375;376), akkor adja eredményül a B2-es cellá, ha nem egyenlő, akkor a C2-est.egy szép hosszú függvénnyel sikerül, de nincs valami rövidebb?
=HA(VAGY(A2=130;A2=131;A2=132;A2=133;...stb...);B2;C2)#20780: Delila_1! ismételten, köszi, kifogom majd próbálni, csak most mással szenvedek kicsit
"Az agy olyan, mint az ejtőernyő: csak akkor működik, ha nyitott." (Thomas Dewar)
-
Delila_1
Topikgazda
válasz alfa20 #20790 üzenetére
Betettem a felsorolt számokat a H1:H12 tartományba.
A cella képlete, ahol le akarod kérdezni, hogy az A2 szerepel-e a listában:=HA(HIBÁS(FKERES(A2;H1:H12;1;0));C2;B2)
Ha 2003-asnál magasabb verziót használsz, a fenti helyett a HAHIBA függvényt is alkalmazhatod.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Delila_1
Topikgazda
válasz #02644736 #20782 üzenetére
A HOL.VAN függvény kikeresi a "Test Complete" szöveg sorát, ebből levonunk 1-et, az INDIREKT függvény pedig kiírja ennek a sornak az értékét.
=INDIREKT("A" &HOL.VAN("Test Complete";A:A;0)-1)
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
Delila_1
Topikgazda
válasz alfa20 #20794 üzenetére
Akkor egy másik megoldás:
=HA(HIBÁS(FKERES(A2;{130;131;132;133;160;161;170;171;190;191;375;376};1;0));C2;B2)
{ Bal Alt, + a számbillentyűzeten 0123
} Bal Alt, + a számbillentyűzeten 0125[ Szerkesztve ]
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
#02644736
törölt tag
válasz Delila_1 #20793 üzenetére
Szia!
Kipróbáltam, ugyanúgy nulla jött vissza.
A munkalap elnevezésű fülön akarom a képletet beírni, és hogy az 1 2 3 ... 18 nevű fülekből tudjam az eredményt kiszedni. Az bezavarhatja a függvényt, hogy a számok felett az első 5-6 sorban szöveg van, de a fülön minden oszlop számmá van formázva.
Új hozzászólás Aktív témák
- Luck Dragon: Asszociációs játék. :)
- Samsung Galaxy S10e - esszenciális
- Suzuki topik
- Tombol az AI-láz: az NVIDIA már értékesebb, mint az Apple
- Computex 2024: feltárta a Lunar Lake-et az Intel
- LEGO klub
- USB to S/PDif konverter a modern RIAA, elektroncsövekkel
- Motorola Edge 40 - jó bőr
- Eredeti játékok OFF topik
- Kerékpárosok, bringások ide!
- További aktív témák...
- Microsoft licencek KIVÉTELES ÁRON AZONNAL - UTALÁSSAL IS AUTOMATIKUS KÉZBESÍTÉS - Windows és Office
- Bontatlan - BATTLEFIELD 1 Collectors Edition - Játékszoftver nélkül
- Játékkulcsok olcsón: Steam, Uplay, GoG, Origin, Xbox, PS stb.
- Windows, Office licencek a legolcsóbban, egyenesen a Microsoft-tól - 2990 Ft-tól!
- Számlás!Steam,EA,Epic és egyébb játékok Pc-re vagy XBox!
Állásajánlatok
Cég: Ozeki Kft.
Város: Debrecen
Cég: Alpha Laptopszerviz Kft.
Város: Pécs