“Compile error: the variable has not been defined” using call function - excel

Question

I have a macro that opens a web page, assigns certain variables and then calls another procedure using the Call function. I would need to use some of the variables defined in the first procedure (for example numberOfPages) in the second procedure but I get the following error:
Compile error: the variable has not been defined
Can someone please tell me what the error is and how to solve it? I detail below both procedures.
Sub test()
Dim element As IHTMLElement
Dim elements As IHTMLElementCollection
Dim ie As InternetExplorer
Dim numberOfPages As Double
Dim html As HTMLDocument
Set ie = New InternetExplorer
ie.Visible = True
ie.navigate "https://cebra.com.ar/category/73/Juego-de-Construccion.html"
Do While ie.readyState <> READYSTATE_COMPLETE
Application.StatusBar = "Loading Web page …"
DoEvents
Loop
Set html = ie.document
Set elements = html.getElementsByClassName("container")
Set ElementCol = html.getElementsByTagName("a")
numberOfPages = ie.document.querySelectorAll(".setPage").Length
'MsgBox numberOfPages
For Each ele In ie.document.getElementsByTagName("li")
For Each element In elements
If element.className = "container" Then
'Do something
Call procedure
End If
Next element
Next
MsgBox "Done"
End Sub
Option Explicit
Public Sub procedure()
MsgBox numberOfPages
'I want to use the internet explorer opened and this variable to do something
End Sub

Answer 1

As #Karlomanio said, you need to pass variables to your sub-procedure (and please don't call it "procedure").
Here's your code, adjusted to make numberOfPages work:
Option Explicit
Public Sub WebProcedure(numberOfPages as Long)
MsgBox numberOfPages
'Do something here based on the number of pages
End Sub
This would be called using the following line in your test() sub:
WebProcedure numberOfPages