Ú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
- Xiaomi 15T - reakció nélkül nincs egyensúly
- Linux kezdőknek
- Garmin Forerunner 965 - csúcs
- Milyen okostelefont vegyek?
- Formula-1
- Harcba és Rómába vezet az új AMD Software
- Arc Raiders
- Milyen monitort vegyek?
- Beépül a Nano Banana a Google Fotókba
- Motorola Edge 70 - többért kevesebbet
- További aktív témák...
- XIAOMI Redmi Note 14 Pro 5G 8/256
- POINT S WINTER S 185/65R15 88T téligumi acélfelnivel
- ThinkPad 15,6",core i3 6100u(4x2,3Ghz)IntelHD VGA,8-16GB RAM,240SSD,Jó akku,nagyon szép állapot
- 12700kf,RTX4060 8gb,32gb ddr5,6T m.2 ssd,stb .Új komplett középkategóriás gamer pc .
- Acer 15.6",FullHD,core i3 8145U(4x3,9Ghz)MX230 2/4GB DDR5VGA,8-20GB RAM,SSD,szép állapot,Win.11
- Xiaomi Poci F4 Gt 128GB,Átlagos,Adatkabel, 12 hónap garanciával
- Magyarország piacvezető szoftver webáruháza
- ŐSZI BOMBA AKCIÓK! PSN, STEAM, UBISOFT CONNECT, EA APP, XBOX EREDETI KULCSOK 100% GARANCIA
- Ventilátorok 120/140mm és tápkábel modding kitűnő árakon!
- REFURBISHED - DELL Performance Dock WD19DCS (210-AZBN)
Állásajánlatok
Cég: Laptopműhely Bt.
Város: Budapest
Cég: NetGo.hu Kft.
Város: Gödöllő


