Microsoft Office Forums - View Single Post - [Solved] find and replace a number that's always in a table and always adjacent to a cell with known text

mbcohn · 03-31-2021, 09:55 PM

Okay, that worked.

It turned out that sometimes there is a space after "published," and sometimes there isn't. So what I did is:

Code:

Case "Published "
              If .Cells(1).ColumnIndex = 1 Then
                .Cells(1).Next.Range.Text = "2 April 2021"
              End If
            Case "Published"
              If .Cells(1).ColumnIndex = 1 Then
                .Cells(1).Next.Range.Text = "2 April 2021"
              End If

Would you mind providing some guidance on what this means?

Code:

.Text = "[PR][eu][bv][ils]{3}[ehno]{2}[ Ndo]{1,3}"