N nat Guest 20 Avril 2004 #1 Je voudrais à l'aide d'une macro insérer automatiquement une collone toute les deux sur un tableau de 28 colonnes merci pour votre aide
Je voudrais à l'aide d'une macro insérer automatiquement une collone toute les deux sur un tableau de 28 colonnes merci pour votre aide
E elodie Guest 20 Avril 2004 #2 voici une possibilité : Columns("C:C").EntireColumn.Select Selection.Insert Shift:=xlToRight Dim i i = 1 While i < 13 ActiveCell.Offset(0, 3).Columns("A:A").EntireColumn.Select Selection.Insert Shift:=xlToRight i = i + 1 Wend Vote positif 0 Vote négatif
voici une possibilité : Columns("C:C").EntireColumn.Select Selection.Insert Shift:=xlToRight Dim i i = 1 While i < 13 ActiveCell.Offset(0, 3).Columns("A:A").EntireColumn.Select Selection.Insert Shift:=xlToRight i = i + 1 Wend
S sousou Guest 20 Avril 2004 #3 Une réponse parce que je suis de bonne humeur, mais consulte la charte du forum, si tu veux de l'aide !!!! Sub test() nb = 28 For i = 1 To nb Columns(i + i).Insert Next End Sub Vote positif 0 Vote négatif
Une réponse parce que je suis de bonne humeur, mais consulte la charte du forum, si tu veux de l'aide !!!! Sub test() nb = 28 For i = 1 To nb Columns(i + i).Insert Next End Sub
N nat Guest 20 Avril 2004 #4 Merci à vous cela va mettre d'une grande aide Vote positif 0 Vote négatif