Cats is a nice way to go but it can be done via the Standard Library without too much complication.
import util.{Try, Success, Failure}
def seqnc[T](lst :List[Try[T]]) :Try[List[T]] =
lst.foldRight(Try(List.empty[T])) {
case (tt, acc) => for { t <- tt
a <- acc
} yield t :: a
}