View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Henry[_5_] Henry[_5_] is offline
external usenet poster
 
Posts: 104
Default Copying labels to Userform at runtime.

Thanks Chip,

Now working fine.

Henry


"Chip Pearson" wrote in message
...
Use the ForeColor and BackColor properties of the Ctrl object.

Ctrl.ForeColor = RGB(0, 0, 0)
Ctrl.BackColor = RGB(255, 255, 255)


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"Henry" wrote in message
...
Thanks Chip,

The Label takes on the default colours of the form.
All I need now is to change the backcolor, forecolor and border for it to
be as I want.
(White, Black and a black border)
I cannot seem to change them from VBA like a normal Label.

Henry

"Chip Pearson" wrote in message
...
Try something like the following. Change the various properties to meet
your needs.

Dim Ctrl As MSForms.Control
Set Ctrl = UserForm1.Controls.Add("Forms.Label.1", "Label1", True)
Ctrl.Height = 10
Ctrl.Width = 10
Ctrl.Top = 10
Ctrl.Left = 10
Ctrl.Caption = "A"
UserForm1.Show


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com




"Henry" wrote in message
...
I'm trying to set up an array of labels on a form at runtime.
The size of the array is determined from a textbox input at the top of
the form.
The sort of thing I want is like a blank crossword grid, where I can
adjust the caption in each label later to be 1 letter.
I've tried to copy a label and then paste it, but VBA doesn't allow
this.
Has anyone any suggestions on how to achieve this?

TIA
Henry