A Sub in another Sub...
 

Hi,

I have a rather basic question: I have made two macros in vb that works out
just fine one by one. Now I need to include one macro into another. I need
the macro called Sub EnterMonthYear to be included at the very end of the Sub
Table

I'm sure there's a simple code to trigger the Sub EnterMonthYear, but I
can't seem to find an answer anywhere..


The programming is like this:

Sub Table ()
..
..
*
End Sub

Sub EnterMonthYear
Dim MyMonth as String
Sheets("Inputsheet").Range("x6").Value=InputBox("E nter month")
Dim MyYear as String
Sheets("Inputsheet").Range("Y6").Value=InputBox("E nter year")
End Sub

Thankful for a response!

Traima

A Sub in another Sub...
 

Use the Call Statement which transfers control to a Sub procedure, Function
procedure, or DLL procedure..

Call EnterMonthYear

--
Jacob (MVP - Excel)


"Traima" wrote:

Hi,

I have a rather basic question: I have made two macros in vb that works out
just fine one by one. Now I need to include one macro into another. I need
the macro called Sub EnterMonthYear to be included at the very end of the Sub
Table

I'm sure there's a simple code to trigger the Sub EnterMonthYear, but I
can't seem to find an answer anywhere..


The programming is like this:

Sub Table ()
.
.
*
End Sub

Sub EnterMonthYear
Dim MyMonth as String
Sheets("Inputsheet").Range("x6").Value=InputBox("E nter month")
Dim MyYear as String
Sheets("Inputsheet").Range("Y6").Value=InputBox("E nter year")
End Sub

Thankful for a response!

Traima

A Sub in another Sub...
 

Sub Table ()

A Sub in another Sub...
 

Thanks, both of you.

This immediately solved my problem!

Traima

"steve" wrote:

Sub Table ()
.
.
* Call EnterMonthYear *
End Sub


"Traima" wrote in message
...
Hi,

I have a rather basic question: I have made two macros in vb that works
out
just fine one by one. Now I need to include one macro into another. I
need
the macro called Sub EnterMonthYear to be included at the very end of the
Sub
Table

I'm sure there's a simple code to trigger the Sub EnterMonthYear, but I
can't seem to find an answer anywhere..


The programming is like this:

Sub Table ()
.
.
*
End Sub

Sub EnterMonthYear
Dim MyMonth as String
Sheets("Inputsheet").Range("x6").Value=InputBox("E nter month")
Dim MyYear as String
Sheets("Inputsheet").Range("Y6").Value=InputBox("E nter year")
End Sub

Thankful for a response!

Traima


.