chnage this line [VBA]a = CABIN[/VBA] to [VBA]a = "CABIN"[/VBA]