Hirdetés
- gban: Ingyen kellene, de tegnapra
- Mr Dini: Mindent a StreamSharkról!
- eBay-es kütyük kis pénzért
- bambano: Bambanő háza tája
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- sziku69: Szólánc.
- sziku69: Fűzzük össze a szavakat :)
- Luck Dragon: Asszociációs játék. :)
- GoodSpeed: A RAM-válság és annak lehetséges hatásai
- Luck Dragon: MárkaLánc
-
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
-
Delila_1
veterán
-
Delila_1
veterán
-
Delila_1
veterán
válasz
swoody
#38363
üzenetére
Az A1:N1 tartományból összefűztem a C3 cellába egy mondatot, aminek az 5. szavát (E1) akarom dőlttel írni.
Ahhoz, hogy ezt megtehessem, a C3 képletét értékké kell alakítanom.
Range("C3").Copy
Range("C3").PasteSpecial xlPasteValuesEzután kiszámolom, hol kezdődik az 5. szó a szövegben.
kezd = Len(Range("A1")) + Len(Range("B1")) + Len(Range("C1")) + Len(Range("D1")) + 4A +4 a szavak közé írt szóközök száma.
Meg kell adnom, hogy hány karakter hosszan módosuljon a formátum.hossz = Len(Range("E1"))és már jöhet is a formázás.
Range("C3").Characters(Start:=kezd, Length:=hossz).Font.FontStyle = "Dőlt" -
Mutt
senior tag
válasz
swoody
#38316
üzenetére
Szia,
Szerintem erre a feladatra sokkal jobb megoldás a World-ben található Körlevél (Mail merge).
A másik kérdés: a tagadás az Excelben a leggyorsabban feldolgozott művelet, nem csinál mást mint a megadott adatot megszorozza -1-el, de mivel többnyire nekünk az eredeti előjellel kell az adat ezért ezt kétszer kell megtennünk.
A lenti képletek mindegyike ugyanazt éri el - ha A1-ben szövegként van tárolva a szám, akkor abból számot csinál anélkül hogy az értékét megváltoztatná -, a kettős tagadás a legrövidebb és leggyorsabb megoldás:
=A1*1
=A1+0
=--A1
=A1*-1*-1üdv
-
Fferi50
Topikgazda
válasz
swoody
#38236
üzenetére
Szia!
Akkor fussunk neki mégegyszer.
"automatikusan csináljon egy új munkafüztet"
Szerintem új munkalap lesz az.
És igen, meg lehet csinálni. Kell hozzá egy makró, amit egy gombhoz (vagy billentyű kombinációhoz) rendelsz hozzá. Azért javaslom a hozzárendelést, mert azt, hogy mikor fejeztél be egy sort, azt nem lehet eseménykezeléssel követni.Tegyél fel egy minta fájlt elérhető módon, legyen benne, hogy mit szeretnél hova másoltatni az új munkalapra. Aztán meglátjuk, tudunk-e kihozni belőle valamit, vagy még kérdezünk.
Üdv.
-
swoody
senior tag
-
Mutt
senior tag
válasz
swoody
#37820
üzenetére
A KÖZÉP függvény szöveg eredményt ad.
Ez onnan is látszik, hogy a kapott cella alapból balra van rendezve. Excelben a számok jobbra igazítva jelennek meg alapból. Egy szöveget (ami számnak látszik, de az Excel szövegként kezeli) hasonlítasz össze egy számmal, a típuseltérés miatt mindig hamis eredményt fogsz kapni.Konvertáld a szöveget számmá (pl. szorozd meg 1-el, vagy adj 0-t hozzá, vagy használd a kettős tagadást [--]), vagy alakítsd a másik helyen a számot szöveggé (pl. fűzd össze egy üres stringgel).
-
Fferi50
Topikgazda
válasz
swoody
#37817
üzenetére
Szia!
Ha mindenáron HA függvénnyel szeretnéd megoldani, akkor egymásba kell ágyazni azokat:
=HA(A2=1;B$8;HA(A2=2;B$9;HA(A2=3;B$10;HA(A2=4;B$11;HA(A2=5;B$12;HA(A2=6;B$13;"Nincs ilyen szám"))))))De sokkal egyszerűbb a Keres ill. később az Fkeres függvény:
Két oszlop kell, az elsőben a számok egymás alatt, a másodikban a neveik Pl a Keres függvényre:=KERES(A2;$D$8:$D$13;$B$8:$B$13)A képletet lehúzhatod a következő cellákba.
Üdv.
-
swoody
senior tag
válasz
swoody
#27559
üzenetére
Közbe rájöttem, hogy amit hiányoltam az a VKERES.

