Pastor alemán agresivo con visitas

Tengo una pastor alemán de 2 años que la tenemos desde los 8 meses. Es una perra que no se deja tocar por los extraños y que se muestra tímida. Con la familia es muy sumisa y cariñosa. El problema viene cuando llegan las visitas. La perra no se deja tocar, y en alguna ocasión ha llegado a marcar, quizás cuando le sorprende algún gesto, pero no suele gruñir antes de marcar con los dientes. Esto ha pasado dos veces, y es un comportamiento que debemos erradicar lo antes posible. La ultima vez, un amigo que vino a comer estuvo un tiempo con ella, y ella se dejaba que la acariciasen y se acercaba (cuando pasa un tiempo si se va acercando poco a poco). Pues el chico se fue al baño y al salir, ella le ladró y le marcó en la pierna, fue todo muy rápido, y no entendimos bien el porqué. ¿Qué medidas podemos tomar para que no sea así con las visitas?