This example displays the value in cell A1 on Sheet1 in the active workbook.
MsgBox Worksheets("Sheet1").Range("A1").Value
This example displays the name of each worksheet in the active workbook.
For Each ws In Worksheets
MsgBox ws.Name
Next ws
This example adds a new worksheet to the active workbook and then sets the name of the worksheet.
Set newSheet = Worksheets.Add
newSheet.Name = "current Budget"