Glisser formules automatiquement jusqu'à la fin d'un tableau non contigue

Bonjour,

Petit appel à l'aide pour faire fonctionner ma macro.

Je veux glisser automatiquement des formules dans un tableau. Cette copie dois se faire jusqu'à la fin d'un tableau. Celui--ci n'est pas contigue car une colonne de visuel les sépare.

Cela doit être simple pour les experts. Etant novice je fais appels aux lmeilleurs d'entre vous.

Un fichier valant mieux que tous les discours :

Merci d'avance pour votre retour

Bonjour,

Pas tout tout compris mais après avoir sélectionné la plage A3:D3(1) tu doubles cliques gauche sur le petit carré pour tirer(2) ? Ou j'ai loupé un épisode ?

Cdlt,

Bonjour,

Il s'agit bien de cela dans le principe.

Comment le traduire dans une macro en VBA ?

Merci pour votre retour.

Bonjour,

Sur la base que la 8ème colonne s'étend jusqu'à la dernière ligne à remplir :

Sub REMP()
Dim LR%
LR = ActiveSheet.Cells(ActiveSheet.Rows.Count, 8).End(xlUp).Row
Range("A4:D" & LR).FillDown
End Sub

Cdlt,

Bonjour,

J'ai du mal à intégrer cela dans une macro plus goblale.

Dans le fichier suivant j'ai besoin de glisser les formules de :

feuille visserie a3:f3 et P3:U3

feuille panneau a3:f3 et p3:u3 puis trier l'ensemble des lignes de xcette feuille par couleur puis référence croissante

Idélament je voudrais ensuite en faire des zones d'impression pour chaque feuille allant des colonne A à U et descendant jusqu'à la dernière ligne.

Je vous remercie par avance pour votre aide.

Bonjour,

Ci-contre le code corrigé :

Sub MEF()
Dim LR%, FEUILLE As Variant
Dim FEUILLES()
FEUILLES = Array("Panneaux", "Visserie")
For Each FEUILLE In FEUILLES
    With Worksheets(FEUILLE)
        LR = .Cells(.Rows.Count, 8).End(xlUp).Row
        .Range("A3:F" & LR).FillDown
        .Range("P3:U" & LR).FillDown
    End With
Next FEUILLE
End Sub

Pour la suite je vous conseille d'ouvrir un nouveau sujet, n'ayant plus de lien avec l'intitulé du sujet. Par contre vous nous demandez de trier par référence, or il s'agit de formules, donc les références vont changer systématiquement ... Je vous laisse y réfléchir avant de poster votre nouveau sujet.

Cdlt,

Un grand merci.

Cela fonctionne !