2016-11-03 1 views
0

J'essaie de mettre en évidence la cellule de feuille1 qui est vide en la comparant avec la feuille 2.Comment mettre en évidence la cellule dans Excel si son blanc sur la comparaison dans différentes feuilles?

J'ai essayé de le formaliser conditionnellement mais je ne suis pas capable d'obtenir la logique pour le faire. Veuillez vérifier la feuille. Je veux que la cellule soit surlignée dans la feuille 1 si elle est vide sur la comparaison de la feuille 2. Cette tâche pourrait être facile pour vous mais pas pour moi.

Par exemple. Dans la feuille 2, la ligne 5 est vide alors, il faut le mettre en évidence dans la feuille 1.

Excel sheet

Logic Sheet1(Latest) Sheet2(old) 

     Blank    Blank No highlight 
     Blank    Date  Highlight in sheet 1 
     Date    Date  No highlight in sheet 1 
     Date    Blank Highlight in sheet 1 

Pls aider

+0

Etes-vous capable d'écrire une fonction définie par l'utilisateur (c'est-à-dire VBA)? Par capable, je veux dire la permission, pas la capacité. – Hrothgar

+0

Je ne suis pas expert en macros mais oui je sais comment l'exécuter. Oui, c'est autorisé – user41048

+0

La ligne entière de la feuille 2, ou une cellule ou plage spécifique de la rangée? Est-ce que la gamme à examiner change de temps en temps ou est-ce toujours la même chose? – Hrothgar

Répondre

0

La routine suivante prendra soin de votre problème actuel:

Dim i As Long 
Dim lastrow1 As Long, lastrow2 As Long, biggerlastrow As Long 

lastrow1 = Sheet1.Cells(Rows.Count, 1).End(xlUp).Row 
lastrow2 = Sheet2.Cells(Rows.Count, 1).End(xlUp).Row 

If lastrow1 > lastrow2 Then biggerlastrow = lastrow1 
If lastrow1 < lastrow2 Then biggerlastrow = lastrow2 
If lastrow1 = lastrow2 Then biggerlastrow = lastrow2 


For i = 1 To biggerlastrow 
    If Sheet2.Cells(i, 1) = "" Then 
     Sheet1.Cells(i, 1).Select 
     ActiveCell.Interior.ColorIndex = 6 
    End If 

Next 
+0

useer41048, j'ai posté le code ci-dessus avant de modifier votre message. Par conséquent, cette routine répond partiellement à votre question. –

+0

Mais Comment l'utiliser? Je veux dire que j'ai ouvert Excel> Mode développeur> VB> Collé ce code> Enregistré. Maintenant, il n'y a rien à faire. Où je me trompe? Désolé mais je suis nouveau pour les macros – user41048

+0

useer41048, Allez dans l'onglet Développeur, ouvrez le menu Insertion, et cliquez sur l'icône du bouton de commande, (le premier dans les contrôles ActiveX) et placez-le sur la feuille Sheet1. Puis double-cliquez dessus. Cela va ouvrir la fenêtre VBA, et vous verrez Sub pour le bouton de commande. Tout ce que vous avez à faire est de coller ce code dedans. Revenez à la feuille Sheet1 et cliquez sur le bouton de commande. Et vous verrez les cellules concernées en surbrillance. –