Hi
I created a Module called "Test" ie sub Test( ). It is a very simple macro
that sorts a few tables in a single sheet

I added the same code to a Workbook open function ie Private Sub
Workbook_Open( ) which works fine

However I want it so that I update the code in one place ie sub Test ( ), I
simply point to this from whereever I want - this way I only update once and
don't need to ensure the code is always the same.

Background is I want to force the sort in many instances eg manually, when I
open the workbook, when I activate a new sheet etc

thanks in advance




--
Kevin

First create a public sub in a standard module:

Public Sub hithere()
MsgBox ("hi there")
End Sub

Then from workbook or worksheet event code:

Private Sub Worksheet_Change(ByVal Target As Range)
Call hithere
End Sub

--
Gary''s Student - gsnu200763


"Kevin" wrote:

Hi
I created a Module called "Test" ie sub Test( ). It is a very simple macro
that sorts a few tables in a single sheet

I added the same code to a Workbook open function ie Private Sub
Workbook_Open( ) which works fine

However I want it so that I update the code in one place ie sub Test ( ), I
simply point to this from whereever I want - this way I only update once and
don't need to ensure the code is always the same.

Background is I want to force the sort in many instances eg manually, when I
open the workbook, when I activate a new sheet etc

thanks in advance




--
Kevin

I get a Compile error: Expected variable or procedure, not module

any idea what i have done wrong?
--
Kevin


"Gary''s Student" wrote:

First create a public sub in a standard module:

Public Sub hithere()
MsgBox ("hi there")
End Sub

Then from workbook or worksheet event code:

Private Sub Worksheet_Change(ByVal Target As Range)
Call hithere
End Sub

--
Gary''s Student - gsnu200763


"Kevin" wrote:

Hi
I created a Module called "Test" ie sub Test( ). It is a very simple macro
that sorts a few tables in a single sheet

I added the same code to a Workbook open function ie Private Sub
Workbook_Open( ) which works fine

However I want it so that I update the code in one place ie sub Test ( ), I
simply point to this from whereever I want - this way I only update once and
don't need to ensure the code is always the same.

Background is I want to force the sort in many instances eg manually, when I
open the workbook, when I activate a new sheet etc

thanks in advance




--
Kevin

The problem is likely that your code module (which contains the procedure)
has the same name as a procedure. Change the name of the module or the name
of the procedure.


--
Cordially,
Chip Pearson
Microsoft MVP - Excel, 10 Years
Pearson Software Consulting
www.cpearson.com
(email on the web site)


"Kevin" wrote in message
...
I get a Compile error: Expected variable or procedure, not module

any idea what i have done wrong?
--
Kevin


"Gary''s Student" wrote:

First create a public sub in a standard module:

Public Sub hithere()
MsgBox ("hi there")
End Sub

Then from workbook or worksheet event code:

Private Sub Worksheet_Change(ByVal Target As Range)
Call hithere
End Sub

--
Gary''s Student - gsnu200763


"Kevin" wrote:

Hi
I created a Module called "Test" ie sub Test( ). It is a very simple
macro
that sorts a few tables in a single sheet

I added the same code to a Workbook open function ie Private Sub
Workbook_Open( ) which works fine

However I want it so that I update the code in one place ie sub Test
( ), I
simply point to this from whereever I want - this way I only update
once and
don't need to ensure the code is always the same.

Background is I want to force the sort in many instances eg manually,
when I
open the workbook, when I activate a new sheet etc

thanks in advance




--
Kevin

spot on - thanks
--
Kevin


"Chip Pearson" wrote:

The problem is likely that your code module (which contains the procedure)
has the same name as a procedure. Change the name of the module or the name
of the procedure.


--
Cordially,
Chip Pearson
Microsoft MVP - Excel, 10 Years
Pearson Software Consulting
www.cpearson.com
(email on the web site)


"Kevin" wrote in message
...
I get a Compile error: Expected variable or procedure, not module

any idea what i have done wrong?
--
Kevin


"Gary''s Student" wrote:

First create a public sub in a standard module:

Public Sub hithere()
MsgBox ("hi there")
End Sub

Then from workbook or worksheet event code:

Private Sub Worksheet_Change(ByVal Target As Range)
Call hithere
End Sub

--
Gary''s Student - gsnu200763


"Kevin" wrote:

Hi
I created a Module called "Test" ie sub Test( ). It is a very simple
macro
that sorts a few tables in a single sheet

I added the same code to a Workbook open function ie Private Sub
Workbook_Open( ) which works fine

However I want it so that I update the code in one place ie sub Test
( ), I
simply point to this from whereever I want - this way I only update
once and
don't need to ensure the code is always the same.

Background is I want to force the sort in many instances eg manually,
when I
open the workbook, when I activate a new sheet etc

thanks in advance




--
Kevin