With ...
        .LineStyle = xlContinuous
...