Bonjour,
j'ai un projet a réaliser sous excel en codage vba en cour, je n'y arrive pas. Je dois récupérer la première cellule dans la colonne E dans laquelle il y a écrit changement, faire un copier collé et le mettre dans ma page principale pour faire un tableau propre ne montrant que les choses les plus importantes. Une fois trouvé la première cellule il faut faire cela toute les 3 cellules tant que la cellule n'est pas vide.
J'ai essayé moi même avec ce programme:
Sub changement()
Dim cellule As Range
Dim c As Integer
Dim nbligne As Integer
With Range("E1:E30")
Set cellule = .Find("changement", , xlValues, xlWhole, xlByColumns)
cellule.Activate
c = ActiveCell.Column
For i = 1 To 1000
Do While Not (IsEmpty(ActiveCell))
ActiveCell.Select
Selection.Copy
Sheets("formulaire").Select
Range("Ai").Select
ActiveSheet.Paste
Selection.Offset(3, c).Select
Loop
Next i
End With
End Sub
merci de votre aide