Extract allways changing (and unknown) number at end of string

[strooman]

I'm cycling through multiple webpages and have to find the number at the end of a string like: Page 1 of 356 . Result would be 356. Not to difficult HOWEVER . . .
Because there are hundreds of webpages this last number changes all the time ( and I do not know it). I know how to find "Page 1 of " in the webpage for there is only one instance of this string.
But how can I extract this always changing number at the right in these multiple webpages? Some examples and desired results:
Page 1 of 356 result should be 356
Page 1 of 1284 result should be 1284
Page 1 of 13 result should be 13

I cannot use the MID-function because this requires the whole string to search but at the moment of executing I do not now what that last number while be.
MyNumber = Mid("Page 1 of " (i do not know the number here) , 1, 1)

To be complete, this is the complete string within te webpage.
<span><a href="javascript://" class="popupctrl">Page 1 of 99</a></span>
In summery, find the instance "Page 1 of " in the webpage and extract the 99.

 

[dreid1011]

Perhaps this:

=TRIM(RIGHT(SUBSTITUTE(B1," ",REPT(" ",100)),99))

There may also be more elegant solutions to be had, we shall see. Edit: Of course, this requires "Page 1 of #" is the very last part of the string already... if it is not, then the formula must change.

 

[dreid1011]

And perhaps this for strings where "Page 1 of #" is not at the end. Again, there is likely something much shorter, but this should get the job done.

=LEFT(MID(REPLACE(B2,FIND("Page",B2),10,"@"),FIND("@",REPLACE(B2,FIND("Page",B2),10,"@"))+1,5),FIND(" ",MID(REPLACE(B2,FIND("Page",B2),10,"@"),FIND("@",REPLACE(B2,FIND("Page",B2),10,"@"))+1,5))-1)

Also, if the max page count can be greater than 99,999, the formula may need to be adjusted.

 

[dreid1011]

And if I had finished reading your post, I would have gotten to the end about the complete string... oops. So, if that is the exact string every time, here is a much simpler solution that should work:

=REPLACE(REPLACE(B4,1,FIND("Page",B4)+9,""),FIND("<",REPLACE(B4,1,FIND("Page",B4)+9,"")),11,"")

All the options I provided above, but A4 is by far the best.

Book1
	A	B
1	20	Page 1 of 20
2	255	ABC DEF GHI Page 1 of 255 JKL MNO
3		<span><a href="javascript://" class="popupctrl">Page 1 of 99</a></span>
4	99	<span><a href="javascript://" class="popupctrl">Page 1 of 99</a></span>
Sheet3

Cell Formulas
Range	Formula
A1	A1	=TRIM(RIGHT(SUBSTITUTE(B1," ",REPT(" ",100)),99))
A2	A2	=LEFT(MID(REPLACE(B2,FIND("Page",B2),10,"@"),FIND("@",REPLACE(B2,FIND("Page",B2),10,"@"))+1,5),FIND(" ",MID(REPLACE(B2,FIND("Page",B2),10,"@"),FIND("@",REPLACE(B2,FIND("Page",B2),10,"@"))+1,5))-1)
A4	A4	=REPLACE(REPLACE(B4,1,FIND("Page",B4)+9,""),FIND("<",REPLACE(B4,1,FIND("Page",B4)+9,"")),11,"")

 

[JEC]

You could also try

=FILTERXML("<x><y>"&SUBSTITUTE(SUBSTITUTE(A1,"<",">"),">","</y><y>")&"</y></x>","//y[contains(.,'Page')]")

 

[JEC]

For just the number

=FILTERXML("<x><y>"&SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(A1,"<"," "),">"," ")," ","</y><y>")&"</y></x>","//y[preceding::*[3]='Page']")

 

[strooman]

Both, solutions will do the job.
First I couldn't find the FILTERXML function and I thought it wouldn't be available in my excel version (which is Dutch) but I found that the function is called XML.FILTEREN. And more important, it worked. Thanks for putting time in this one.