Copy cells to another sheet if criteria met

[New to VBA]

I have a spreadsheet with details of attendees. The attendees maybe attending multiple locations, see columns I to N in the image. If there is a "1" in the the columns, I would like copy the cells A to H to the corresponding sheet. i.e. if there is a 1 in Perth column copy to the sheet "Perth" and then check other columns eg: Melbourne, Sydney etc.

 

[kvsrinivasamurthy]

There are three 1's , it means to be copied to 3 sheets.