agnesz
07-31-2007, 01:06 PM
Hello there -
I have this code which selects various cells in one workbook and each cell needs to say a particular word. This code works, but I have a feeling that there's a much quicker and simpler way of writing it. Any thoughts?
This is what I'm currently using...
Range("B1").Select
ActiveCell.Formula = "MCE"
Range("d1").Select
ActiveCell.Formula = "MCE"
Range("f1").Select
ActiveCell.Formula = "MCE"
Range("h1").Select
ActiveCell.Formula = "MCE"
Range("j1").Select
ActiveCell.Formula = "MCE"
Range("l1").Select
ActiveCell.Formula = "MCE"
Range("n1").Select
ActiveCell.Formula = "MCE"
Range("p1").Select
ActiveCell.Formula = "MCE"
Range("r1").Select
ActiveCell.Formula = "MCE"
Range("t1").Select
ActiveCell.Formula = "MCE"
Range("v1").Select
ActiveCell.Formula = "MCE"
I have this code which selects various cells in one workbook and each cell needs to say a particular word. This code works, but I have a feeling that there's a much quicker and simpler way of writing it. Any thoughts?
This is what I'm currently using...
Range("B1").Select
ActiveCell.Formula = "MCE"
Range("d1").Select
ActiveCell.Formula = "MCE"
Range("f1").Select
ActiveCell.Formula = "MCE"
Range("h1").Select
ActiveCell.Formula = "MCE"
Range("j1").Select
ActiveCell.Formula = "MCE"
Range("l1").Select
ActiveCell.Formula = "MCE"
Range("n1").Select
ActiveCell.Formula = "MCE"
Range("p1").Select
ActiveCell.Formula = "MCE"
Range("r1").Select
ActiveCell.Formula = "MCE"
Range("t1").Select
ActiveCell.Formula = "MCE"
Range("v1").Select
ActiveCell.Formula = "MCE"