boolstatus = Part.Extension.SelectByID2("Sketch1", "SKETCH", 0, 0, 0, False, 0, Nothing, 0)

is that possible to make "sketch1" as variable and can be changed automatically in loop