Save .sav file as excel with variable descriptions in R

Question

I have a .sav file where the variables have descriptions (they show up as smaller text under variable names on the console in R). Is there a way to save the variable names,