Dim c As Range
Dim Source As String
Dim Cible As String
Dim Impression As String
Dim Plage As Range
Dim début, fin As Long
Source = Worksheets("FeuilleA").Name
Cible = Worksheets("FeuilleB").Name
Impression = Worksheets("FeuilleC").Name 'La feuille courante, contenant le bouton qui lance cette procédure
début = Sheets(Impression).Range("C4").Value
fin = Sheets(Impression).Range("C5").Value
Set Plage = Sheets(Impression).Range(Cells(début + 1, 1), Cells(fin + 1, 1))