VBA coding - Select the first blank cell after a filter

[Johns90]

Hello,

I don't find in the Forum and i am looking a VBA code to select the First blank cell after a filter in the colmun A in order to copy some data.
please find the code who is not working :
Range("A2", Cells(Rows.Count, "A").End(xlDown)).SpecialCells(xlCellTypeVisible).Cells(1, 1).Offset(0, 0).Select

Thanks for your help

 

[DanteAmor]

Try this:

ActiveSheet.AutoFilter.Range.Range("A:A").SpecialCells(xlCellTypeVisible).SpecialCells(xlCellTypeBlanks).Cells(1).Select

Note: If there are no blank cells in the filtered data, an error occurred.