Re: $$Excel-Macros$$ Need a Fastest way

2013-06-20 Thread priti verma
yes i think


On Wed, Jun 19, 2013 at 6:41 AM, VBA VABZ v...@vabs.in wrote:

 Hi

 Highlighted means cells filled with specific color or selected cells.

 Thanks


 On Wed, Jun 19, 2013 at 5:58 PM, rajan verma rajanverma1...@gmail.comwrote:


 can anyone suggest a faster way to know which cells are highlighted in a
 Range ?

 suppose i  have data of 1 lac cell and i have some cells highlighted , i
 want to know address of that cells.



 --
 Regards
 Rajan verma
 +91 9158998701

 --
 Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s
 =TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @
 https://www.facebook.com/discussexcel

 FORUM RULES

 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) Jobs posting is not allowed.
 6) Sharing copyrighted material and their links is not allowed.

 NOTE : Don't ever post confidential data in a workbook. Forum owners and
 members are not responsible for any loss.
 ---
 You received this message because you are subscribed to the Google Groups
 MS EXCEL AND VBA MACROS group.
 To unsubscribe from this group and stop receiving emails from it, send an
 email to excel-macros+unsubscr...@googlegroups.com.
 To post to this group, send email to excel-macros@googlegroups.com.
 Visit this group at http://groups.google.com/group/excel-macros.
 For more options, visit https://groups.google.com/groups/opt_out.




  --
 Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s
 =TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @
 https://www.facebook.com/discussexcel

 FORUM RULES

 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) Jobs posting is not allowed.
 6) Sharing copyrighted material and their links is not allowed.

 NOTE : Don't ever post confidential data in a workbook. Forum owners and
 members are not responsible for any loss.
 ---
 You received this message because you are subscribed to the Google Groups
 MS EXCEL AND VBA MACROS group.
 To unsubscribe from this group and stop receiving emails from it, send an
 email to excel-macros+unsubscr...@googlegroups.com.
 To post to this group, send email to excel-macros@googlegroups.com.
 Visit this group at http://groups.google.com/group/excel-macros.
 For more options, visit https://groups.google.com/groups/opt_out.




-- 
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s 
=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ 
https://www.facebook.com/discussexcel

FORUM RULES

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) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.

NOTE  : Don't ever post confidential data in a workbook. Forum owners and 
members are not responsible for any loss.
--- 
You received this message because you are subscribed to the Google Groups MS 
EXCEL AND VBA MACROS group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/groups/opt_out.




Re: $$Excel-Macros$$ Need a Fastest way

2013-06-20 Thread De Premor

How about this macro, is this still to slow for your requirement ?

Sub HiLightSelect()
Dim HiSelect As String
On Error Resume Next
For Each i In Selection
If Len(HiSelect) = 0 Then HiSelect = i.Address Else HiSelect = 
HiSelect  ,   i.Address

Next
Cells(2, 5) = HiSelect
End Sub

Sub HiLightColor()
Dim HiColor As String
Range(B:B).Select
For Each i In Selection
If i.Interior.Color  16777215 Then '16777215 = White / None
If Len(HiColor) = 0 Then HiColor = i.AddressLocal Else 
HiColor = HiColor  ,   i.AddressLocal

End If
If i.Value2 =  Then Exit For
Next
Cells(3, 5) = HiColor
End Sub


On 19/06/2013 19:28, rajan verma wrote:


can anyone suggest a faster way to know which cells are highlighted in 
a Range ?


suppose i  have data of 1 lac cell and i have some cells highlighted , 
i want to know address of that cells.




--
Regards
Rajan verma
+91 9158998701
--
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? 
It’s =TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ 
https://www.facebook.com/discussexcel


FORUM RULES

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) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.

NOTE : Don't ever post confidential data in a workbook. Forum owners 
and members are not responsible for any loss.

---
You received this message because you are subscribed to the Google 
Groups MS EXCEL AND VBA MACROS group.
To unsubscribe from this group and stop receiving emails from it, send 
an email to excel-macros+unsubscr...@googlegroups.com.

To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/groups/opt_out.




--
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s 
=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ 
https://www.facebook.com/discussexcel

FORUM RULES

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) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.

NOTE  : Don't ever post confidential data in a workbook. Forum owners and 
members are not responsible for any loss.
--- 
You received this message because you are subscribed to the Google Groups MS EXCEL AND VBA MACROS group.

To unsubscribe from this group and stop receiving emails from it, send an email 
to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/groups/opt_out.




Re: $$Excel-Macros$$ Need a Fastest way

2013-06-20 Thread Anoop K Sharma
I haven't studied above macro provided by De Premor, Nice work!.
You can make it better by collecting all the highlighted cells address in
different worksheet Or you can also use application.Goto Reference.


