dario gutierrez

Tengo esta macro Ub enviar() Sheets("Control de alquiler").Select ufila = Range("A" & Rows.Count).End(xlUp).Row For i = 4 To ufila If Cells(i, 14) <= Cells(i, 15) Then Set parte1 = CreateObject("outlook.application") Set parte2 =...