Change label border color at runtime
Is there any way to change a label's border color at runtime? I use the following code to create two labels, one horizontal and the other vertical. They are designed to make a cross symbol wherever I click on an image control. This works great, but I need them to be red instead of the default grey. Set Lbl = Controls.Add("Forms.Label.1", "lblLabel" & NumAnnuli, True) With Lbl ..Top = Y ..Left = X - 6 ..Height = 1 ..Width = 12 End With Set Lbl = Controls.Add("Forms.Label.1", "lblLabel" & NumAnnuli, True) With Lbl ..Top = Y - 6 ..Left = X ..Height = 12 ..Width = 1 End With -- timspier ------------------------------------------------------------------------ timspier's Profile: http://www.excelforum.com/member.php...o&userid=32090 View this thread: http://www.excelforum.com/showthread...hreadid=521311 |
Change label border color at runtime
try . . .
With Lbl ..Top = Y ..Left = X - 6 ..Height = 1 ..Width = 12 ..BackColor = vbRed |
Change label border color at runtime
I can't believe it. This is the second time this evening I didn't read
the question carefully enough. You wanted to change the border color, not the back color. Here you go . . . With Lbl ..Top = Y ..Left = X - 6 ..Height = 1 ..Width = 12 ..BorderStyle = 1 ..BorderColor = vbRed Sorry for the confusion. |
Change label border color at runtime
Thanks a bunch! Both methods worked great! -- timspier ------------------------------------------------------------------------ timspier's Profile: http://www.excelforum.com/member.php...o&userid=32090 View this thread: http://www.excelforum.com/showthread...hreadid=521311 |
All times are GMT +1. The time now is 07:35 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com