View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Monte0682 Monte0682 is offline
external usenet poster
 
Posts: 15
Default labels in activesheet

I have 10 labels in active sheet.

I have 10 labels in user form. I would like to assign a colour to
every label in active sheet to be the same as the color in user form.

ActiveSheet.ele_1.BackColor = form_main.ele_1.BackColor

what I need to do for 10 labels

I think:

For i = 1 To number_of_elements
ActiveSheet.Label("ele_" & i).BackColor =
form_main.Controls("ele_" & i).BackColor
Next i

but it didn't work... Any suggestions?

Also these labels are shown in design mode only. when I exit design
mode I can't se any labels