Removing 1st character in a string

[bobkap]

I have a column of different 3-digit numbers that are preceded by the "#" sign. I want to remove just the # sign. I've listed the code below that I am using. Every time I run it, it does remove the # sign, BUT it also replaces the 3-digit number with some single digit arbitrary number that does not contain any of the same digits as the original number. Staring at this for over an hour now does not seem to fix the problem. Any help would be greatly appreciate.

bk4 = Application.match("Item #", Range("1:1"), 0)
finalrow = Cells(Rows.Count, 1).End(xlUp).Row
For counter5 = finalrow To 2 Step -1
Cells(finalrow, bk4) = Left(finalrow, 1)
finalrow = finalrow - 1
Next counter5

 

[Joe4]

Please post a sample of your data and expected output.

 

[Fluff]

Try

Cells(finalrow, bk4) = mid(Cells(finalrow, bk4),2)

 

[bobkap]

Cells(finalrow, bk4) = mid(Cells(finalrow, bk4),2)

THAT DID IT!! You've saved the day again. Thanks very much. I just wished I could figure some of these things out myself.

 

[bobkap]

Please post a sample of your data and expected output.

Thanks Joe4 but Fluff was able to help me.

 

[Fluff]

Glad we could help & thanks for the feedback.

 

[Rick Rothstein]

I would think these two lines of code is all you need...

  bk4 = Application.Match("Item #", Range("1:1"), 0)
  Range(Cells(2, bk4), Cells(Rows.Count, bk4).End(xlUp)).Replace "#", "", xlPart, , , , False, False