Maximilian al III-lea Iosif, Elector de Bavaria