Insertion plusieurs ligne VBA à chaque ligne
VBA search
-
VBA search -
VBA search -
Bonjour,
Je viens vous demander de l'aide pour vba
J'aimerai créer une macro qui :
à partir d'un tableau de X lignes non vides, insére 4 lignes sous chacune de ces lignes. (automatiquement biensur)
J'ai essayé des boucles des FOR,des IF, je n'y arrive pas.
Par avance merci pour votre aide cela sera précieux
Je viens vous demander de l'aide pour vba
J'aimerai créer une macro qui :
à partir d'un tableau de X lignes non vides, insére 4 lignes sous chacune de ces lignes. (automatiquement biensur)
J'ai essayé des boucles des FOR,des IF, je n'y arrive pas.
Par avance merci pour votre aide cela sera précieux
A voir également:
- Insertion plusieurs ligne VBA à chaque ligne
- Partager photos en ligne - Guide
- Aller à la ligne excel - Guide
- Mètre en ligne - Guide
- Apparaitre hors ligne instagram - Guide
- Formulaire en ligne de meta - Guide
2 réponses
Sub insertion ()
Dim i As Integer
Dim j As Integer
i = 1
j = 3
Do While i < 50
Rows("i:i + j").Select
Selection.Insert Shift:=xlDown
i = i + 4
Loop
End Sub
J'ai fais ça mais il me dit qu'il y a une erreur d'Imcompatibilité de type au niveau de la ligne :
Rows("i:i + j").Select
Je ne sais plus quoi faire
Quelqu'un pourrait m'aider?
Dim i As Integer
Dim j As Integer
i = 1
j = 3
Do While i < 50
Rows("i:i + j").Select
Selection.Insert Shift:=xlDown
i = i + 4
Loop
End Sub
J'ai fais ça mais il me dit qu'il y a une erreur d'Imcompatibilité de type au niveau de la ligne :
Rows("i:i + j").Select
Je ne sais plus quoi faire
Quelqu'un pourrait m'aider?
