XL 2016 En vba Recuperer une valeur d'un tableau pour etirer formule d'un autre onglet

polyteis

XLDnaute Occasionnel
Bonjour,

Je voudrais me servir de la valeur de la derniere ligne de l'onglet GP, dans mon exemple 16,
Et me servir de cette donnée pour etirer dans l'onglet liste ,le tableau qui ne compte que 9 lignes
Tout cela en vba

Merci
 

Pièces jointes

  • copie.xlsx
    9.6 KB · Affichages: 4

vgendron

XLDnaute Barbatruc
bonjour

une proposition avec cette macore
VB:
Sub etirer()
With Sheets("GP") 'dans la feuille GP
    LastLine = .Range("A" & .Rows.Count).End(xlUp).Row 'dernière ligne NON vide de la colonne A
End With
With Sheets("Liste") 'dans la feuille Liste
    .Range("A3:D3").AutoFill Destination:=.Range("A3:D3").Resize(LastLine - 2) 'on etire la plage A3:D3 de LastLine-2 (-2 parce que les premières formules sont en ligne 3)
End With
End Sub
 

Discussions similaires

Statistiques des forums

Discussions
312 211
Messages
2 086 295
Membres
103 171
dernier inscrit
clemm