Macro - select

  • Thread starter Thread starter puiuluipui
  • Start date Start date
P

puiuluipui

Hi, i need an macro to select all filled cells in range C10:K90.
Can this be done?
Thanks!!!
 
Range("C10:K90").SpecialCells(xlCellTypeConstants, _
xlNumbers + xlTextValues).Select

If you want to select xlErrors and xlLogical add those to xlNumbers +
xlTextValues
 
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...
 
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:
 
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
 
Back
Top