OVH Cloud OVH Cloud

Macro insertion de ligne

1 réponse
Avatar
Raissac
Bonjour,

je cherche a faire une macro qui insere une ligne en bas d'un tableau, et
qui reprend la mise en forme et les formules de la derniere ligne du tableau,
sans reprendre les valeurs... Que faire??

Merci de votre aide

Romain

1 réponse

Avatar
AV
A supposer le tableau en A1:Dxx (à adapter)

Sub zzz()
derL = [A65536].End(3).Row
Range("A" & derL & ":D" & derL).Copy Range("A" & derL + 1 & ":D" & derL + 1)
Range("A" & derL + 1 & ":D" & derL + 1).SpecialCells(xlCellTypeConstants,
23).ClearContents
End Sub

AV