ta macro fonctionne
question, la partie en rouge fonction super bien, j'ai voulu faire pareil avec l'autre et j'ai un message d'erreur
"ERREUR de Compilation... Impossible d'affecter à un tableau"
la partie marin sera affichée dans une inputbox avec devant un nombre de 1 à 15 et individuellement sera récupéré dans la restit
je coule de plus en plus
Dim marin(15) As Variant
Dim libellé()
Dim p As Byte
Dim titre(11) As Variant
Dim noms()
Dim i As Byte
marin = Array("d'Ager", "de BEAUJARD", "de BEQUET", "de BRIART", "de CHEFFER", "de CIAPPA", "de COCTEAU", "de DECARIS", "de DULAC", "de GANDON", "de la libération", "de LAMOUCHE", " de BECQUET", "de St-Estève", "de l'Europe")
noms = Array("N° C", "Année", "N° T", "Type", "Valeur", "S/taxe", "Libellé", "Couleur", "Neuf", "Obli", "Ligne")
For i = LBound(noms) To UBound(noms)
titre(i) = noms(i)
Next
For p = LBound(marin) To UBound(marin)
libellé(p) = marin(p)
Next