P.S. I want to get the complete keywords (separated by comma) instead of partial match. but I do not know why the VBA is not working.