View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.programming
Solutions Manager Solutions Manager is offline
external usenet poster
 
Posts: 27
Default code snippet below. Is there a shorter way to do this type of

thank you. Just trying to shorten code where possible.
I also just had an idea that seemed to also work. I changed line one to all
the items separated by a comma, then used the text to columns command. the
resulting macro code was shorter...

"JBeaucaire" wrote:

Since every cell is different, you do have to address each event, so the # of
lines probably can't shorten. But since there are no formulas to deal with,
you could change all the FormulaR1C1 references to just Value, like the first
line.
--
"Actually, I *am* a rocket scientist." -- JB

Your feedback is appreciated, click YES if this post helped you.


"Solutions Manager" wrote:

Range("A1").Value = "email"
Range("B1").FormulaR1C1 = "type"
Range("C1").FormulaR1C1 = "employer_name"
Range("D1").FormulaR1C1 = "employer_url"
Range("E1").FormulaR1C1 = "employer_category"
Range("F1").FormulaR1C1 = "employer_logo"
Range("G1").FormulaR1C1 = "employer_bio"
Range("H1").FormulaR1C1 = "first_name"
Range("I1").FormulaR1C1 = "last_name"
Range("J1").FormulaR1C1 = "address_1"
Range("K1").FormulaR1C1 = "address_2"
Range("L1").FormulaR1C1 = "city"
Range("M1").FormulaR1C1 = "state"
Range("N1").FormulaR1C1 = "zip"
Range("O1").FormulaR1C1 = "password"