Discussion :

[fred2312]

Bonjour,

je chercherais a modifier sur ce fichier les formules excel en VBA pour allèger un fichier, je joins un fichier en exemple.
j'ai un nombre de colonnes illimités

j'aimerai modifier les colonnes de A à F pour obtenir les colonnes GIKLMN (colonnes en bleues) .

Merci de votre aide

[kiki29]

Salut, à lire et pratiquer
Ecrire une formule dans Excel à l'aide d'une procédure VBA
Ecrire une formule dans Excel à l'aide d'une procédure VBA (Part 2)

[Menhir]

je joins un fichier en exemple.

A lire aussi : https://www.developpez.net/forums/d8...s-discussions/

[BENNASR]

Bonjour
Regarde coté Enregistreur Automatique
- Place ton curseur en colonne G2
- Démarre l'enregistreur automatique des macro
- Tu aura un code sur plateau
voila comme exemple le colonne G2

Code :

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

1
2
3
4
5
6
7
8
9
Sub Testt()
With Worksheets("Feuil1")
derlig = .Range("A" & Rows.Count).End(xlUp).Row 'pour chercher la dernière ligne non vide
    Range("G2").Select
    ActiveCell.FormulaR1C1 = "=DATE(LEFT(RC[-6],4),MID(RC[-6],5,2),RIGHT(RC[-6],2))" 'c'est le code obtenu via l'enregistreur auto
    Range("G2").Select
    Selection.AutoFill Destination:=Range("G2:G" & derlig), Type:=xlFillDefault 'juste pour copier la formule jusqu'au dernière ligne non vide
End With
End Sub

Bonne journée

[fred2312]

Merci BENNSAR pour ta réponse.
J'avais deja fait quelques test en employant ta méthode, mais le problème c'est que ca me met des formules dans mon fichier et c'est cela que je voudrais eviter pour que je puisse allèger mon fichier au maximun.
Car j'ai un gros fichier excel avec plusieurs feuilles issu d'extraction et j'aimerai que le fichier final s'ouvre plus vite, c'est pour cela que je pense que des formules VBA pourrai me renvoyer du texte au lieu de formules.

Merci bcp