VB + Excel

Boa tarde!

O que eu preciso é o seguinte:

A parte de trazer o dados e exportar para o excel é tranquilo, o que tá pegando é a formatação.

Preciso colocar umas bordas mas do jeito que estou tentando nao consigo.

Faço da seguinte forma:

EwCS.Range("A8:A15").Borders.LineStyle = 7

Mas deste jeito ele deixa as celulas "quadriculadas" quando na verdade o que eu preciso é que fique em linha assim:

_______________________________________

_______________________________________

_______________________________________

Agradeço pela atenção galera!

http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif