Auto fill VBA

Bonjour,

Je rencontre un problème avec mon fichier excel. Je travaille sur un document avec un nombre de ligne variable et avec deux feuilles je crée une base de données. Le problème c'est que dans mes colonnes de A à O j'ai différentes formules (Index, quix, rechercher v) pour récupérer les données dont j'ai besoin.

Pour récupérer toutes ces données je veux faire un autofill donc j'ai commencé à bricoler quelques choses. Je vais dans la feuille Seg pour séléctionner la colonne A1 (où je sais que j'ai le nombre maximum de lignes) puis je la copie colle En P sur ma base de données. Ensuite je sélectionne de A à O pour autofill sauf que je n'arrive pas à récupérer la dernière ligne de la colonne P pour autofill. (Enfin je supprime la colonne P pour garder que ce dont j'ai besoin)

Je sais que de base ma solution idéal mais je débute en VBA.

Ci dessous mon code :

' Pour autofill

Sheets("SEG").Select

Range("A1").Select

Range(Selection, Selection.End(xlDown)).Select

Selection.Copy

Sheets("BDD").Select

Range("P1").Select

ActiveSheet.Paste

Range("A1:O1").Select

Application.CutCopyMode = False

Selection.AutoFill Destination:=Range("A1:O14415")

Range("A1:O14415").Select

Columns("P:P").Select

Selection.Delete Shift:=xlToLeft

Si quelqu'un peut m'aider à régler mon problème, merci par avance.

Bonjour,

Plutôt que de faire autofill il suffit parfois de faire un tableau structuré, ainsi les nouvelles lignes héritent des formules.

Sinon poste un fichier représentatif de ce que tu souhaites.

Bonjour,

Voici le fichier sans les de A à O mais l'idée est là

Merci par avance.

Exemple avec formule dans des tableaux structurés.

L'ajour d'une nouvelle ligne hérite des formules déjà présentes.