Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 846
Default Test if cell has diagonal borders

Thanks for taking the time to read my question.

I want to test if a cell has diagonal borders. How do I do this?

I tried:

If Range("C5").Borders(xlDiagonalDown) = True Then
MsgBox "Yes"
End If

but it didn't work.

Thanks for your help.

Brad
  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 219
Default Test if cell has diagonal borders

If Range("C5").Borders(xlDiagonalDown).LineStyle < xlNone Then
MsgBox "Yes"
End If

If Range("C5").Borders(xlDiagonalUp).LineStyle < xlNone Then
MsgBox "Yes"
End If

HTH,
--
Gary Brown

If this post was helpful, please click the ''''Yes'''' button next to
''''Was this Post Helpfull to you?".


"Brad" wrote:

Thanks for taking the time to read my question.

I want to test if a cell has diagonal borders. How do I do this?

I tried:

If Range("C5").Borders(xlDiagonalDown) = True Then
MsgBox "Yes"
End If

but it didn't work.

Thanks for your help.

Brad

  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 846
Default Test if cell has diagonal borders

Of course!

Thanks so much,

Brad

"Gary L Brown" wrote:

If Range("C5").Borders(xlDiagonalDown).LineStyle < xlNone Then
MsgBox "Yes"
End If

If Range("C5").Borders(xlDiagonalUp).LineStyle < xlNone Then
MsgBox "Yes"
End If

HTH,
--
Gary Brown

If this post was helpful, please click the ''''Yes'''' button next to
''''Was this Post Helpfull to you?".


"Brad" wrote:

Thanks for taking the time to read my question.

I want to test if a cell has diagonal borders. How do I do this?

I tried:

If Range("C5").Borders(xlDiagonalDown) = True Then
MsgBox "Yes"
End If

but it didn't work.

Thanks for your help.

Brad

  #4   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 846
Default Test if cell has diagonal borders

Hi Gary,

Can I do this? It's not working for me.

do until Cells(x, a).Border(xlDiagonalDown).LineStyle < xlNone

something here

loop

Brad

"Gary L Brown" wrote:

If Range("C5").Borders(xlDiagonalDown).LineStyle < xlNone Then
MsgBox "Yes"
End If

If Range("C5").Borders(xlDiagonalUp).LineStyle < xlNone Then
MsgBox "Yes"
End If

HTH,
--
Gary Brown

If this post was helpful, please click the ''''Yes'''' button next to
''''Was this Post Helpfull to you?".


"Brad" wrote:

Thanks for taking the time to read my question.

I want to test if a cell has diagonal borders. How do I do this?

I tried:

If Range("C5").Borders(xlDiagonalDown) = True Then
MsgBox "Yes"
End If

but it didn't work.

Thanks for your help.

Brad

Reply
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
diagonal split in a cell Southern at Heart Excel Discussion (Misc queries) 4 May 19th 09 01:42 AM
Diagonal Borders Rosi Excel Discussion (Misc queries) 3 October 28th 08 07:13 PM
Creating cells with Diagonal borders Graham Tritton Excel Discussion (Misc queries) 1 January 24th 06 06:09 AM
Can't print diagonal borders although they show on print preview Excel-lover Excel Discussion (Misc queries) 7 August 30th 05 01:28 AM
Can you make a cell with a diagonal, so that you can edit the upper and lower part of the cell? g wills New Users to Excel 3 February 17th 05 10:23 PM


All times are GMT +1. The time now is 04:34 AM.

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"