ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Using GroupName (https://www.excelbanter.com/excel-programming/374254-using-groupname.html)

Noemi

Using GroupName
 
Hi
Is it possible to use the groupname to be able to make the option buttons
visible on a worksheet rather than the individual optionbutton names.

ie
optCheck, optHold, optNew
groupname = Testing

is there away to do the following

groupname(testing).visible = true

which makes the 3 option buttons visible.

Thanks
Noemi

Jim Thomlinson

Using GroupName
 
To the best of my knowledge... No. You could write code to loop through all
of the option buttons in the frame but that would be a lot more work than
just coding the 3 buttons themselves...
--
HTH...

Jim Thomlinson


"Noemi" wrote:

Hi
Is it possible to use the groupname to be able to make the option buttons
visible on a worksheet rather than the individual optionbutton names.

ie
optCheck, optHold, optNew
groupname = Testing

is there away to do the following

groupname(testing).visible = true

which makes the 3 option buttons visible.

Thanks
Noemi


Tom Ogilvy

Using GroupName
 
No, but you could do

for each ole in OleObjects
if typeof ole.Object is MSForms.OptionButton then
if lcase(ole.Object.GroupName) = "testing" then
ole.visible = False
end if
end if
Next

--
Regards,
Tom Ogilvy


"Noemi" wrote in message
...
Hi
Is it possible to use the groupname to be able to make the option buttons
visible on a worksheet rather than the individual optionbutton names.

ie
optCheck, optHold, optNew
groupname = Testing

is there away to do the following

groupname(testing).visible = true

which makes the 3 option buttons visible.

Thanks
Noemi




Noemi

Using GroupName
 
Hi Tom
Is there a way of also making it visible as a group.

Thanks
Noemi

"Tom Ogilvy" wrote:

No, but you could do

for each ole in OleObjects
if typeof ole.Object is MSForms.OptionButton then
if lcase(ole.Object.GroupName) = "testing" then
ole.visible = False
end if
end if
Next

--
Regards,
Tom Ogilvy


"Noemi" wrote in message
...
Hi
Is it possible to use the groupname to be able to make the option buttons
visible on a worksheet rather than the individual optionbutton names.

ie
optCheck, optHold, optNew
groupname = Testing

is there away to do the following

groupname(testing).visible = true

which makes the 3 option buttons visible.

Thanks
Noemi





Dave Peterson

Using GroupName
 
ole.visible = True
?????



Noemi wrote:

Hi Tom
Is there a way of also making it visible as a group.

Thanks
Noemi

"Tom Ogilvy" wrote:

No, but you could do

for each ole in OleObjects
if typeof ole.Object is MSForms.OptionButton then
if lcase(ole.Object.GroupName) = "testing" then
ole.visible = False
end if
end if
Next

--
Regards,
Tom Ogilvy


"Noemi" wrote in message
...
Hi
Is it possible to use the groupname to be able to make the option buttons
visible on a worksheet rather than the individual optionbutton names.

ie
optCheck, optHold, optNew
groupname = Testing

is there away to do the following

groupname(testing).visible = true

which makes the 3 option buttons visible.

Thanks
Noemi





--

Dave Peterson

Tom Ogilvy

Using GroupName
 
That would have been my guess as well.

--
Regards,
Tom Ogilvy


"Dave Peterson" wrote in message
...
ole.visible = True
?????



Noemi wrote:

Hi Tom
Is there a way of also making it visible as a group.

Thanks
Noemi

"Tom Ogilvy" wrote:

No, but you could do

for each ole in OleObjects
if typeof ole.Object is MSForms.OptionButton then
if lcase(ole.Object.GroupName) = "testing" then
ole.visible = False
end if
end if
Next

--
Regards,
Tom Ogilvy


"Noemi" wrote in message
...
Hi
Is it possible to use the groupname to be able to make the option
buttons
visible on a worksheet rather than the individual optionbutton names.

ie
optCheck, optHold, optNew
groupname = Testing

is there away to do the following

groupname(testing).visible = true

which makes the 3 option buttons visible.

Thanks
Noemi




--

Dave Peterson




Dave Peterson

Using GroupName
 
You have a very dry wit (just like your martinis???).

Tom Ogilvy wrote:

That would have been my guess as well.

--
Regards,
Tom Ogilvy

"Dave Peterson" wrote in message
...
ole.visible = True
?????



Noemi wrote:

Hi Tom
Is there a way of also making it visible as a group.

Thanks
Noemi

"Tom Ogilvy" wrote:

No, but you could do

for each ole in OleObjects
if typeof ole.Object is MSForms.OptionButton then
if lcase(ole.Object.GroupName) = "testing" then
ole.visible = False
end if
end if
Next

--
Regards,
Tom Ogilvy


"Noemi" wrote in message
...
Hi
Is it possible to use the groupname to be able to make the option
buttons
visible on a worksheet rather than the individual optionbutton names.

ie
optCheck, optHold, optNew
groupname = Testing

is there away to do the following

groupname(testing).visible = true

which makes the 3 option buttons visible.

Thanks
Noemi




--

Dave Peterson


--

Dave Peterson


All times are GMT +1. The time now is 08:44 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com