hi,
yes, a lot of ways to do it. i just grabed the first thing that came to mind.
lazy????

Regards
FSt1

"Barb Reinhardt" wrote:

I'd probably modify your code like this

sub findname()
Dim aWS as Worksheet
Set aWS = ActiveSheet
MsgBox aWS.name
end sub

You can use this like this

aWS.Range("A1").value = "myValue"
aWS.Cells(1,1).formulaR1C1 = "=1"


--
HTH,
Barb Reinhardt

If this post was helpful to you, please click YES below.



"FSt1" wrote:

hi
try this for starts....
sub findname()
Dim n As String
n = ActiveSheet.Name
MsgBox n
end sub

regards
FSt1

"Les" wrote:

Hi,

Is there an easy way fro me to grab the name of the active sheet I am in. ie
if I am in sheet9 I want to be able to use the name sheet9 in code etc?
Thanks in advane,

Les