Backboards: 
Posts: 158

truman, here are those macros.




Sub amanda()
For Each sht In Sheets
With ActiveCell
Selection.FormulaR1C1 = sht.Name
ActiveCell.Offset(1, 0).Select
End With
Next
End Sub

Sub amandaX()
For Each sht In Sheets
With ActiveCell
sht.Name = .Text
ActiveCell.Offset(1, 0).Select
End With
Next
End Sub



Responses:
Post a message   top
Replies are disabled on threads older than 7 days.