Bonjour,
je souhaiterais créer une Macro qui extrait des données de ma Table 1 vers une autre feuille, en prenant ligne par ligne et en en ajoutant une autre en dessous à chaque fois, le tout en ne recopiant pas les lignes ou il y a des choses inutiles marquées. J'ai créé une ébauche d'algorithme mais je n'arrive pas à le retransposer en VBA je ne connais pas assez le langage
Et voici le code VBA que j'ai essayé de faire
Sub Thomas()
Sheets.Add
ActiveSheet.Name = "feuille"
Dim i As Integer
For i = 2 To 600
Worksheets("Table 1").Activate
If ((Cells(i, 2).IsText) And Cells(i, 4).IsNumeric) Then
ActiveSheet.Range(Cells(i, 2), Cells(i, 9)).Select
Selection.Copy
Sheets("feuille").Activate
Cells(Rows.Count, colonne).End(xlUp).Row.Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End If
Next
End Sub
(pas encore fini)
Merci beaucoup pour votre aide c'est la première fois que j'essaye de coder