Petite question subsidiare,
du à une certaine doléance dont je me serais bien passé je dois incorporer certaines lignes, exemple copier des colonnes et les remplacer par des valeurs. Comment mettre ca en moins de lignes possibles
Columns("AH:AO").Select
Application.CutCopyMode = False
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Et puis remplacer dans une zone certains libellés ( [Calcul Cadrages TVA DidierD 06 v3.xlsm] ) par rien
Le mot à mot donne ca :
Rows("1:280").Select
Selection.Replace What:="[Calcul Cadrages TVA DidierD 06 v3.xlsm]", _
Replacement:="", LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:= _
False, SearchFormat:=False, ReplaceFormat:=False
Mais y aurait'il moyen là aussi de réduire les lignes ?
Merci