Karim 468 Comparaison de deux feuilles puis copie

PascalXLD

XLDnaute Barbatruc

• 10 Décembre 2006

• #2

Re : Comparaison de deux feuilles puis copie

Bonjour

j'ai supprimé virtuellement le message de Karim en attendant qu'il change son avatar et l'ai fusionné avec la réponse de brigitte. J'ai replacé le fil dans le bon forum

 

Vote positif 0 Vote négatif

K

karim468

Guest

• 10 Décembre 2006

• #3

Re : Karim 468 Comparaison de deux feuilles puis copie

Bonjour,
je ne pensais pas que mon avavtar allait susciter toute cette polémique et pour couper court je l'ai changé. mon premier souci c de me faire aider et changer mon avatar ne dérange pas du tout si celà peut faire plaisir à certain(e)s
en vous remerciant d'avance de votre aide.😎

 

Vote positif 0 Vote négatif

Brigitte

XLDnaute Barbatruc

• 10 Décembre 2006

• #4

Re : Karim 468 Comparaison de deux feuilles puis copie

Merci Karim. C'est une preuve d'intelligence que de ne pas se fâcher et de se ranger à l'opinion de quelques uns qui ont l'habitude de ce forum et auraient pu, comme moi (bien que ca ne m'aurait pas empêchée de dormir) être un peu gênés.

PS : ca représente quoi ton nouvel avatar ?

 

Dernière édition: 10 Décembre 2006

Vote positif 0 Vote négatif

K

karim468

Guest

• 10 Décembre 2006

• #5

Re : Karim 468 Comparaison de deux feuilles puis copie

a votre service mdame,
vous pourriez pas me dire si ce qui suit est correcte:
Sub test()
Dim i As Long, j As Long, val As Variant
Application.ScreenUpdating = False
For i = 2 To Range("A65536").End(xlUp).Row
Sheets("liste").Select
val = Cells(i, 1)
For j = 2 To Range("A65536").End(xlUp).Row
If Sheets("vueglobale").Cells(i, 1).Value <> val Then
Sheets("vueglobale").Range("E65536").End(xlUp).Value = Selection.EntireRow.Value
End If
Next j
Next i
Application.ScreenUpdating = True
End Sub

 

Vote positif 0 Vote négatif

Dan

XLDnaute Barbatruc

Membre du Staff

Modérateur

• 10 Décembre 2006

• #6

Re : Karim 468 Comparaison de deux feuilles puis copie

Bonsoir,

Un peu difficile de te répondre là.
1. le i c'est dans la feuille LISTE ? si oui sheets("liste").select me parait curieux.

2. Le J c'est applicable à la feuille Vue globale ?

A te lire

 

Vote positif 0 Vote négatif

K

karim468

Guest

• 10 Décembre 2006

• #7

Re : Karim 468 Comparaison de deux feuilles puis copie

bonsoir dan,
en fait, je m'y connait pas beaucoup en vb, mais j'essaye quand même de trouver une solution:
l'extraction se fait dans la feuille liste et puis il faut copier les lignes qui n'existent pas dans la feuille à chaque mise à jour de la feuille liste
merci

 

Vote positif 0 Vote négatif

K

karim468

Guest

• 10 Décembre 2006

• #8

Re : Karim 468 Comparaison de deux feuilles puis copie

ou dois je place le code ? sur l'une des feuilles ou dans un module
sinon le i est applicable a la feuille liste et le j à la feuille vue

 

Vote positif 0 Vote négatif