Bonjour,
Avec 365 utilisez power query
sinon pour la première question, une simple concatenation :
FileName: = "\\C\Downloads\EXPORT BILL " & Format(Sheets("LaFeuille").Range("B3"),"0000") & ".xlsx"
Pour la seconde si le tableau est commence en A1 : Range("A1").CurrentRegion