salut watashi,
le code que tu donnes ne peut fonctionner car le but du programme n'est pas d'afficher B1 lorsqu'il y a B (j'ai écrit A & B de manière a éviter sont chaine de char trop longue)
mon code ressemble en fait à :
Dim ligne As Long
For ligne = ActiveSheet.UsedRange.Rows.Count To 1 Step -1
Select Case ligne
Case ActiveSheet.Cells(ligne, 5).Value = "NON FRENCH W/O FED STAMP"
ActiveSheet.Cells(ligne, 6).Value = "SWX TAX"
ActiveSheet.Cells(ligne, 7).Value = "REPORTING FEE"
ActiveSheet.Cells(ligne, 8).Value = "VIRTX FEES"
Case ActiveSheet.Cells(ligne, 5).Value = "UK CHARITY W/O FED"
ActiveSheet.Cells(ligne, 6).Value = "SWX TAX"
ActiveSheet.Cells(ligne, 7).Value = "REPORTING FEE"
ActiveSheet.Cells(ligne, 8).Value = "VIRTX FEES"
ActiveSheet.Cells(ligne, 9).Value = "STAMP DUTY"
ActiveSheet.Cells(ligne, 10).Value = "STAMP DUTY (IRELAND)"
...
End Select
le but du prog :
les profils de taxe qui ne sont pas clair (ex : UK CHARITY W/O FED)
du coup, on preffere rajouter à coté les intitulés de chaqu'unes des taxes associées au profil