Comparer deux feuilles excel

Comment comparer deux feuille excel et de déterminer la colonne qui est absent?

(Je tiens à le comparer à une liste de pays à partir de la feuille avec de la feuille B, puis marquer le pays qui est manquant)

Note: Ils sont dans un ordre aléatoire.

InformationsquelleAutor 001 | 2010-06-16
  1. 4

    Vous pouvez utiliser le VLOOKUP fonction dans une feuille de calcul Excel vous aide à trouver les "disparus" de données dans une autre feuille. Par exemple, prenez les deux feuilles de calcul:

    Sheet1
------
       A          B         C
1     aa 
2     bb
3     cc 
4     dd

    . 

    Sheet2
------
       A          B         C
1     aa 
2     bb
3     dd

    Ajouter la formule suivante pour la cellule B1 dans Sheet et faites glisser la formule vers le bas à travers la cellule B4:

    =IF(ISERROR(VLOOKUP(A1,Sheet2!$A$1:$A$3,1,FALSE)),"MISSING FROM OTHER SHEET","")

    Sheet1 doit indiquer les éléments qui manquent à l'autre de la feuille dans la colonne B, comme suit:

    Sheet1
------
       A          B                        C
1     aa 
2     bb
3     cc         MISSING FROM OTHER SHEET
4     dd
    InformationsquelleAutor Ben McCormack
  2. 0

    Vous pouvez utiliser ADO avec Excel

    Dim cn As Object
Dim rs As Object
Dim strFile As String
Dim strCon As String
Dim strSQL As String
Dim s As String
Dim i As Integer, j As Integer

''This is not the best way to refer to the workbook
''you want, but it is very conveient for notes
''It is probably best to use the name of the workbook.

strFile = ActiveWorkbook.FullName

''Note that if HDR=No, F1,F2 etc are used for column names,
''if HDR=Yes, the names in the first row of the range
''can be used. 
''This is the Jet 4 connection string, you can get more
''here : http://www.connectionstrings.com/excel

strCon = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strFile _
    & ";Extended Properties=""Excel 8.0;HDR=Yes;IMEX=1"";"

''Late binding, so no reference is needed

Set cn = CreateObject("ADODB.Connection")
Set rs = CreateObject("ADODB.Recordset")


cn.Open strCon

 ''Query example:
 strSQL = "SELECT Country " _
       & "FROM [Sheet1$] a " _
       & "WHERE Country NOT IN " _
       & "SELECT Country FROM [Sheet2$]"


''Open the recordset for more processing
''Cursor Type: 3, adOpenStatic
''Lock Type: 3, adLockOptimistic
''Not everything can be done with every cirsor type and 
''lock type. See http://www.w3schools.com/ado/met_rs_open.asp

rs.Open strSQL, cn, 3, 3

If rs.Count>0 Then
    MsgBox rs.GetString
End If

    Il est également possible d'écrire rapidement le jeu d'enregistrements à une feuille avec CopyFromRecordset.

    InformationsquelleAutor Fionnuala
  3. 0

    La solution varie en fonction du nombre de lignes et le nombre de fois que vous devez faire et comment vous voulez que les informations soient présentées.

    Si vous n'avez pas beaucoup de pays et vous avez besoin de faire qu'une seule fois, la solution la plus rapide est:

    • Copier les deux colonnes en une temporaire de la feuille.
    • Trier les colonnes par ordre alphabétique.
    • Aller manuellement à travers eux et de repérer les différences.

    Si vous avez besoin de le faire juste une fois, mais il ya beaucoup de pays, la recherchev option est la plus rapide.

    Si vous devez répéter cette procédure plusieurs fois, et vous avez besoin d'utiliser cette liste quelque part (c'est à dire dans d'autres feuille), alors vous pouvez utiliser un plus alambiqué solution, impliquant deux colonnes supplémentaires avec les recherches et les tableaux croisés dynamiques. Mais à ce point, je regarderais le déplacer vers quelque chose de plus gérable, comme une petite base de données.

    InformationsquelleAutor kikito
  4. 0

    J'ai trouvé, que dans certaines versions d'excel est fonction de comparaison de fichiers - mais souvent est désactivé, cependant instalé. Et un jour, j'ai trouvé par hasard comment l'utiliser.

    Si vous avez installé TortoiseSVN (vraiment):
    - sélectionnez les fichiers excel pour comparer dans votre gestionnaire de fichiers
    - ouvrir le menu contextuel, puis sélectionnez TortoiseSVN > Diff
    - il ouvre excel en "comparant le mode"

    InformationsquelleAutor Máťa - Stitod.cz