Thanks, How to do it with VBA? Kindly help