Вы через VBA пытаетесь решить задание или стандартными функциями?