Using the same variables for multiple macros

[OldManDemosthenes]

I have a macro (macro1) which sets up several variables. Is it possible to have macro2 call and use the variables setup in macro1?

So the Code for macro1 would look something like this

Sub Macro1()
Dim ALocation As Range, ARow As Long
[INDENT]Set ALocation = Worksheets("Test").Range("A:B").Find("String")[/INDENT]
[INDENT][B]ARow[/B] = ALocation.Row[/INDENT]
End Sub

and macro2

Sub Macro2()

Call Macro1
Worksheets("Test").Range("C1") = Worksheets("Test").Cells([B]ARow[/B], 10).value

End Sub

The problem I am having is that Macro2 is not recognizing the dim variables (ARow and others) from Macro1

Thanks!

 

[AlphaFrog]

I'm not sure I follow what you want, but here are a couple of ideas...

You could declare a Public array variable

Public ARow() As Variant

Sub Macro1()
    
    ARow = Sheets("Sheet2").Range("A1:B60").Value
    UserForm1.Show
    
End Sub

In this example...
ARow(10,1) would be the value in Sheet2 A10
ARow(12,2) would be the value in Sheet2 B12

Also, the UserForm procedures can read cell values just like Macro procedures. I don't follow why you need to pass 60 cell values to a UserForm.

 

[Norie]

Why not use the userform to allow the user to set which row the category each item is found in?

Or even have code that let's the user enter in the category and then locates the row, and perhaps worksheet, the category is in?