Sub SamT() Dim Sht As Worksheet For each Sht in Worksheets Sht.Range.("X2") = Array("FIT", "WEB TO", "TO", "TA", "IDS", "OWN") Next' End Sub
Sub SamT() Dim Sht As Worksheet For each Sht in Worksheets Sht.Range.("X2") = Array("FIT", "WEB TO", "TO", "TA", "IDS", "OWN") Next' End Sub
Last edited by Aussiebear; 04-21-2023 at 07:01 PM. Reason: Added code tags
I expect the student to do their homework and find all the errrors I leeve in.
Please take the time to read the Forum FAQ
Posting Permissions
Reply With Quote