René Nyffenegger's collection of things on the web
René Nyffenegger on Oracle - Most wanted - Feedback -
 

range cells [Excel macro]

option explicit

' A range can be constructed from two cells:
public sub range_cells()

  dim c1 as excel.range
  dim c2 as excel.range

  set c1 = cells(3,2)
  set c2 = cells(5,6)

  c1.value = "top left"
  c2.value = "bottom right"

  dim sel_interior as interior

  range(c1, c2).select
  set sel_interior = selection.interior

  sel_interior.colorIndex = 6
  sel_interior.pattern    = xlSolid

  range("a1").select

end sub