Contenu récent par Sylvagreg

  1. S

    Lister une plage de cellules pour pouvoir les comparer

    Re : Lister une plage de cellules pour pouvoir les comparer Avec le code entier ce sera mieux!! Sub Macro1() Dim i&, j&, Ws1 As Worksheet, Ws2 As Worksheet Sheets("Fusion").Cells.ClearContents Sheets("Salaires actuels").Select Cells.Select Selection.Copy Sheets("Fusion").Select...
  2. S

    Lister une plage de cellules pour pouvoir les comparer

    Re : Lister une plage de cellules pour pouvoir les comparer Merci Pierrot Il m'a bloqué sur la ligne de copie alors j'ai remis le code que j'avais mis au début. Mais maintenant il bloque sur la ligne Ws1.Cells(DerL, 1) = .Cells(i, 1) La première après le Else
  3. S

    Lister une plage de cellules pour pouvoir les comparer

    Re : Lister une plage de cellules pour pouvoir les comparer Pierrot, Cela ne marche toujours pas. Cijoint un fichier Je veux qu'il me retrouve donc les données du 31/12 à mettre en face de celles du 30/09. Mais j'ai des changements de société, des salariés sortis, d'autres entrés, des...
  4. S

    Lister une plage de cellules pour pouvoir les comparer

    Re : Lister une plage de cellules pour pouvoir les comparer Maintenant j'ai toujours une erreur 1004 Avec comme message "Méthode Range de l'objet Worsheet a échoué et le débogage se positionne sur la ligne suivante: If Ws1.Range(Ws1.Cells(j, 2) + Ws1.Cells(j, 3) +...
  5. S

    Lister une plage de cellules pour pouvoir les comparer

    Re : Lister une plage de cellules pour pouvoir les comparer Bon alors là il bug sur If Not IsError(Application.Match(PlageWs1, PlageWs2, 0)) Then Je pense comprendre car la plageWs2 est définie après cette ligne. Je suis vraiment complètement novice. Donc j'avais bien vu le...
  6. S

    Lister une plage de cellules pour pouvoir les comparer

    Re : Lister une plage de cellules pour pouvoir les comparer Bon ben Robert cela ne marche pas, Il me met un message d'erreur 1004 et le débogage met en jaune la ligne suivante: Set PlageWs1 = Ws1.Range(Ws1.Cells(i, 2), Ws1.Cells(i, 4))
  7. S

    Lister une plage de cellules pour pouvoir les comparer

    Bonjour, Je suis débutant et bricole avec ce que je trouve sur ce type de forum. Là je coince, la définition des plages ne fonctionne pas. Est ce que quelqu'un pourrait me corriger le code? Merci d'avance:mad: ' Fusion Dim i&, j&, DerL& Dim Ws1 As Worksheet, Ws2 As Worksheet Dim PlageWs1...