Regexp width x height

width=""
height=""
str=" Video: flv, yuv420p, 320x240 [PAR 0:1 DAR 0:1], 25.00 tb(r)"

Vad jag skulle vilja är att få width=320 och height=240.

Width har alltid ", " innan och "x" efter.
Height har alltid "x" innan och " [PAR" efter

Någon som vill hjälpa mig hur man kan göra detta? Antar att det blir regexp?

, (\d+)x(\d+) \[par

med någon replace som ser ut

"width=""$1"" height=""$2""

Tack för ditt svar, voigtann1!

Har försökt lite under dagen, men lyckas inte få det att fungera. Regexp är verkligen inte min grej.

Hur skulle en kod kunna se ut om jag vill ha $1 till variablen width och $2 till variablen height?

otestad men:

width=""
height=""
str=" Video: flv, yuv420p, 320x240 [PAR 0:1 DAR 0:1], 25.00 tb(r)"

dim objRE
Set objRE=New RegExp
ObjRE.Pattern=", (\d+)x(\d+) \[par"
objRE.IgnoreCase=True
objRE.Global=True
Set objMatches=objRE.Execute(str)

width = objMatches(0).SubMatches(0)
height = objMatches(0).SubMatches(1)