Insert TEXT down to last row of data using VBA?

[evenyougreg]

Hello,

I am simply trying to insert the text "accepted" into every cell of column B AND C (I know this may seem weird but it's what I need), until the last row of data in A.

I have some VBA code to achieve this with a formula, but in this case I only need text.

I would like to avoid copy and pasting, because the text is not there to begin with. Let me know if I am not being clear enough.

Any help would be appreciated! I am brand new to this forum

Greg

 

[Fluff]

How about

Sub evenyougreg()
   Range("B1:C" & Range("A" & Rows.Count).End(xlUp).Row).Value = "Accepted"
End Sub

 

[evenyougreg]

How about

Sub evenyougreg()
   Range("B1:C" & Range("A" & Rows.Count).End(xlUp).Row).Value = "Accepted"
End Sub

This worked exactly as I needed.

I would likely have been ridiculed on Stack Overflow for asking this question, so I thank you!!

 

[Fluff]

You're welcome & thanks for the feedback.