sostituisci Now con Date
If (Date + 30) = cell.Value And cell.Offset(0, 1).Value Like "*@*" Then
sul mio pc funzionano ambedue le porte 465 e 587, per Aruba documentati
[Modificato da patel45 27/11/2016 12:54]
----------
Win 10 - Excel 2010
allega un file di esempio, guadagnerai tempo tu e lo farai risparmiare a chi ti aiuta