Como limito el numero de veces que pueda verse un powerpoint

como codifico en VBA para obtener la funcionalidad sugerida en el titulo