- Ilyen lesz a Fairphone 6
- Yettel topik
- Csíkszélességben verné az Exynos 2600 a Snapdragon 8 Elite 2-t
- Milyen okostelefont vegyek?
- Xiaomi 13 - felnőni nehéz
- Keretmentesít a Galaxy S25 FE
- Realme GT Master Edition - mestermunka
- iPhone topik
- 6 év biztonsági támogatást ígér a Motorola
- One mobilszolgáltatások
-
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
-
Fferi50
Topikgazda
válasz
Santino #49772 üzenetére
Szia!
Ha valóban dátum/szám és nem szöveg, akkor jobb egérgomb - cellaformátum - egyéni - beírod a kívánt formátumot.
Ha a cellaformátumot számra állítod és marad ez az érték, akkor sajnos nem valódi dátum van a cellában, hanem dátumnak látszó szöveg.
Ebben az esetben először kipróbálhatod, hogy a DÁTUMÉRTÉK függvény átalakítja-e dátummá. Ha nem megy, akkor a Szövegdaraboló (BAL, KÖZÉP, JOBB) függvényekkel és a DÁTUM függvény használatával tudsz dátumot faragni belőle. A függvényeket természetesen másik cellában kell alkalmazni. Ha ez megvan, akkor a formátum az első bekezdés szerint alakítható.
Üdv. -
Fferi50
Topikgazda
válasz
Santino #46810 üzenetére
Szia!
Úgy gondolom, ez csak makróval oldható meg.
Ezt bemásolod az adott munkafüzet kódlapjára:Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Count > 1 Then Exit Sub
If Target.Column <> 1 Then Exit Sub
If Not Application.IsNumber(Target.Value) Then Exit Sub
If Len(Target.Value) < 14 Or Len(Target.Value) > 15 Then
MsgBox "Csak 14 vagy 15 számjegyet írhatsz ide", vbcritikal
Target.Value = ""
Target.Select
Exit Sub
End If
Application.EnableEvents = False
Target.Value = Left(Target.Value, 6) & "-" & Mid(Target.Value, 7, 2) & "-" & Mid(Target.Value, 9, 6) & "-" & Mid(Target.Value, 15, 2)
Application.EnableEvents = True
End Sub
A makró az első oszlopba beírt 14-15 jegyű számokat visszaírja az általad kívánt formában. Az ennél kevesebb vagy több számból állók esetén figyelmeztető üzenetet ad és kitörli a beírt értéket.
A munkafüzetet makróbarátként kell mentened.
Üdv. -
Fferi50
Topikgazda
válasz
Santino #46804 üzenetére
Szia!
A számformátum mindig jobbról kezdi feltölteni a számokat, így aztán 14 szám esetén a 15. (előlről nézve az 1. ) pozíció marad üresen.
Az általad kívánt formátum csak szövegfüggvényekkel érhető el:=BAL(A1;6)&"-"& KÖZÉP(A1;7;2) & "-" & KÖZÉP(A1;9;6) & "-" & KÖZÉP(A1;15;2)
Ezzel viszont nem tudsz számolni a továbbiakban sajnos.
Ha szövegként van rá szükséged, akkor használható.
Üdv.
Új hozzászólás Aktív témák
Hirdetés
- Mielőbb díjat rakatnának a görögök az olcsó csomagokra az EU-ban
- MasterDeeJay: SATA to SAS adapter
- Revolut
- exHWSW - Értünk mindenhez IS
- Hálózati / IP kamera
- Milyen billentyűzetet vegyek?
- Otthoni hálózat és internet megosztás
- Az áremelések és a GTA VI késése miatt nem költekeznek a játékosok?
- World of Tanks - MMO
- Apple MacBook
- További aktív témák...
- Eladó Steam kulcsok kedvező áron!
- Microsoft licencek KIVÉTELES ÁRON AZONNAL - UTALÁSSAL IS AUTOMATIKUS KÉZBESÍTÉS - Windows és Office
- Windows, Office licencek kedvező áron, egyenesen a Microsoft-tól - Automata kézbesítés utalással is!
- Assassin's Creed Shadows Collector's Edition PC
- Vírusirtó, Antivirus, VPN kulcsok
- Beszámítás! Apple Mac Studio M2 MAX 2023 32GB 512GB SSD számítógép garanciával, hibátlan működéssel
- AKCIÓ! Lenovo IS8XM LGA 1150 DDR3 alaplap garanciával hibátlan működéssel
- AKCIÓ! "ÚJ" Microsoft Surface 5 13,5 notebook - i5 1235U 8GB RAM 256GB SSD Intel Iris Xe IGP 27% áfa
- Csere-Beszámítás! Asrock Challanger B580 12GB GDDR6 Videokártya! Bemutató Darab!
- ÁRGARANCIA!Épített KomPhone Ryzen 7 7800X3D 32/64GB RAM RX 9070 XT GAMER PC termékbeszámítással
Állásajánlatok
Cég: Promenade Publishing House Kft.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest