Discussion :

[guigui1976]

Bonjour, j'ai mon fichier qui utilise les 256 colonnes, à l'heure actuelle je fais une copie d'un fichier vierge que j'utilise à son tour.
Je me demande si il est possible de "faire" en automatique ceci:
1-Selectionner la colonne d:gu
2-de copier l'ensemble de la selection dans un nouveau fichier ex:
sauvegarde du 25/09/09.
3-de faire "glisser" les colonnes de gv:iv vers d
4-et pour finir d'etendre l'ensemble des formules qui étaient en iv vers la fin du fichier.

A votre avis ceci est-il possible ? et comment?

[guigui1976]

bon voici le code pour l'archivage

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Dim strDate As String
Application.DisplayAlerts = False
Count = Len(ActiveWorkbook.Name)
Nom = Left(ActiveWorkbook.Name, Count - 4)
strDate = Format(Now, "dd-mm-yyyy-h-mm")
ThisWorkbook.SaveCopyAs Filename:="sauvegarde oxydation" & "-" & strDate & ".xls"
Application.DisplayAlerts = True

ce qui nous donne dans le repertoire d'enregistrement d'excel le fichier "sauvegard oxydation 28/09/09 7:23"

ensuite je fais une copie de mes cellules qui sont en iv
coller en d
et pour finir un clearcontents pour effacé le tous de e:iv