Bár értelmesen elmagyarázták volna anno oskolába.....
Közben így oldottam meg amit szerettem volna, bár lehet, hogy egyszerűbben is meglehet, szerintem ennél csak egyszerűbb megoldás van.

Előszőr is:
1-es táblázat adott.
2-es táblázat, Ha függvénnyel, ahol 1-es található 1-es táblázatban azt irattam ki. (ezt nem lehetett lefele húzni csak sor írányba, így 5-ször kellett megcsinálni függvényt)
3-as táblázat pedig az lenne, hogy amit 2-es táblázatban kiírattam, azt oszloposan kiírja, sajnos ezt sima "=cella" függvénnyel oldottam meg. Ezt meglehet függvénnyel oldani, hogy egy több cellából álló sort egymás alá oszloposan kiírjon?Ezt hogyan lehetne megoldani, hogy 3-as táblázat létrejöjjön 2-es táblázat nélkül?
-
Fferi50
Topikgazda
válasz
swoody
#27543
üzenetére
Szia!
A Ha és az Fkeres függvények többszörös egymásba ágyazása szükséges, az eredmény attól függ, hogy van-e már előtte levő cellában érték, illetve meg van-e jelölve (1) az adott cella.
Szerintem próbálj végigmenni egy - egy képlet alkotó részein és bizonyára meg fogod érteni.Mást (többet) most ilyen "időtávból" nem tudok gyorsan mondani. Ha konkrét kérdésed lenne, azért írd meg bátran.
Üdv.
-
swoody
senior tag
-
Fferi50
Topikgazda
válasz
swoody
#26498
üzenetére
Szia!
Csak erre a 3x3-as variációra:
2. táblázat képletei:
F2 cella =HA(FKERES(F$1;$A$2:$D$4;2;0)=1;$B$1;HA(FKERES(F$1;$A$2:$D$4;3;0)=1;$C$1;HA(FKERES(F$1;$A$2:$D$4;4;0)=1;$D$1;"")))
F3 cella =HA(FKERES(F$1;$A$2:$D$4;3;0)=1;HA(F$2=$C$1;HA(FKERES(F$1;$A$2:$D$4;4;0)=1;$D$1;"");$C$1);HA(FKERES(F$1;$A$2:$D$4;4;0)=1;HA(F$2=$D$1;"";$D$1)))
F4 cella =HA(FKERES(F$1;$A$2:$D$4;4;0)=1;HA(VAGY(F$3=$D$1;F$2=$D$1);"";$D$1);"")
Ezeket a képleteket kell mindhárom oszlopon végighúzni.4. táblázatban összefűzés van:
pl. F6 cella képlete =F2 & $B$7
Ezt is lehet húzni a többi cellába.
Üdv. -
Delila_1
veterán
válasz
swoody
#18466
üzenetére
Készítettem egy új függvényt. Amelyik füzetbe beviszed, ott működni fog a Tukor nevű függvény. Ha a personal füzetedbe teszed be – a personal szóra keresve több leírást találsz itt a fórumon –, akkor minden füzetedben dolgozhatsz vele.
Function Tukor(cella As String)
Dim betu As Integer, ujnev As String
For betu = Len(cella) To 1 Step -1
ujnev = ujnev & Mid(cella, betu, 1)
Next
Tukor = ujnev
End FunctionAz A1 cellában lévő értéket úgy tükrözi, hogy egy másik cellába ezt írod: =Tukor(A1)
-
Delila_1
veterán
válasz
swoody
#18402
üzenetére
A makró bekéri a területet, ahol a cseréket végre akarod hajtani, majd elvégzi a 3 cserét. Nem tesz különbséget a kis- és nagybetűk között. A területet beírhatod, vagy egérrel is kijelölheted. A cserék számát tetszés szerint bővítheted.
Sub Csere()
Dim ter As Range
Set ter = Application.InputBox(prompt:="Jelöld ki a tartományt", Type:=8)
ter.Replace What:="a", Replacement:="1"
ter.Replace What:="l", Replacement:="2"
ter.Replace What:="m", Replacement:="3"
End Sub -
Mutt
senior tag
válasz
swoody
#18398
üzenetére
Hello,
Nézd meg hogy van-e SUBSTITUTE (HELYETTE) függvény. Ezeket lehet egymásba ágyazni, pl.
=HELYETTE(HELYETTE(HELYETTE("alma";"a";1);"l";2);"m";3)Igazából a szöveges dolgokkal a táblázatkezelőkben nem lehet olyan sokat kezdeni, makróval lehet rásegíteni.
Ha 10 vagy annál kevesebb betüd van, akkor nyögve ez is működhet Excelben.
=SZORZATÖSSZEG(KERES(A1;SOR(INDIREKT("A1:A"&HOSSZ(A1)));1);E1:E3;F1:F3);10^(HOSSZ(A1)-SOR(INDIREKT("A1:A"&HOSSZ(A1)))))
Az E oszlopban Abc sorrendben vannak a cserélendő betük és az F oszlopban a hozzájuk párosítandó 1-jegyű szám.
Udv.
Új hozzászólás Aktív témák
- Formula-1
- Battlefield 6
- A TSMC korábbi alelnöke lekért pár bizalmas adatot - majd kikötött az Intelnél
- PlayStation 5
- Gyúrósok ide!
- HiFi műszaki szemmel - sztereó hangrendszerek
- OLED monitor topic
- 5.1, 7.1 és gamer fejhallgatók
- Menekül a HEVC licencdíja elől a HP és a Dell
- AMD Ryzen 9 / 7 / 5 7***(X) "Zen 4" (AM5)
- További aktív témák...
- Path of Exile 2 (POE2) Early Access kulcs
- Bitdefender Total Security 3év/3eszköz! - Tökéletes védelem, Most Ünnepi áron! :)
- Játékkulcsok olcsón: Steam, Uplay, GoG, Origin, Xbox, PS stb.
- Árváltozás+játék!The Witcher 2 Assassins of Kings Collector's Edition
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- ÁRGARANCIA! Épített KomPhone i5 12400F 16/32/64GB RAM RTX 5050 8GB GAMER PC termékbeszámítással
- Dell Latitude 5290 i5 8350U, 8-16GB RAM, SSD, jó akku, EU bill., szép állapot, számla, 6 hó gar
- Azonnali készpénzes AMD Radeon RX 5000 sorozat videokártya felvásárlás személyesen / csomagküldéssel
- OnePlus Pad Green nagy kijelzős, pehelykönnyű tablet 128 GB Wi-Fi Használt, karcmentes 3
- Bomba ár! HP ProBook 640 G4 - i5-8GEN I 8GB I 256GB SSD I 14" FHD I Cam I W11 I Garancia!
Állásajánlatok
Cég: ATW Internet Kft.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest


, még próbálom törni az agyam, aztán ha nem sikerül lehet megkérlek, hogy magyarázd el, de remélem rájövök magamtól.
Fferi50
