Hirdetés
- sziku69: Szólánc.
- Luck Dragon: Asszociációs játék. :)
- Magga: PLEX: multimédia az egész lakásban
- gban: Ingyen kellene, de tegnapra
- sziku69: Fűzzük össze a szavakat :)
- eBay-es kütyük kis pénzért
- GoodSpeed: Munkaügyi helyzet Hajdú-Biharban: észak és dél!
- D1Rect: Nagy "hülyétkapokazapróktól" topik
- f(x)=exp(x): A laposföld elmebaj: Vissza a jövőbe!
- Fire/SOUL/CD: INGYENES Clone és Backup-Restore alkalmazások tesztje [2024]
-
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
-
Fferi50
Topikgazda
válasz
Capella
#41826
üzenetére
Szia!
Sajnos a makró az angol nyelvre és így az angol számformátumra van "kihegyezve", ezért a pontot úgy értelmezi három szám után, mint ezres elválasztó, tehát akként fogja értelmezni a cserét, hogy magyar elválasztójelre (szóköz) cseréli le.
Egy segédoszlop beiktatásával a Substitute (Helyette) képlet használatával és némi kis furfanggal megoldható a dolog:Selection.Offset(0, 1).Formula = "=Substitute(A1,""."","","")*1"
Ez a kijelölt oszlop mellé képlettel átalakítja számmá a cellaértéket.
Utána
Selection.Offset(0,1).Value=Selection.Offset(0,1).Value 'beillesztés értékként
Selection.Value=Selection.Offset(0,1).Value 'az eredeti helyre másoljuk.
A segédoszlopot ki is törölheted.
Ezzel a módszerrel oszlopról-oszlopra tudod a számokat átalakítani.
Természetesen működik konkrét címmel megadott tartományra is.Pl Range("A2:A20").Offset(0,1)…. a B2:B20 cellákba másolja a képletet.Üdv.
Új hozzászólás Aktív témák
- Kaspersky, BitDefender, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
- Keresem a Barkács Balázs Játékokat
- PC Game Pass előfizetés
- Game Pass Ultimate előfizetések 1 - 36 hónapig azonnali kézbesítéssel a LEGOLCSÓBBAN! AKCIÓ!
- BLACK FRIDAY! - Jogtiszta Windows - Office & Vírusirtó licencek- Azonnal - Számlával - Garanciával
- Apple iPhone 16 Pro Max - Black Titanium - 256GB - Akku: 90% - Megkímélt állapot!
- AKCIÓ! MSI MAG 325CQRXF QHD VA 240Hz 1ms monitor garanciával hibátlan működéssel
- REFURBISHED - DELL Performance Dock WD19DCS (210-AZBN)
- Samsung Galaxy A25 5G / 6/128GB / Kártyafüggetlen / 12Hó Garancia
- Samsung Galaxy S24 8/128 GB Amber Yellow 6 hónap Garancia Beszámítás Házhozszállítás
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest
Cég: ATW Internet Kft.
Város: Budapest

Fferi50
