Uppercase next Lowercase

[Manolocs]

Hello, I have to search a long list only column A if there is any word with an Uppercase letter following by the second in Lowercase. Difficult to explain....
Column.........................Column
A.......................................B
Doris Angel.........................""
Ruper michael................Check This
Barack obama................Check This
Ryan Thomas......................""

I know how to capitalize the first letter of the words, but some of them can not be capitalized so I need to check if need or not. Thanks in advance.

 

[JimM]

Not sure it will cover all eventualities but this may help

=IF(CODE(MID(A1,FIND(" ",A1)+1,1)) > =97,"Check","OK")

 

[FormR]

Here is another possible option based on the examples:

Excel 2013
	A	B
2	Doris Angel
3	Ruper michael	Check This
4	Barack obama	Check This
5	Ryan Thomas
Sheet1

Cell Formulas
Range	Formula
B2	=IF(EXACT(A2,PROPER(A2)),"","Check This")

 

[Manolocs]

Hi Jim It results an #ERROR

 

[Manolocs]

Hi FormR, it returns all cells as "Check This", there are words that all letters as in Uppercase and the next word is not.

 

[FormR]

it returns all cells as "Check This", there are words that all letters as in Uppercase and the next word is not.

Can you post some representative examples?

 

[Manolocs]

Like: JOHN andersen, MIKE HUGHS, CARLS Clark.
In some cells there is "/" like MARY/PETER Dustin

 

[Fishboy]

Possible VBA solution, assuming the values are all in column A:

Sub FlagIncorrectCase()
Application.ScreenUpdating = False
Dim SecondWord As String
Dim Result As String
Dim Cell As Range, cRange As Range
LastRow = ActiveSheet.Cells(Rows.Count, "A").End(xlUp).Row
        Set cRange = Range("A1:A" & LastRow)
            For Each Cell In cRange
                SecondWord = Cell.Value
                    Result = Trim(Split(SecondWord, " ")(1))
                        Cell.Offset(0, 1).Value = Result
                                    If UCase(Left(Cell.Offset(0, 1), 1)) = Left(Cell.Offset(0, 1), 1) Then
                                        Cell.Offset(0, 1).Value = ""
                                    Else
                                        Cell.Offset(0, 1).Value = "Check This"
                                    End If
            Next Cell
Application.ScreenUpdating = True
End Sub

 

[FormR]

Like: JOHN andersen, MIKE HUGHS, CARLS Clark.
In some cells there is "/" like MARY/PETER Dustin

Hi, please post a good representative set of the different possible options and the expected outcome for each

 

[XOR LX]

@FormR

Perhaps you can start a thread to find the 50th using Excel functions only?

Regards