Tengo una hoja de Excel cargada con un conjunto dinámico de resultados de datos. Necesito agregar un menú desplegable SÍ / NO al final de cada fila una vez que se cargan todos los datos. Tengo que hacer esto dinámicamente ya que no sé el tamaño del conjunto de resultados de antemano. El siguiente código arroja un 'error definido por Applicaton o definido por objeto':

Dim firstRow As Integer
Dim lastRow As Integer
Dim I As Integer
Dim VOptions As String
VOptions = "1. Yes, 2. No"

firstRow = GetResultRowStart.row + 1
lastRow = GetResultRowStart.End(xlDown).row

For I = firstRow To lastRow

Range("AO" & firstRow & ":AO" & lastRow).Select

With Selection.Validation
    .Delete
    .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
    xlBetween, Formula1:=VOptions
    .IgnoreBlank = True
    .InCellDropdown = True
    .InputTitle = "Options"
    .ErrorTitle = ""
    .InputMessage = "Click yes or no"
    .errorMessage = ""
    .ShowInput = True
    .ShowError = True
End With


 Next I

El método GetResultRowStart me da la fila que comienza, cuyos datos de resultados se rellenan en la hoja. También he usado este método en otra parte del código y funciona perfectamente. La depuración mediante cuadros de mensaje sugirió que se arroje un error en la declaración Range (..). Select.

Cualquier idea sobre la causa de este error.