vba - Check cell value in a table excel? -

trying check if cell value in "calendar" contained in table ams, wich located in sheet in same workbook error item specified name not founf...help please

sub look()   activeworkbook.sheets("calendar").select  range("c7").select  if intersect(activecell, [ams]) nothing       msgbox "activecell not in table1"    else       msgbox "yup"    end if