Macro - select

P

puiuluipui

Hi, i need an macro to select all filled cells in range C10:K90.
Can this be done?
Thanks!!!
 
J

Jacob Skaria

Range("C10:K90").SpecialCells(xlCellTypeConstants, _
xlNumbers + xlTextValues).Select

If you want to select xlErrors and xlLogical add those to xlNumbers +
xlTextValues
 
P

puiuluipui

It's perfect!
Thanks!

"Jacob Skaria" a scris:
Range("C10:K90").SpecialCells(xlCellTypeConstants, _
xlNumbers + xlTextValues).Select

If you want to select xlErrors and xlLogical add those to xlNumbers +
xlTextValues
Click to expand...
 
P

puiuluipui

Hi, i encountered a problem and i need the macro to select a square from the
first left cell to the last right cell and from the top cell to the bottom
cell.

Can this be done?
Thanks!

"Jacob Skaria" a scris:
 
J

Jacob Skaria

Try the below..

Dim strAddress As String, arrAddress As Variant
strAddress = Range("C10:K90").SpecialCells(xlCellTypeConstants, _
xlNumbers + xlTextValues).Address
arrAddress = Split(Replace(strAddress, ":", ","), ",")
Range(arrAddress(0), arrAddress(UBound(arrAddress))).Select
 

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

Macro to select and delete levels of a document 2
Macro to Select text from a point given to a specific word 2
Select Text to End of Footnote 9
Need Help with Macro Security 1
Drop down list control value in vba 2
Setting language of a selected text in Office apps. 0
MS365 WORD: How to Create Macro Button to CLEAR ALL fields in fill-in form 1
Word VBA Copy Heading and Content 4

Top