Hirdetés
- Az ARM részvényeinek eladásában csúcsosodott ki az NVIDIA felvásárlási kísérlete
- Jobb tömörítő algoritmussal kínálja meg a DirectStorage API-t a Microsoft
- Mi történik, ha minden PCIe slot tele van?
- Nagy mennyiségben gyártja HBM3 memóriáját a kínai CXMT
- Felkészült az LPDDR6-ra az SK Hynix és a Samsung
- Fejhallgató erősítő és DAC topik
- Máris elfogytak az idei évre szánt HDD-k a Western Digitalnál
- 3D nyomtatás
- Vezeték nélküli fülhallgatók
- Nem indul és mi a baja a gépemnek topik
- Azonnali alaplapos kérdések órája
- Házimozi belépő szinten
- 5.1, 7.1 és gamer fejhallgatók
- AMD Ryzen 9 / 7 / 5 7***(X) "Zen 4" (AM5)
- Milyen monitort vegyek?
Új hozzászólás Aktív témák
-
válasz
tomazin
#1174
üzenetére
Na közben egy másik irányból révbe értem

Dim x As Object
Set x = CreateObject("vbscript.REgExp")martonx : Köszönöm szépen a gyors válaszod,megnézem azt is,h azzal hogyan működik. De alapvetően az a class nem volt meg,amit írtál (MicrofosVBARegExp),so úgy látom most már megy is amit eddig csináltam.
-
martonx
veterán
válasz
tomazin
#1174
üzenetére
Szia!
Például így lehet regex-ezni VBA-ban:
Dim MyExpression As Regex
Set MyExpression = New Regex'Fontosabb tulajdonságok
MyExpression.Global = True
MyExpression.Pattern = "*€$"'Kis-nagy betűt figyelje-e
'MyExpression.IgnoreCase = true'Használata
If MyExpression.Test(MyString) = True Then
MsgBox "Benne van"
Else
MsgBox "Nincs benne"
End IfAhhoz, hogy a VBA ismerje a Regex objektumot a refernciák közé hozzá kell adnod a"Microsoft VBScript Regular Expressions" -t.
Remélem segítettem.
Új hozzászólás Aktív témák
- Apró változásokkal, elődjénél jobb áron kezd a Google Pixel 10a
- Beleremegett Hollywood Brad Pitt és Tom Cruise AI harcába
- Rövid kedvcsináló előzetest kapott a Marathon
- Nintendo Switch
- Fejhallgató erősítő és DAC topik
- LEGO klub
- Apple iPhone Air - almacsutka
- Máris elfogytak az idei évre szánt HDD-k a Western Digitalnál
- A Pixel 9 AirDropot, a Pixel 11 Face ID-t kap
- Luck Dragon: Asszociációs játék. :)
- További aktív témák...
- BOMBA ÁRrR! Lenovo ThinkPad T14s Gen 4 Ryzen 5 PRO 7540U 14" FHD+ 32GB 1TB Lenovo gar: 2028.01.07!
- ZBook Fury 17 G8 17.3" FHD IPS i7-11850H T1200 32GB 512GB NVMe ujjolv IR kam gar
- Félkonfig: i7-14700KF + Gigabyte Z790 Aorus Elite AX-W (2024-es szett, Garanciális!)
- ID-COOLING IS-50X V2 low profile hűtő, 50mm magas
- Apple iPhone 12 64GB, Kártyafüggetlen, 1 Év Garanciával
- ÁRGARANCIA!Épített KomPhone i9 14900KF 64GB RAM RTX 5080 16GB GAMER PC termékbeszámítással
- Beszámítás! VALVE INDEX virtuális valóság szemüveg garanciával hibátlan működéssel
- DELL LATITUDE 5420 üzleti laptop garanciával 14", i5-11345G7 16gb ram 256ssd FHD
- Beszámítás! Acer Predator Helios Neo 16 notebook-i9 14900HX 16GB DDR5 1TB SSD RTX 4060 8GB W11
- darkFlash ZR12 Darkstorm
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest



