# Posts by Fluff13

• ## Error capture for null/no search entry

You need to move the check for A10 being empty, before you try to find the value in the data sheet.

• ## Sum of a column and column total showing different results

You're welcome & thanks for the feedback.

• ## Sum of a column and column total showing different results

Row 722 has a row height of 0, which is the cause of the discrepancy

• ## Apostrophe Issue with Character Count

Probably a different type of apostrophe.

What does =CODE(MID(A1,6,1)) return?

146, 39 or something else.

• ## Problem with COUNTIFS formula, dosnt show proper results

In that case can you please supply a sample workbook.

• ## Problem with COUNTIFS formula, dosnt show proper results

If the nickname is in column F why is the formula looking at column T?

• ## Help with Macro to select dynamic range

You're welcome & thanks for the feedback.

• ## Medain if formula not working

=MEDIAN(IF((\$A\$2:A\$360=I2)*(\$B\$2:B\$360=J2)*(\$C\$2:C\$360=K2),\$F\$2:F\$360))

May need CSE entry depending on your version of Excel.

• ## Help with Macro to select dynamic range

Hi & welcome to the board.

Code
``````Sub tmyflyte()
Dim UsdRws As Long

UsdRws = Range("U:U").Find("*", , xlValues, , xlByRows, xlPrevious, , , False).Row
If UsdRws > 9 Then Range("U9:AS" & UsdRws).Copy
End Sub``````
• ## Slicing A 2d Array

You're welcome & thanks for the feedback.

• ## Slicing A 2d Array

I'm still none the wiser, about what you are trying to do, but as far as I know you cannot use Index on a jagged array the way you are trying to do.

• ## Slicing A 2d Array

In that case can you please supply a workbook, with your data & complete code.

• ## Slicing A 2d Array

Not entirely sure what your aim is, but you can retrieve certain columns from an array like

Code
``````   Dim a As Variant, b As Variant
a = Range("A1:Z20").Value
b = Application.Index(a, Evaluate("row(1:" & UBound(a) & ")"), Array(2, 3, 4))``````
• ## Advanced Filter with dynamic CopyToRange

Glad you sorted it & thanks for the feedback.

• ## Advanced Filter with dynamic CopyToRange

Make sure that the headings in Rows 1 & 7 exactly match the headings of your data.

• ## Advanced Filter with dynamic CopyToRange

Odd, it works for me, can you supply a copy of your workbook?

• ## How do I copy the first instance of all duplicate values for a range in a column and paste those values into a different column? What's the VBA code for this?

You're welcome & thanks for the feedback.

I've learnt most of what I know through helping out on sites like this.

• ## How do I copy the first instance of all duplicate values for a range in a column and paste those values into a different column? What's the VBA code for this?

That's the name of the workbook not the sheet, change it to Sheet1

• ## Advanced Filter with dynamic CopyToRange

Code
``````Sub sleeplol()
Dim Rng As Range

With Sheet16
Set Rng = .Range("J7", .Cells(7, Columns.Count).End(xlToLeft))
End With