Re : Insertion colonne et mise en forme
En l´occurence, j´ai besoin d´une petite explication de la formule...
Voici ce que j´ai, après l´avoir adaptée à mon tableau :
Sub Button23_Click()
ActiveSheet.Columns("D
").Insert Shift:=xlToRight
Range("C4:C24").Copy Destination:=Range("D4")
x = Range("IV9").End(xlToLeft).Column
lcol = Replace(Cells(1, x - 1).Address(0, 0), "1", "")
For n = 9 To 20
Cells(n, x).FormulaLocal = "=SUM(C" & n & ":" & lcol & n & ")"
Next n
End Sub
Donc ca fonctionne bien pour l´ajout de la colonne avec la mise en forme et les formules, par contre y a t´il un moyen pour qu´il ne copie pas les valeurs dans les cellules de prix et options ?
Mais surtout la somme de chaque ligne se fait dans la derniere colonne du tableau, or elle devrait être dans l´avant-avant derniere. Quel est le petit truc à modifier pour avoir ca ?
merci