Prolonger des colonnes en vba
Résolu
Lucie
-
Lucie -
Lucie -
A voir également:
- Prolonger des colonnes en vba
- Comment faire des colonnes sur word - Guide
- Classer par ordre alphabétique excel plusieurs colonnes - Guide
- Déplacer des colonnes excel - Guide
- Figer des colonnes excel - Guide
- L'indice n'appartient pas à la sélection vba - Forum VB / VBA
1 réponse
Bonjour,
comme ceci:
Voilà
comme ceci:
Private Sub CommandButton1_Click()
Dim i As Byte
Dim j As Long
Dim DerniereLigneUtilisee As Long
'boucle sur les éléments de la listbox
For i = 0 To ListBox1.ListCount - 1
If ListBox1.Selected(i) = True Then
DerniereLigneUtilisee = Cells(Rows.Count, i + 1).End(xlUp).Row
For j = DerniereLigneUtilisee + 1 To 100
Cells(j, i + 1) = (j - 2) + 1
Next
End If
Next i
End Sub
Voilà
Une petite question en complément, si je souhaite prolonger uniquement la dernière ligne, si par exemple ma dernière ligne est 12, alors prolonger de 100 lignes cette valeur.
Merci encore pour votre aide.
For j = DerniereLigneUtilisee + 1 To 100 Cells(j, i + 1) = Cells(j - 1, i + 1) Next@+ Le Pivert