On Thu, Jun 20, 2013 at 1:07 PM, De Premor d...@premor.net wrote:

 How about this macro, is this still to slow for your requirement ?

 Sub HiLightSelect()
 Dim HiSelect As String
 On Error Resume Next
 For Each i In Selection
 If Len(HiSelect) = 0 Then HiSelect = i.Address Else HiSelect =
 HiSelect  ,   i.Address
 Next
 Cells(2, 5) = HiSelect
 End Sub

 Sub HiLightColor()
 Dim HiColor As String
 Range(B:B).Select
 For Each i In Selection
 If i.Interior.Color  16777215 Then '16777215 = White / None
 If Len(HiColor) = 0 Then HiColor = i.AddressLocal Else HiColor
 = HiColor  ,   i.AddressLocal
 End If
 If i.Value2 =  Then Exit For
 Next
 Cells(3, 5) = HiColor
 End Sub



 On 19/06/2013 19:28, rajan verma wrote:


 can anyone suggest a faster way to know which cells are highlighted in a
 Range ?

 suppose i  have data of 1 lac cell and i have some cells highlighted , i
 want to know address of that cells.



 --
 Regards
 Rajan verma
 +91 9158998701
 --
 Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s
 =TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @
 https://www.facebook.com/**discussexcelhttps://www.facebook.com/discussexcel

 FORUM RULES

 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) Jobs posting is not allowed.
 6) Sharing copyrighted material and their links is not allowed.

 NOTE : Don't ever post confidential data in a workbook. Forum owners and
 members are not responsible for any loss.
 ---
 You received this message because you are subscribed to the Google Groups
 MS EXCEL AND VBA MACROS group.
 To unsubscribe from this group and stop receiving emails from it, send an
 email to 
 excel-macros+unsubscribe@**googlegroups.comexcel-macros%2bunsubscr...@googlegroups.com
 .
 To post to this group, send email to excel-macros@googlegroups.com.
 Visit this group at 
 http://groups.google.com/**group/excel-macroshttp://groups.google.com/group/excel-macros
 .
 For more options, visit 
 https://groups.google.com/**groups/opt_outhttps://groups.google.com/groups/opt_out
 .



 --
 Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s
 =TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @
 https://www.facebook.com/**discussexcelhttps://www.facebook.com/discussexcel

 FORUM RULES

 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) Jobs posting is not allowed.
 6) Sharing copyrighted material and their links is not allowed.

 NOTE  : Don't ever post confidential data in a workbook. Forum owners and
 members are not responsible for any loss.
 --- You received this message because you are subscribed to the Google
 Groups MS EXCEL AND VBA MACROS group.
 To unsubscribe from this group and stop receiving emails from it, send an
 email to 
 excel-macros+unsubscribe@**googlegroups.comexcel-macros%2bunsubscr...@googlegroups.com
 .
 To post to this group, send email to excel-macros@googlegroups.com.
 Visit this group at 
 http://groups.google.com/**group/excel-macroshttp://groups.google.com/group/excel-macros
 .
 For more options, visit 
 https://groups.google.com/**groups/opt_outhttps://groups.google.com/groups/opt_out
 .





-- 
Regards,
Anoop
Sr. Developer
Facebook ID - https://www.facebook.com/anooop.k.sharma

-- 
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s 
=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ 
https://www.facebook.com/discussexcel

FORUM RULES

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) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.

NOTE  : Don't ever post confidential data in a workbook. Forum owners and 
members are 

$$Excel-Macros$$ Need a Fastest way

2013-06-19 Thread rajan verma
can anyone suggest a faster way to know which cells are highlighted in a
Range ?

suppose i  have data of 1 lac cell and i have some cells highlighted , i
want to know address of that cells.



-- 
Regards
Rajan verma
+91 9158998701

-- 
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s 
=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ 
https://www.facebook.com/discussexcel

FORUM RULES

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) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.

NOTE  : Don't ever post confidential data in a workbook. Forum owners and 
members are not responsible for any loss.
--- 
You received this message because you are subscribed to the Google Groups MS 
EXCEL AND VBA MACROS group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/groups/opt_out.




Re: $$Excel-Macros$$ Need a Fastest way

2013-06-19 Thread VBA VABZ
Hi

Highlighted means cells filled with specific color or selected cells.

Thanks


On Wed, Jun 19, 2013 at 5:58 PM, rajan verma rajanverma1...@gmail.comwrote:


 can anyone suggest a faster way to know which cells are highlighted in a
 Range ?

 suppose i  have data of 1 lac cell and i have some cells highlighted , i
 want to know address of that cells.



 --
 Regards
 Rajan verma
 +91 9158998701

 --
 Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s
 =TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @
 https://www.facebook.com/discussexcel

 FORUM RULES

 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) Jobs posting is not allowed.
 6) Sharing copyrighted material and their links is not allowed.

 NOTE : Don't ever post confidential data in a workbook. Forum owners and
 members are not responsible for any loss.
 ---
 You received this message because you are subscribed to the Google Groups
 MS EXCEL AND VBA MACROS group.
 To unsubscribe from this group and stop receiving emails from it, send an
 email to excel-macros+unsubscr...@googlegroups.com.
 To post to this group, send email to excel-macros@googlegroups.com.
 Visit this group at http://groups.google.com/group/excel-macros.
 For more options, visit https://groups.google.com/groups/opt_out.




-- 
Are you =EXP(E:RT) or =NOT(EXP(E:RT)) in Excel? And do you wanna be? It’s 
=TIME(2,DO:IT,N:OW) ! Join official Facebook page of this forum @ 
https://www.facebook.com/discussexcel

FORUM RULES

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) Jobs posting is not allowed.
6) Sharing copyrighted material and their links is not allowed.

NOTE  : Don't ever post confidential data in a workbook. Forum owners and 
members are not responsible for any loss.
--- 
You received this message because you are subscribed to the Google Groups MS 
EXCEL AND VBA MACROS group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to excel-macros+unsubscr...@googlegroups.com.
To post to this group, send email to excel-macros@googlegroups.com.
Visit this group at http://groups.google.com/group/excel-macros.
For more options, visit https://groups.google.com/groups/opt_out.