- Profi EKG-s óra lett a Watch Fitből
- Samsung Galaxy S25 Ultra - titán keret, acélos teljesítmény
- Galaxy Buds Core nevű fülesen dolgozik a Samsung
- Apple Watch
- Netfone
- Samsung Galaxy Watch7 - kötelező kör
- Fotók, videók mobillal
- Honor 400 - és mégis mozog a kép
- Bemutatkozott a Poco X7 és X7 Pro
- Bemutatkozott a Fairphone 6
-
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
-
lappy
őstag
Office 365 ben hogy lehet cellán belül sortörést?
ALT+ENTER nem működik vagy lehet vmi be kell állítani -
lappy
őstag
válasz
anonymus89 #36108 üzenetére
-
lappy
őstag
válasz
norbika84 #36101 üzenetére
=HA(ÉS(MA()-I2>3;ÉS($K2="eredeti";$L2="ok";$M2="";$N2="igen"));1;0)
ez azt nézi egyszer hogy a kívánt sátum 3 nappal későbbi és a szöveg a k-m a megadott értékek.
nálam fordított a logika a végén azaz a 0 esetén kell pirosnak lenni.
mert 3 nap eltelik és nincs benne a megfelelő szöveg akkor a ha fgv 0 fog adni--azaz piros kell legyen a sor -
lappy
őstag
-
lappy
őstag
válasz
South Velen #36061 üzenetére
-
lappy
őstag
válasz
South Velen #36061 üzenetére
Nem tudom milyen excel használsz?
Próbaként készítettem egy pdf nyit meg. Ezt simán tudtam másolni a munkafüzeten belül.
office 365 ben nálam megy
( a próba fájlban egy pdf nyitott meg ami a c meghajtó x könyvtárában van) -
lappy
őstag
-
lappy
őstag
válasz
sinkoati85 #35847 üzenetére
https://support.office.com/hu-hu/article/A-munkalapon-lévő-vezérlőelemek-törlése-9ddcf8f5-75b8-4ad6-98cf-611da389bb58
Próbáld meg a cikkben lévő lépést -
lappy
őstag
válasz
Oliver1982 #35831 üzenetére
=SZUMHA(B1:B5;B1;A1:A5)
ha a kezdet az A1 cella
-
lappy
őstag
válasz
foregister #35830 üzenetére
Nem értem pontosan mit is szerernél, olyan van hogy csak az egész részt írja ki, de kerekíteni fogja cellaformázás esetén
-
lappy
őstag
válasz
lacid90 #35775 üzenetére
Nyiss egy füzetet, és csak egy lapot hagyj benne. Alt+F11-re bejön a VBE. Nyitsd ki bal oldalon a füzetedet (+ jelnél). Insert/Module. Jobb oldalon kaptál egy üres modullapot. Oda másold be a kódot!
Lépj vissza az Excelbe, mentés másként, valami.xla (bővítmény).
Zárd be és nyitsd meg újra az Excelt. Az Eszközök/Bővítménykezelőben szerepelni fog a valami, jelöld be.Ezután már a függvényeid között is megtalálod, a Felhasználói, és a Mind kategóriákban.
-
lappy
őstag
válasz
Mela Kehes #35773 üzenetére
darabhatöbb fgv.
-
lappy
őstag
-
lappy
őstag
válasz
NemszakiTomi #35757 üzenetére
Ha publikus akkor tedd fel várva és talán vkit megnézi
-
lappy
őstag
válasz
NemszakiTomi #35739 üzenetére
Nincs benne véletlenül Macro mert lehet azzal van eltüntetve
-
lappy
őstag
válasz
nagyzoliph #35711 üzenetére
Használd az Fferi által megadott képletet, nálam tökéletesen működik.
-
lappy
őstag
válasz
Ujjlenyomat #35538 üzenetére
Adattábla rögzítése menüvel
-
lappy
őstag
válasz
foregister #35463 üzenetére
Segédoszloppal működik ahol meg van adva neki hogy milyen formátumú.
-
lappy
őstag
válasz
ledgeri-sos #35446 üzenetére
-
lappy
őstag
Mivel nem ismerem a tábládat én vagy kiegészíteném a napi dátummal és akkor már lehetne a következőket:
- ha függvény megnézi hogy az adott dátum nagyobb e mint a mai, ha igen akkor a kivonás eredményét osztja az üresen hagyott cellák számával így megkapod az elvárást ha viszont nagyobb akkor üresen marad -
lappy
őstag
-
lappy
őstag
válasz
föccer #35364 üzenetére
Sub nyomtat()
b = Worksheets("névsor").Cells(1, 2).Value
b = b + 1
For a = 2 To b
Sheets("névsor").Select
Range(Cells(a, 2), Cells(a, 2)).Select
Selection.Copy
Sheets("Sima").Select
Range("C3").Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Application.CutCopyMode = False
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Next a
MsgBox "A nyomtatás kész, ügyes vagy!!!"
Sheets("Sima").Select
Range("C3").Select
Selection.ClearContents
Range("A2").Select
End Sub -
lappy
őstag
A lap alján van egy zip egy jó kiindulás lehet
-
lappy
őstag
-
lappy
őstag
válasz
the radish #35160 üzenetére
Sub RemoveAllButLastWord()
'Updateby20140612
Dim Rng As Range
Dim WorkRng As Range
Dim xChar As String
On Error Resume Next
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
xChar = Application.InputBox("String", xTitleId, "", Type:=2)
For Each Rng In WorkRng
xValue = Rng.Value
Rng.Value = VBA.Right(xValue, VBA.Len(xValue) - VBA.InStrRev(xValue, xChar))
Next
End Sub
pl -
lappy
őstag
válasz
Bjørgersson #34984 üzenetére
De ez kivágja a "toll" szót. Ezzel bármekkora szöveget ki lehet vágni kis átalakítással.
-
lappy
őstag
válasz
Bjørgersson #34981 üzenetére
=BAL(A1,HOSSZ(A1)-(ABS((MIN(HA(HIBÁS(SZÖVEG.TALÁL({1;2;3;4;5;6;7;8;9;0},A1)),"",SZÖVEG.TALÁL({1;2;3;4;5;6;7;8;9;0},A1))))-HOSSZ(A1)-1))-4)&JOBB(A1,HOSSZ(A1)-MIN(HA(HIBÁS(SZÖVEG.TALÁL({1;2;3;4;5;6;7;8;9;0},A1)),"",SZÖVEG.TALÁL({1;2;3;4;5;6;7;8;9;0},A1)-1)))
a túlbonyolított -
lappy
őstag
válasz
Bjørgersson #34973 üzenetére
=bal(A1;HOSSZ(A1)-4)
pl.:
1234567toll
eredménye: 1234567 -
lappy
őstag
válasz
Sweetraver #34886 üzenetére
A google-ben keress rá csak egy kis angol kell hozzá
-
lappy
őstag
-
lappy
őstag
=HAHIBA(HA(KÖZÉP(U6,SZÖVEG.TALÁL("0,5",U6,SZÖVEG.TALÁL("-",U6)),3)="0,5",M6,HA(KÖZÉP(U6,SZÖVEG.TALÁL("1",U6,SZÖVEG.TALÁL("-",U6)),1)="1",M6,"")),"")
csak az egyszerűség kedvéért nincs benne ÖsszesítettU6
itt viszont a 0,5 keresés az jó, de az 1 már nem
a függvény hibát ad és ezért nem ugrik a második ha részre
Új hozzászólás Aktív témák
Hirdetés
- REFURBISHED - DELL Thunderbolt Dock WD19TBS docking station (210-AZBV)
- Apple iPhone 14 Pro Max / 256 GB / 88% akkumulátor / 1év Garanciával / Gyári Független
- 13-14" Új és használt laptopok , üzletitől a gamerig , kedvező áron. Garanciával !
- ÚJ- Lenovo ThinkVision T24i-10 - 24" monitor - Számla, garancia
- BESZÁMÍTÁS! MSI MAG321QR 32 165Hz WQHD 1ms monitor garanciával hibátlan működéssel - használt
Állásajánlatok
Cég: CAMERA-PRO Hungary Kft
Város: Budapest
Cég: Promenade Publishing House Kft.
Város: Budapest