J
Jean
Guest
Bonjour le forum,
Je voudrais comparer ma cellule avec une autre cellule se trouvant sur une autre feuille. Comment écrire le code pour que cela fonctionne ?
Voici ce à quoi le code devrait ressembler :
Sheets('À produire').Select
Do Until Activecell.Value = ''
If Activecell.Value = (cellule se trouvant sur la feuille « Données ») Then
Do Until Activecell.Value = ''
(cellule se trouvant sur la feuille « Données »).Offset (0, 3)
Selection.Copy
Sheets('À produire').Select
Activecell.Offset(0, 2)
ActiveSheet.Paste
Else
Activecell.Offset(1, 0)
Loop
End If
Loop
J’espère que vous avez compris sinon, posez des questions pour que je puisse vous aidez à m’aider. ))
Merci
Je voudrais comparer ma cellule avec une autre cellule se trouvant sur une autre feuille. Comment écrire le code pour que cela fonctionne ?
Voici ce à quoi le code devrait ressembler :
Sheets('À produire').Select
Do Until Activecell.Value = ''
If Activecell.Value = (cellule se trouvant sur la feuille « Données ») Then
Do Until Activecell.Value = ''
(cellule se trouvant sur la feuille « Données »).Offset (0, 3)
Selection.Copy
Sheets('À produire').Select
Activecell.Offset(0, 2)
ActiveSheet.Paste
Else
Activecell.Offset(1, 0)
Loop
End If
Loop
J’espère que vous avez compris sinon, posez des questions pour que je puisse vous aidez à m’aider. ))
Merci