- Telekom otthoni szolgáltatások (TV, internet, telefon)
- Microsoft Excel topic
- Crypto Trade
- Súlyos adatvédelmi botrányba kerülhet a ChatGPT az EU-ban
- MinDig TV
- Rendszergazda topic
- Mindenki AI-t akar, már 2025-re is eladták a HBM chipeket
- Proxmox VE
- Kapnak egy rakás reklámot a Roblox játékosai
- ArchiCAD és Artlantis topik
-
IT café
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
-
zsotesz81
senior tag
válasz Fire/SOUL/CD #6800 üzenetére
Erre én is gondoltam, csak kíváncsi voltam meg lehet-e oldani másképp.
-
félisten
válasz zsotesz81 #6801 üzenetére
Hali!
Legegyszerűbb a form + image objektum. Ilyen "apróságokon" meg nem kell fent akadni(png-t nem kezeli), mert csak az időt viszi. Meg kell nézni mit kezel, aztán konvertálás, aztán hajrá!
(Megfelelő konvertáló progival(ami csoportosan/batch módban dolgozik) pillanatok alatt megvan az ember)Fire.
[ Szerkesztve ]
Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
-
zsotesz81
senior tag
válasz Fire/SOUL/CD #6802 üzenetére
Közben megcsináltam, még egy kérdés. Hogy lehet mindenképp új sorba kényszeríteni egy szövegrészt? Pl. Ez van kiírva, hogy "A játékot xy nyerte, gratulálunk!" A gratulálunk szót kellene új sorba rakni.
-
félisten
válasz zsotesz81 #6803 üzenetére
Hali!
Variációk egy témára
Private Sub CommandButton1_Click()
MsgBox ("A játékot xy nyerte" & Chr(13) & "Gartulálunk")
MsgBox ("A játékot xy nyerte" & vbCrLf & "Gartulálunk")
MsgBox ("A játékot xy nyerte" & vbCrLf & _
"Gartulálunk")
End Subchr(13) -> Carriage Return (CR)-> Egy sorral lejebb
chr(10) -> Line Feed (LF)-> Adott sor elejére ugrás
(Ez DOS-ban a sor elejére vitte a kurzort illetve a nyomtatáskor is volt(van) szerepe
vbCrLf -> VBA konstans a CF és a LF egyben
Fire.[ Szerkesztve ]
Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
-
zsotesz81
senior tag
válasz Fire/SOUL/CD #6805 üzenetére
köszönöm mindkettőtöknek
-
Delila_1
Topikgazda
válasz Fire/SOUL/CD #6805 üzenetére
A chr(10) nem a sor elejére ugrik, hanem sortörést ad. Próbáld ki!
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
félisten
válasz Delila_1 #6807 üzenetére
Hali!
VBA-ban igen, mert "átkonvertálja" Windows szabvánnyá. A sima chr(10) linux/unix rendszereknél a sordobás, Win esetében chr(13) + chr(10).
Msgbox esetén valóban mindegy, hogy chr(13) vagy chr(10).
Windows esetében az új sor(return/enter) az mindig is hexa 0xD azaz 13 volt és most is az(Win esetén pl egy szöveges fáljban az új sor az mindig 13,10 (0xd,0xa) "végződik", linuxnál csak 10(0xa). Weben erre oda kell figyelni, amikor szöveges állományt dolgozol fel, vannak direkt erre a célra függvények pl PHP-ban, amik ezeket a konverziókat(sorvége/újsor) elvégzik, oda-vissza)
Fire.
[ Szerkesztve ]
Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
-
zsotesz81
senior tag
Közben eszembe jutott még valami. Makróból fel lehet-e oldani ill. vissza lehet-e állítani lapvédelmet?
-
félisten
válasz zsotesz81 #6809 üzenetére
Hali!
Igen.
ActiveSheet.Unprotect ("jelszó")
ActiveSheet.Protect ("jelszó")Részletesebben meg úgy, ahogy Delila_1 írta, használd a súgót vagy a netet a témakörben.
Fire.
[ Szerkesztve ]
Mindenki tudja, hogy bizonyos dolgokat nem lehet megvalósítani, mígnem jön valaki, aki erről nem tud, és megvalósítja. (Albert Einstein)
-
zsotesz81
senior tag
válasz Fire/SOUL/CD #6811 üzenetére
köszönöm, közben rájöttem, hogy ezt makrórögzítéssel is meg tudom nézni.
-
Badb0y
addikt
válasz Fire/SOUL/CD #6787 üzenetére
Tyű mindkettő micsoda megoldás
No Delila, annyi a problémám hogy ugye csak nagybetű, és ez egy kinyíló lisátban furán néz ki kicsit. Gondolom olyan nincs, hogy minden szónak az első betűje legyen nagy.
Fire, ez is majdnem tökéletes, ha nem azt írná, hogy kép a termékről, hanem magát az url-t. Ezt nem lehet valahogy, hogy magát a nevét írja ki? Mert bégülis mindent megtalál ugye, csak azt írja, hogy kép a termékről, de nekem csak link kell ű
Sry, ha túl sokat akarok.
De mindenesetre nem semmi megoldások ezek, le a kalappal előttetek. Ilyen mélységben még nem voltam :excelben
Minőségi laptopok https://notebookokhu.business.site/
-
Delila_1
Topikgazda
A "Kép a termékről" helyett ismételd meg az fkeres függvényt:
=HIPERHIVATKOZÁS(FKERES(A1;Laptopok_es_URL;2;HAMIS);FKERES(A1;Laptopok_es_URL;2;HAMIS))
Szerintem jobb Fire szövege, hiszen az A oszlopban látszik, melyik termék képét hívtad le.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
DeFranco
nagyúr
Sziasztok!
Adott egy excel feladvány, aminek a c) kérdését sehogy sem tudom megválaszolni.
A tábla ugyan az, a c1-ben szereplő képlet a) esetben a1+b1 b) esetben szum(a1:b1) volt a képletnek megfelelő eredménnyel (#ÉRTÉK! és 2)
A lenti képen látjátok a c) pont szövegét a táblát és az eredményt. Mi a magyarázat? Egy napja keresem a választ:
-
zsotesz81
senior tag
Hali!
Visszatérnék kicsit a #6768-as hsz-re. Szóval a kód amit Delila írt végülis jól működik, viszont amikor az a makró fut ami kiszámolja a nyereményeket akkor megáll Run Time error '13', Type mismatch hibával. Erről a kódról van szó:
If Target.Address = "$D$5" And Target.Value > Cells(5, 3) Then
MsgBox ("Ennyi pénzed már nincs, tegyél kisebb tétet vagy mondj all in-t!")
Cells(5, 4).Select
End If
If Target.Address = "$D$6" And Target.Value > Cells(6, 3) Then
MsgBox ("Ennyi pénzed már nincs, tegyél kisebb tétet vagy mondj all in-t!")
Cells(6, 4).Select
End If
és így tovább egészen 14-ig.A makró azt csinálná, hogy az C5-be másolja a N5 tartalmát, a C614-be pedig az M6:M14 tartalmát. A C5-N5 másolást megcsinálja, viszont a többit nem, itt akad meg.
Gőzöm nincs mi akasztja meg, ha rányomok a debugra akkor az if-es sort jelöli ki.
Valami ötlet? -
DeFranco
nagyúr
válasz Fehér Mancs #6818 üzenetére
Ez eddig OK, azok voltak az a) b) kérdések, az tiszta. A képpel bemutatott nem. Valahogy felismeri hogy a "3 db" az 3, de kihangsúlyozza, hogy formázás nem volt...
-
WildBoarTeam
aktív tag
-
Fehér Mancs
tag
válasz DeFranco #6819 üzenetére
Ok, tényleg.
Valószínűleg akkor az történt, hogy amikor beírtuk a 3 db-t, akkor az excel automatikusan felismerte, hogy egy számról és egy egységről van szó, így magától megformázta. Nálam a "3 db"-re ez nem működik, de pl. ha "3 Ft"-ot írok be, akkor szépen megcsinálja.
Amúgy tényleg látszik, hogy szám van az A1-ben, mivel formázás nélkül jobbra rendezi, ami pedig a számok sajátossága.
-
WildBoarTeam
aktív tag
válasz Fehér Mancs #6821 üzenetére
Én is valami féle automatikus formázásra gondolok.
DeFranco:
Amúgy megfigyelheted, ha beírsz egy szöveget, azt az Excel alapból balra zártan igazítja, míg egy számot jobbra zártan igazít (ezt írta Fehér Mancs is). A Te általad linkelt képen jobbra zárt az A1, tehát feltételezhetően számnak ismerte fel az Excel (vagy mégis megformázták ).Keresgélek még, hátha rájövök mi a titka..
blabla
-
DeFranco
nagyúr
válasz WildBoarTeam #6822 üzenetére
Igen, ez a részlet nekem is leesett (igazítás). Arra gondoltam, hogy talán valamilyen operátorral oldották meg (pl: 3&"db", de ez nem jó) ami nem látszik, csak a szerkesztőlécen.
Az eredmény tudatos, hiszen ez egy feladat, tehát van neki megoldása is.
-
zsotesz81
senior tag
válasz WildBoarTeam #6820 üzenetére
Kipróbáltam, azt még mindig nem tudom, hogy ott miért fut bele. Ez a kód:
Range("N5").Select
Selection.Copy
Range("C5").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Range("M6:M14").Select
Application.CutCopyMode = False
Selection.Copy
Range("C6:_C14").Select - aláhúzás nincs benne csak a smile elkerülése miatt raktam bele
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
Range("C15").SelectAmikor elér a Range("M6:M14")-hez, akkor ugrik az érvényesítőhöz, majd utána hiba, de miért megy oda? Akkor a Range ("C5")-nél miért megy tovább?
[ Szerkesztve ]
-
Delila_1
Topikgazda
válasz zsotesz81 #6817 üzenetére
Mi van a C5, C6, D5, és D6 cellákban?
A hibaüzenet arra enged következtetni, hogy különböző típusú adatokat (pl. számot szöveggel, vagy dátummal, esetleg logikai értékkel) akarsz összehasonlítani.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 zsotesz81 #6825 üzenetére
Azért ugrik oda, mert a laphoz rendelt makró figyeli, mi változik a lapodon. Minden változáskor lefut, de csak akkor ír ki valamit, ha a feltételekben megírtak közül valamelyik létrejön.
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 zsotesz81 #6828 üzenetére
A 6825-ben írtak helyett ezt vidd be:
Range("N5").Copy
Range("C5").PasteSpecial Paste:=xlPasteValues
Range("M6:M14").Copy
Range("C6").PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False
Range("C15").SelectEgyébként ha konvertálatlan módon küldöd a hozzászólást, nem vigyorognak bele az ugra-bugrák.
Programozó: hibás programok megírására és kijavítására kiképzett szakember. Többet ésszel, mint ész nélkül.
-
zsotesz81
senior tag
válasz zsotesz81 #6830 üzenetére
Kipróbáltam, úgy hogy soronként másoljon:
Range("N5").Copy
Range("C5").PasteSpecial Paste:=xlPasteValues
Range("M6").Copy
Range("C6").PasteSpecial Paste:=xlPasteValues
.
.
.
Range("M14").Copy
Range("C14").PasteSpecial Paste:=xlPasteValuesÍgy megcsinálta, legalábbis a számolást, viszont most a tétek törlésénél bukik meg,
ahol szintén nagyobb tartomány (D5:D14) van egyben megadva. Lehet, hogy ezekkel nem tud mit kezdeni?[ Szerkesztve ]
-
zsotesz81
senior tag
Itt van a file:
http://www30.zippyshare.com/v/36928913/file.html
[ Szerkesztve ]
-
perfag
aktív tag
válasz DeFranco #6816 üzenetére
Csak egy ötlet: "Az A1 és B1 cellákat semmilyen módon nem formáztuk." - ez nem lehet igaz! Ha nem formázták, akkor az A1 balra lenne igazítva, mivel szövegként értelmezi az Excel. Mivel jobbra igazodik, ezért a db mint egyéni formátum kell legyen megadva, pl. 0" db";[Piros]-0,00;"-" amitől a pozitív érték, db utótagot kap. a negatív piros színű lesz, a nulla helyett - jelenik meg (de ezt szerintem tudod).
-
Badb0y
addikt
Fire
Delila
Fehér MancsMinőségi laptopok https://notebookokhu.business.site/
-
WildBoarTeam
aktív tag
-
DeFranco
nagyúr
Ez egy céges tanfolyami beugró teszt. Több kérdésből áll, de ez az egy, amire nem tudom a megoldást.
A semmilyen módon nem formáztuk kikötés szerintem annyit jelent, hogy ahogy megnyitották az excelt, már írták is bele, persze ez nem zárja ki az alapértelmezett formátum beállítás lehetőségét.
Én mégis arra gondolnék, hogy a cella tartalma valójában nem "3 db" hanem valami más, ami "3 db"-nak látszik. Volt egy excel könyvem, abban voltak ilyenek, hogy hogyan lehet operátorokkal úgy bűvészkedni, hogy szövegnek látszódjon, de szám legyen, de már nincs meg sajnos...
-
WildBoarTeam
aktív tag
válasz DeFranco #6841 üzenetére
Jó kis feladat.
Én tegnap igen átböngésztem miatta az Excel helpjét. A Szám összefűzése szöveggel ugye az & operandussal lehetséges, de még így is szöveg formát eredményez a cellában, és nem tud vele számolni, ha képlettel hivatkozok rá.
Én nekem amúgy a =SZÖVEG() függvény ugrott be, de valamiért a db-ból a "b" betűt 43-nak ismerte fel (ez gondolom valami excel sajátosság).
Ezt csináltam:Végignéztem minden függvényt de semmi... Eddig marad a területi beállítás módosítása megoldásként.
blabla
-
ulrik19
tag
válasz WildBoarTeam #6842 üzenetére
gyanítom (ill. remélem) van azért valami szebb megoldás is rá
(apró hibajavítás: az & nem operandus, hanem operátor )
Nekem az fura még, hogy nem B1 van a képletben, hanem B$1. Ennek vajon mi lehet az oka? A feladatban kell másolni a képletet?
...az élet igazságos, mert pl. akinek rövidebb az egyik lába, annak hosszabb a másik...
-
WildBoarTeam
aktív tag
válasz DeFranco #6844 üzenetére
Hát ha tényleg van szebb megoldása, akkor az csak valamiféle képletekkel lehetséges...
Amúgy a feladat nem zárja ki, hogy az A11 tartományon kívül máshol nem lehet adat.
Tehát, ha pl A2-t megformázom egyénileg úgy, hogy szerepeljen mögötte a "db", és az A1-et ebből veszem át, akkor szerepel mögötte a "db", és ráadásul szám formátumú is, így jól számol a C1-be (ezt csak formázni kell számmá):blabla
-
ulrik19
tag
válasz WildBoarTeam #6845 üzenetére
No igen. Bár ha ez a "hivatalos" megoldás, akkor nem látom túl sok értelmét a feladatnak. Mert ennyi erővel azt is mondhatnám, hogy az A2-be beírom a 3-at, formázom db-nak (3 db), majd ezt a cellát másolom A1-be. (az =A2 képlet is másolja a formátumot) Mert tulajdonképp magát az A1-et nem formáztuk így sem
Egyébként láthatnánk a többi feladatot is. Kíváncsi vagyok, hogy mi volt még
...az élet igazságos, mert pl. akinek rövidebb az egyik lába, annak hosszabb a másik...
-
DeFranco
nagyúr
válasz WildBoarTeam #6849 üzenetére
Köszönöm mindenkinek, aki foglalkozott vele.
Új hozzászólás Aktív témák
- Milyen TV-t vegyek?
- Gördeszka topic
- Az NVIDIA szerint a partnereik prémium AI PC-ket kínálnak
- Telekom otthoni szolgáltatások (TV, internet, telefon)
- Xbox Series X|S
- Anglia - élmények, tapasztalatok
- Konzolokról KULTURÁLT módon
- BestBuy ruhás topik
- Milyen billentyűzetet vegyek?
- 3D nyomtatás
- További aktív témák...
- Eredeti Windows, telepítéssel! Digital Doctor Számítógép Szerviz
- Vírusirtó, Antivirus VPN kulcsok
- Steames kulcsok jó áron eladóak!
- Eredeti Microsoft termékek - MEGA Akciók! Windows, Office Pro Plus, Project Pro, Visio Pro stb.
- Microsoft licencek KIVÉTELES ÁRON AZONNAL - UTALÁSSAL IS AUTOMATIKUS KÉZBESÍTÉS - Windows és Office