Bonjour à tous, après beaucoup de recherche et d'essai, je me retourne vers vous pour mon problème presque réglé.

Je veux enregistrer une plage de cellule (A4 à F60) dans une fichier texte avec l'extention .prg et comme nom de fichier le nom d'une cellule (B4).

J'ai réussi à trouver une macro, et je l'ai modifié un peu, mais elle ne sauvegarde seulement une plage de la rangée A. (A4 à A59)

Merci de me corriger, je suis vraiment pas fort en VBA.
Je suis avec excel 2010

Voici ma macro :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Sub SAVE_Range_txt()
    Sheets("1 ROUGH + 1 FINISH").Select
    Dim FileName As String
    Dim FileNumber As Integer
 
   FileName = "C:\zzz\" & Range("B4").Value & ".prg"
   FileNumber = FreeFile()
   Open FileName For Output As #FileNumber
   For Row = 4 To 59
      Print #FileNumber, Cells(Row, 1).Value
 
   Next
   Close #FileNumber
End Sub