Find all non blank cells

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

I have code that kicks off when a worksheet is activated:

Private Sub Worksheet_Activate()
For Each c In ActiveSheet.UsedRange
If c.Value <> "" Then
CheckValue
End If
Next
End Sub


This works, but takes a few minutes to run, even though there are only
rougly 200 cells with values (the CheckValue sub is tiny) - any suggestions
how to speed this up?

Thank you all!

Andrew
 
You must log in or register to reply here.

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Find all non-blank cells 3
VBA set thick borders around non empty cells in range 0
colore cell based on condition 5
How to obtain what the user has just entered (Activecell not working for me) 2
Compare columns in two WBks and when match is found... 2
Test variable range for 'Delete'; then delete the row 2
Copy filtered data to sheet 2 1
Listbox populated with Sheet Names to Hiughlight Activesheet 2

Back
Top