-
Fototrend
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
vakondka #51262 üzenetére
Szia!
Ez nem egy sima makró (Sub), hanem egy függvény (Function), ezért nem látod a makrók között. A függvényed egy bemeneti értéket vár - ahogyan látom ékezetes karaktereket tartalmazó szöveget - és azt alakítja át.
Meghívása VBA-ban egy olyan makróból történhet, amelyikben átadod az átalakítandó szöveget:
Pl. Sub hivo()
msgbox RemoveAccents(szöveg)
End Sub
szöveg helyére írod az átalakítandó szöveget.
Használható munkalapon is, ugyanúgy, mint egy beépített függvény.
A1-ben van az átalakítandó szöveg, akkor Pl. B1 képlete: =RemoveAccents(A1)
Még egy megjegyzés - Sub is várhat paramétert, akkor azt sem látod a makrók között, hiszen a bemeneti értéket meg kell adni a híváskor.
Üdv. -
AvLav
csendes tag
válasz
vakondka #4376 üzenetére
Szia!
Ha van egy üres munkalapod, akkor:
adatok -> külső adatok importálása -> adatok beolvasása.
Megkeresed a fájlt és megnyitod.
Bejön a szövegbeolvasó varázsló, itt a tagoltat kell választani, aztán <tovább>.
Itt be lehet állítani mik a határoló jelek, (neked azt hiszem az egyéb: ; kell) <tovább>
kijelölöd a cikkszám oszlopot, átállítod szövegre, aztán <bejezés>!!!
Így elvileg nem szedi ki a nullákat az elejéről. -
Delila_1
veterán
válasz
vakondka #4374 üzenetére
Egy új oszlopot formázz meg a formázás egyéni kategóriájában így:
00000###
Az új oszlopban hivatkozz a cikkszámot tartalmazó oszlopra:
=ÉRTÉK(A1) – ha az A oszlopban vannak a cikkszámaid.
A függvényt lemásolod, és az új oszlopot irányítottan, értékként ráillesztheted az eredeti cikkszámos oszlopodra. Az új oszlopot ki is törölheted.
Új hozzászólás Aktív témák
- Milyen asztali (teljes vagy fél-) gépet vegyek?
- Battlefield 6
- iPhone topik
- A fociról könnyedén, egy baráti társaságban
- Kínai és egyéb olcsó órák topikja
- Mobil flották
- NVIDIA GeForce RTX 4060 / 4070 S/Ti/TiS (AD104/103)
- Samsung Galaxy S23 Ultra - non plus ultra
- Sorozatok
- Spórolós topik
- További aktív témák...
- BESZÁMÍTÁS! Gigabyte A520M R5 5500 16GB DDR4 500GB SSD GTX 1660 Super 6GB CHIEFTEC Libra Zalman 500W
- ÁRGARANCIA!Épített KomPhone i5 14600KF 32/64GB RAM RTX 5060Ti 16GB GAMER PC termékbeszámítással
- Apple Mac mini M4 Pro 24GB RAM 512GB SSD 1 év garancia
- Telefon felváráslás!! iPhone 15/iPhone 15 Plus/iPhone 15 Pro/iPhone 15 Pro Max
- Apple iPhone 15 Plus Black Dynamic Island, 48 MP fő kamera 256 GB -100%
Állásajánlatok
Cég: NetGo.hu Kft.
Város: Gödöllő
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest