Vote count:
0
i have the below codes to create sheets and rename it from specific list in the master sheet i need a help to add a code to copy some cells from another sheet ( pay slip ) to be pest in each of these new sheets
Sub CreateSheetsFromAList() Dim MyCell As Range, MyRange As Range
Set MyRange = Sheets("MASTER").Range("E9:E27")
Set MyRange = Range(MyRange, MyRange.End(xlDown))
For Each MyCell In MyRange
Sheets.Add After:=Sheets(Sheets.Count) 'creates a new worksheet
Sheets(Sheets.Count).Name = MyCell.Value ' renames the new worksheet
Next MyCell
End Sub
asked 11 secs ago
Exel VBA: codes to copy cells from sheet to new one
Aucun commentaire:
Enregistrer un commentaire