Hirdetés
- Mától Huawei okosórákkal is lehet érintésmentesen fizetni
- VoLTE/VoWiFi
- Így spórolhat az Apple az iPhone 18 kijelzőin
- Külföldi prepaid SIM-ek itthon
- Szerkesztett és makrofotók mobillal
- Xiaomi 17 - még mindig tart
- Milyen okostelefont vegyek?
- Android szakmai topik
- Nothing Phone 2a - semmi nem drága
- Bemutatkozott az Oppo kamerás csúcsmodellje
-
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
-
Fehér Mancs
tag
A kód tökéletesen működik, csak a replace-elt konverzió magyar excelben hibára fut, azt ki kell irtani belőle (valószínűleg máshol meg az előző a jó)
Function SumNum(ByVal txt As String) As double
With CreateObject("VBScript.RegExp")
.Pattern = "\d+(,\d+)?"
.Global = True
For Each m In .execute(txt)
SumNum = SumNum + CDbl(m.Value)
Next
End With
'SumNum = Replace(CStr(SumNum), ".",",")
End Function -
Hali!
Tegyél be egy képet a munkafüzetről, amin látszik minden(vagy legalábbis a lényeg), ha el tudok rajt igazodni, akkor tudok segíteni, csak így visszaolvasva azt sem tudom ki-kivel van...
(Delila_1 is látom segít rendesen, csak mindig valami "apróságról" megfeledkezel, aztán az egész kódot lehet megint módosítani vagy újrairni...
)Fire.
-
Delila_1
veterán
Vedd egyenként a függvényeket.
Az A1-ben van a haho-3,45
B1-be: =szöveg.keres("-";a1)
Ennek 5 lesz az eredénye. A képlet végére írd be a +1-et, a B1 értéke 6 lesz, innen, a 6. karaktertől kell majd a szám.Most a C1-be:
=közép(a1;b1;20)
Ez 3,45-öt ad majd, de szövegként, balra igazítva.
Írd át a képletet =(közép(a1;b1;20)*1 -re, ez számként hozza a 3,45-öt. -
Fehér Mancs
tag
Új hozzászólás Aktív témák
Hirdetés
- Star Trek Online -=MMORPG=-
- Star Citizen
- Autós topik
- Kerékpárosok, bringások ide!
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- Anglia - élmények, tapasztalatok
- Spórolós topik
- Elektromos autók - motorok
- ZIDOO médialejátszók
- Motorolaj, hajtóműolaj, hűtőfolyadék, adalékok és szűrők topikja
- További aktív témák...
- Honor Magic V2 512GB, Kártyafüggetlen, 1 Év Garanciával
- Jó áron eladó Lenovo ThinkPad T14s Gen 3/i5-1240P/16 GB/256 SSD/FHD+/IPS/Garancia/
- Lenovo V14 i5-1035G1 számlával és garanciával
- 27% PNY GeForce RTX 5070 EPIC-X RGB OC 12GB GDDR7 192bit (VCG507012TFXXPB1-O) Videokártya
- PXN V9 Gen 2 Kormány+Pedál+Váltó BONTATLAN!
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest

)
Fferi50
