formula or macro to analyze dimensions

[Kermy812]

Can any one help me with a formula or macro to analyze dimensions?
My column has many sizes listed, but I need to change it or mark in another column that it's too big fit in my area of 12.375x18.375.
For instance, I have these sizes below, they would be marked too big cause they don't fit:

18x18​

10x55​

20x2.5​

20x.75​

5x24
32x10​

I'm just doing a macro with a simple find & replace now, but I have about 50ish find/replaces and my list keeps growing:

Columns("K:K").Select​

Selection.Replace What:="18x18", Replacement:="TOO BIG", LookAt:=xlPart, _​

SearchOrder:=xlByRows, MatchCase:=False​

These sizes would be left alone or not noted as they would fit:

5.5x7​

11x17​

8.5x11​

2x18​

12x18​

18x12 (this would fit, cause it would be rotated to 12x18 fit my area)​

I think the logic would be:
if the number on either side of the "x" is greater than 18.375 then text "TOO BIG"

or​

if both numbers on either side of the "x" are greater than 12.375 then text "TOO BIG"

Any help would be appreciated...

 

[JoeMo]

Here's a user-defined function (UDF) you can use just like a worksheet function after you install it.

Excel Workbook
	B	C
1	18x18	Too Big
2	10x55	Too Big
3	20x2.5	Too Big
4	20x.75	Too Big
5	5x24	Too Big
6	32x10	Too Big
7	5.5x7	OK
8	11x17	OK
9	8.5x11	OK
10	2x18	OK
11	12x18	OK
12	18x12	OK
1025-ZUT-abc-A

Function TooBigTest(S As String) As String
Dim V As Variant
If S = "" Then
    TooBigTest = ""
    Exit Function
End If
V = Split(S, "x")
If V(0) > 12.375 And V(1) > 18.375 Then
    TooBigTest = "Too Big"
    Exit Function
ElseIf V(0) > 18.375 Or V(1) > 18.375 Then
    TooBigTest = "Too Big"
    Exit Function
ElseIf V(0) > 12.375 And V(1) > 12.375 Then
    TooBigTest = "Too Big"
    Exit Function
End If
TooBigTest = "OK"
End Function

 

[Kermy812]

Thanks Joe! This worked Great!
I did tweak a little bit as the first as "if" statement wasn't needed, then to return the values if not "too big", so I can sort later:

Function TooBigTest(S As String) As StringDim V As Variant
If S = "" Then
    TooBigTest = ""
    Exit Function
End If
V = Split(S, "x")


If V(0) > 18.375 Or V(1) > 18.375 Then
    TooBigTest = "TOO BIG"
    Exit Function
ElseIf V(0) > 12.375 And V(1) > 12.375 Then
    TooBigTest = "TOO BIG"
    Exit Function
End If
TooBigTest = S
End Function

So my results on column B would be:

A	B
3x5	3x5
5x7	5x7
32x10	TOO BIG
8.5x11	8.5x11
12x18	12x18
18x12	18x12
13x13	TOO BIG
13x2	13x2

<tbody>
</tbody>

Again, thanks a bunch, I really appreciate it!