LinkBack Thread Tools Search this Thread Display Modes
Prev Previous Post   Next Post Next
  #6   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 2
Default Macro to change cell borders

Many thanks Tom

Roddie

"Tom Ogilvy" wrote:

Here is another possibility

Sub yay()
For Each h In ActiveSheet.UsedRange.Cells
For i = 5 To 10
If h.Borders(i).Weight < xlThin Then _
h.Borders(i).Weight = xlThin
Next
Next
End Sub

--
Regards,
Tom Ogilvy


"Roddie Grant" wrote in message
...
Excellent Ben. Many thanks!

Roddie




 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
How do you change the preset borders on the Formating Tool bar? wfmcguigan Excel Discussion (Misc queries) 2 February 5th 10 09:05 PM
How can I change the color/type of the borders I put on cells? Tourkow Excel Discussion (Misc queries) 8 November 25th 09 04:42 PM
How do I change the default color for borders in Excel 2003? Sheila Excel Discussion (Misc queries) 4 December 11th 08 07:56 PM
macro that will change the font of a cell if i change a value jk Excel Discussion (Misc queries) 2 July 29th 08 04:39 PM
Button to change borders dixonpeter Excel Discussion (Misc queries) 2 August 12th 05 01:30 PM


All times are GMT +1. The time now is 01:01 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"