Bonjour j'ai un petit souci sa fait quelque temps que je n'ai plus manipulé le VB et je bloque sur un problème de gestion de feuille.

Pour mieux me faire comprendre voici mon algo :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
x=1
 
tant que cellule Bx+1 <> ""
x=x+1
 
Si (cellule Bx(feuille1)) =(cellule A1 a 164(feuille2))
  Als
      (cellule Hx(feuille1)) = "DD"
sinon
       (cellule Hx(feuille1)) = "ab"
fin Si
 
fin tant que

Voila je pense que cela est compréhensible. Mais je vais bien me replonger dedans ce n'est pas très dur.

Merci a tous et a toutes