Remove last (/) from my URL

[Kamranas]

I need an Excel VBA code That only removes the last slash(/) from my URL.
Column B, I need a dynamic range, not a static range
It is not necessary for every URL has a slash at last.


more details
I need an Excel VBA code That only removes the last slash(/) from my URL.
I am not want to remove the slashes between the URL.
Important to remember just remove the last slash /, not any other number or alphabet.
I need a dynamic range.

 

[Rick Rothstein]

Is there always (every cell) a slash at the end of the text? Or could some of the cell not end with a slash?

 

[Kamranas]

Is there always (every cell) a slash at the end of the text? Or could some of the cell not end with a slash?

No, not every cell contains /

 

[Kamranas]

Is there always (every cell) a slash at the end of the text? Or could some of the cell not end with a slash?

some of the cell not end with a slash?

 

[Kamranas]

No, not every cell contains /

i need a dynamic range sir,for Column B

 

[Rick Rothstein]

Assuming the first cell for the range is cell C3...

Dim Cell As Range
For Each Cell In Range("C3", Cells(Rows.Count, "C").End(xlUp))
  If Cell.Value Like "*/" Then Cell.Value = Left(Cell.Value, Len(Cell.Value) - 1)
Next

 

[Peter_SSs]

Another option would be to do them all at once. I have assumed, per your sample data, no blank cells among the range.

Sub RemoveSlash()
  With Range("B1", Range("B" & Rows.Count).End(xlUp))
    .Value = Evaluate(Replace("if(right(#,1)=""/"",left(#,len(#)-1),#)", "#", .Address))
  End With
End Sub

 

[Rick Rothstein]

Another option would be to do them all at once. I have assumed, per your sample data, no blank cells among the range.

Sub RemoveSlash()
  With Range("B1", Range("B" & Rows.Count).End(xlUp))
    .Value = Evaluate(Replace("if(right(#,1)=""/"",left(#,len(#)-1),#)", "#", .Address))
  End With
End Sub

What is the # sign and will it work in XL 2016?

 

[Peter_SSs]

What is the # sign

Just a place-holder for the range address

and will it work in XL 2016?

I don't see any reason why not, it's the same vba that has been around for years.

 

[Rick Rothstein]

Just a place-holder for the range address

I'm an idiot! I did not look at the last part of your code line so I was thinking you were trying to use some kind of dynamic cell reference.