Forum Discussion
kelly johnson
Jun 26, 2018Copper Contributor
Can I use a list to auto fill sheet tabs?
Can I use a list to auto fill sheet tabs instead of naming them one at a time?
Matt Mickle
Jun 26, 2018Bronze Contributor
Kelly-
Hope you're doing well. Yes, this is possible but you'll need to use VBA:
Sub Test() Dim Lrow As Integer
Dim intLp As Integer Lrow = Sheets("MySheetNames").Cells(Rows.Count, "A").End(xlUp).Row For intLp = 2 To Lrow Sheets.Add After:=Sheets(Sheets.Count) Sheets(ActiveSheet.Name).Name = Sheets("MySheetNames").Range("A" & intLp) Next intLp End Sub
kelly johnson
Jun 26, 2018Copper Contributor
Thank you I will attempt that after lunch. :)