- Yettel topik
- Megkönnyítette az iPhone az androidos átköltözést
- OnePlus 9 Pro - gyorsulási futam
- Amazfit Active 2 NFC - jó kör
- Magisk
- Nézegesd az S26 család renderképeit!
- Honor 200 Pro - mobilportré
- Milyen okostelefont vegyek?
- Apple iPhone Air - almacsutka
- Titan 2 Elite néven érkezik egy újabb BlackBerry-szerű Unihertz
-
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
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
- Napelem
- Mibe tegyem a megtakarításaimat?
- Formula-1
- Szünetmentes tápegységek (UPS)
- AMD K6-III, és minden ami RETRO - Oldschool tuning
- Yettel topik
- Megkönnyítette az iPhone az androidos átköltözést
- AMD Ryzen 9 / 7 / 5 7***(X) "Zen 4" (AM5)
- Audi, Cupra, Seat, Skoda, Volkswagen topik
- OnePlus 9 Pro - gyorsulási futam
- További aktív témák...
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- The Elder Scrolls Online Imperial Collector s Edition
- Vírusirtó, Antivirus, VPN kulcsok GARANCIÁVAL!
- Windows 10/11 Home/Pro , Office 2024 kulcsok
- Kaspersky, BitDefender, Avast és egyéb vírusírtó licencek a legolcsóbban, egyenesen a gyártóktól!
- GYÖNYÖRŰ iPhone XR 128GB Black-1 ÉV GARANCIA - Kártyafüggetlen, MS3985, 100% Akkumulátor
- ÁRGARANCIA! Épített KomPhone Ryzen 5 5600X 16/32/64GB RAM RTX 5050 8GB GAMER PC termékbeszámítással
- BESZÁMÍTÁS! ASRock B650M R7 8700F 32GB DDR5 512GB SSD RX 9070 XT 16GB NZXT H510 fehér Seasonic 750W
- í kilenc! AKCIÓS PRECÍZIÓS KÉSZÜLÉK! 7560 i9-11950H 32GB RAM 1TB SSD Nvidia RTX A3000 6GB 1 év gar
- Bomba ár! Lenovo ThinkPad X250 - i5-5GEN I 8GB I 128SSD I 12,5" HD I Cam I W10 I Garancia!
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest

Fferi50

