Hi
Create a commandbutton. And put this code in the userform module.
Dim Rng As Range
Private Sub CommandButton1_Click()
Dim i As Long
Application.ScreenUpdating = False
Rng.Rows.Hidden = False
With Me
For i = 0 To .Controls.Count - 1
Debug.Print .Controls(i).Caption
If TypeName(.Controls(i)) = "CheckBox" Then
If .Controls(i).Value Then
Rng.Find(.Controls(i).Caption).EntireRow.Hidden = True
End If
End If
Next
End With
Application.ScreenUpdating = True
End Sub
Private Sub UserForm_Initialize()
Set Rng = Intersect(Range("c:c"), ActiveSheet.UsedRange)
Rng.Rows.Hidden = False
End Sub
Kris
On Tuesday, 20 March 2012 18:02:54 UTC+5:30, NOORAIN ANSARI wrote:
>
> Dear Shankar,
>
> Please see attached sheet.
>
> --
> Thanks & regards,
> Noorain Ansari
> *http://noorainansari.com/*
> *http://excelmacroworld.blogspot.com/*<http://excelmacroworld.blogspot.com/>
>
>
> On Tue, Mar 20, 2012 at 11:32 AM, Shankar Bheema
> <shankar.n...@gmail.com>wrote:
>
>> Dear experts
>>
>> I have attached an excel file containing data of qualification. On the
>> userform I created check boxes with similar to the datasheet data.
>>
>> I need action like, only the tickmarked check box data only shown on the
>> data sheet all other have to go in hidden mode (even in print also).
>>
>> waiting for your reply.
>>
>> regards
>> shankar sb
>>
>> --
>> FORUM RULES (986+ members already BANNED for violation)
>>
>> 1) Use concise, accurate thread titles. Poor thread titles, like Please
>> Help, Urgent, Need Help, Formula Problem, Code Problem, and Need Advice
>> will not get quick attention or may not be answered.
>>
>> 2) Don't post a question in the thread of another member.
>>
>> 3) Don't post questions regarding breaking or bypassing any security
>> measure.
>>
>> 4) Acknowledge the responses you receive, good or bad.
>>
>> 5) Cross-promotion of, or links to, forums competitive to this forum in
>> signatures are prohibited.
>>
>> NOTE : Don't ever post personal or confidential data in a workbook. Forum
>> owners and members are not responsible for any loss.
>>
>>
>> ------------------------------------------------------------------------------------------------------
>> To post to this group, send email to excel-macros@googlegroups.com
>>
>
>
>
>
>
--
FORUM RULES (986+ members already BANNED for violation)
1) Use concise, accurate thread titles. Poor thread titles, like Please Help,
Urgent, Need Help, Formula Problem, Code Problem, and Need Advice will not get
quick attention or may not be answered.
2) Don't post a question in the thread of another member.
3) Don't post questions regarding breaking or bypassing any security measure.
4) Acknowledge the responses you receive, good or bad.
5) Cross-promotion of, or links to, forums competitive to this forum in
signatures are prohibited.
NOTE : Don't ever post personal or confidential data in a workbook. Forum
owners and members are not responsible for any loss.
------------------------------------------------------------------------------------------------------
To post to this group, send email to excel-macros@googlegroups.com
