Microsoft 365 Insérer des lignes prédéfini à la suite

Patoche42 · 8 Décembre 2022

Bonjour à vous,
Je fait encore appel à vos talents.
J'ai un tableau dans l'onglet "vierge"(qui sera maqué par la suite), ce que je souhaites c'est que dans l'onglet "261205" quand je clique sur le bouton ça me duplique le tableau dans "vierge" à la suite de mes données.
J'arrive à dupliquer le tableau mets il me l'insère avant et non pas à la suite et je ne comprend pas pourquoi.
Si vous pouviez vous pencher sur mon cas.
En vous remerciant

vgendron · 8 Décembre 2022

Bonjour

essai avec ceci

VB:

Sub test()
With Sheets("261205")
   ' LastLine = .Range("A" & .Rows.Count).End(xlUp).Row + 1
    LastLine = .UsedRange.Rows.Count + 1
    Range("Vierge").Copy Destination:=.Range("A" & LastLine)
End With
End Sub

vgendron · 8 Décembre 2022

Bonjour

essai avec ceci

VB:

Sub test()
With Sheets("261205")
   ' LastLine = .Range("A" & .Rows.Count).End(xlUp).Row + 1
    LastLine = .UsedRange.Rows.Count + 1
    Range("Vierge").Copy Destination:=.Range("A" & LastLine)
End With
End Sub

Patoche42 · 8 Décembre 2022

Merci pour réponse rapide et ça marche nickel
j'ai remplacé:
With Sheets("261205")
par:
With ActiveSheet
Parce que j'aurai plusieurs onglet.

Merci encore

Microsoft 365 Insérer des lignes prédéfini à la suite

Patoche42

XLDnaute Junior

Pièces jointes

vgendron

vgendron

XLDnaute Barbatruc

Patoche42

XLDnaute Junior

Discussions similaires