How to create a public array in class module?

[alex009988]

So that I've tried to use that code in class module

Public sf()
Dim strf(), strf1(), strf2(), strf3()
strf1 = Array(1, 2, 3)
strf2 = Array(4, 5, 6)
strf3 = Array(6, 7, 9)
strf = Array(strf1, strf2, strf3)
End Sub

and code for a module

Sub s()
Debug.Print strf(2)(2)
End Sub

But I get the error "invalid outside procedure".