Sujet Précédent Sujet Suivant

Excel:Macro Remplir 1 colonne jusqu'à la dernière ligne de donné

Résolu/Fermé
BILLING Messages postés 162 Date d'inscription vendredi 4 mai 2012 Statut Membre Dernière intervention 31 mars 2021 - 3 oct. 2012 à 14:28
BILLING Messages postés 162 Date d'inscription vendredi 4 mai 2012 Statut Membre Dernière intervention 31 mars 2021 - 3 oct. 2012 à 16:22
Bonjour,

J'ai un fichier Excel pour lequel j'ai créé une macro assez complexe: elle insère des colonnes, ajoute des titres de colonnes sur la première ligne et des formules dans la 2ième cellule des colonnes insérées.

Ce fichier est mis à jours de façon hebdomadaire et de nouvelle données (lignes) s'ajoutent à chaque fois.

J'ai besoin de copier mes formules ajoutées sur la ligne 2 des colonnes insérées jusqu'à la dernière ligne de donnée. C'est long à faire manuellement. J'aimerais ajouter cette fonction à ma Macro. Mais pour éviter que le fichier devienne trop lourd, j'insisterais, si possible, pour que les formules se copient vraiment jusqu'à la dernière ligne de donnée, qui varie à chaque semaine.

Est-ce possible? Est-ce que la publication d'un fichier échantillon est nécessaire?

Merci :-)


A voir également:

2 réponses

Réponse 1 / 2
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303
3 oct. 2012 à 15:10
Bonjour
exemple avec 1° colonne "A" remplie et formule bidon 

derlig = Columns("A").Find("*", , , , , xlPrevious).Row
    With Range("B2")
          .FormulaLocal = "=A2+A1"
          .AutoFill Destination:=Range("B2:B" & derlig)
    End With

1
eriiic Messages postés 24570 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 23 avril 2024 7 213
3 oct. 2012 à 15:13
tiens, bonjour michel, content que tu sois là :-)
Je t'envoie un test à faire en mp si tu veux bien
eric
0
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 303
3 oct. 2012 à 15:20
Bonjour Eric

OK, je repasse + tard
ad'taleur
0
BILLING Messages postés 162 Date d'inscription vendredi 4 mai 2012 Statut Membre Dernière intervention 31 mars 2021 48
3 oct. 2012 à 15:58
Michel,

J'essais d'intégrer ta synthaxe dans ma Macro mais mon Visual Basic est en anglais. Je ne sais pas ce qu'est "derlig". Peux-tu m'aider?

Merci
0
BILLING Messages postés 162 Date d'inscription vendredi 4 mai 2012 Statut Membre Dernière intervention 31 mars 2021 48
3 oct. 2012 à 16:22
Michel,

Avec un peu de persévérance, J'ai réussi à intégrer ta syntaxe. Je devais la manipuler un peu car je n'utilise pas FormulaLocal. Faut comprendre que je suis une autodidacte avec Excel. Mais j'adore :-)

Je vais appliquer cette syntaxe au reste de mon fichier

Merci!
0
Réponse 2 / 2
BILLING Messages postés 162 Date d'inscription vendredi 4 mai 2012 Statut Membre Dernière intervention 31 mars 2021 48
3 oct. 2012 à 14:56
Une information qui va peut-être vous aider avec ma question: La première colonne est toujours remplir de données sans exception, aucune cellule vide dans la colonne 1. J'ai pensé que peut-être une constante pourrait être utilisée comme paramettre pour que la macro sache où arrêter de copier les formules.
0