Índice

Solución 20.2 Buscar un valor con duplicados en un rango de datos

Sub BusquedaCompleja()  
  Dim dblMax As Double  
  Dim rngCelda As Range  
  Dim intLinea As Integer  
  dblMax = Range("C18").Value  
  intLinea = 4  
  With ...