vba code to Replace a varying-length string of identical characters

[Hermac]

Hello,
I know how to write VBA code in Excel but cannot cope with this.
I have a column with varying text in which de string "-----" appears frequently. The number of consecutive minuses signs may vary from 5 to more than 100. I want these strings either simply removed or replaced by just 3 concecutive minuses.
The series of minuses always occurs in this context : RAM:3-000061184934 -------------------------------------------------- Btw, where the number after RAM.3-varies but always has 12 digits.
Could you give me a helping hand?
Thank you very much.
Herman

 

[diddi]

Sub Repl()
    '3 consec ---
    While InStr(MyStr, "----") > 0
        MyStr = Replace(MyStr, "--", "-")
    Wend
    
    ' or delete all -
    MyStr = Replace(MyStr, "-", "")
    
End Sub

 

[RoryA]

Is the "---" text always at the end of the cell, or can it be followed by other text?

 

[diddi]

i wondered that too. makes Left( ) an easy option

 

[Hermac]

Hello,
I know how to write VBA code in Excel but cannot cope with this.
I have a column with varying text in which de string "-----" appears frequently. The number of consecutive minuses signs may vary from 5 to more than 100. I want these strings either simply removed or replaced by just 3 concecutive minuses.
The series of minuses always occurs in this context : RAM:3-000061184934 -------------------------------------------------- Btw, where the number after RAM.3-varies but always has 12 digits.
Could you give me a helping hand?
Thank you very much.
Herman

Thank you guys, it was simpler than I thought , with an asterisk between RAM.3 and Btw. Thank you anyway!