borders cells vba do until

[lupingamon]

I have to apply the EXTERNAL border to the cells.
the editor output error

Please Login or Register  to view this content.

HOW CAN I FIX THIS CODE TO SOLVE THE MISTAKE?
THANK YOU!

[nathansav]

Its all wrong :o)

Please Login or Register  to view this content.

Your error was DO UNTIL x=y

[lupingamon]

I should insert the top-border at the first row and end the bottom border at last row where there are values, how can i set up this ?

[nathansav]

X = range("e1").End(xlUp).ROW

Range("E" & x & ":F" & x).select
selection....... all your formatting code


You need to be clearer in your post, you had a loop, so it looked like you were looping and applying external border to each

[lupingamon]

ok nathansav... you were right!!! thank you!

If it can help anyone, i fix my problem with the following code:

Please Login or Register  to view this content.