Putting woirksheet name into a variable

[Guest]

I have a form where a new sheet is created in a workbook. Everytime a sheet
is created it incraments up (sheet1, sheet2, sheet3, sheet4). I was tring to
put the active sheet name into a varable but I do not know the syntax.

 

[Guest]

try this:-

Sub filefile()
With ThisWorkbook
.Sheets.Add After:=.Sheets(.Sheets.Count)
End With
myName = ActiveSheet.Name
msgbox myName
End Sub

 

[Matthew Dodds]

I have a form where a new sheet is created in a workbook. Everytime a sheet
is created it incraments up (sheet1, sheet2, sheet3, sheet4). I was tring to
put the active sheet name into a varable but I do not know the syntax.

Dim sWshName as string
sWshName=activeworkbook.worksheets(activeworkbook.worksheets.count).name

should do the job

 

[Susan]

Option Explicit

Sub zeyger()

Dim ws As Worksheet
Dim sName As String

sName = "Zeyger"

Worksheets.Add
ActiveSheet.Name = sName

End Sub


hth!
susan