Bonjour Laurent, le Forum
Si j'ai un premier conseil à te donner c'est de tout faire faire par Excel.
En effet Excel est doté de fonctionnalités permettant des mises en page pratiquement aussi "propre" que Word. Donc ton Fax et les Fiches Techniques seront aussi bien présentées sous Excel que sous Word.
L'avantage est évident, tu pourras bien plus facilement gérer par macro les évènements qui doivent se produire si tout est sous Excel.
Maintenant pour "La macro –tel que tu l’imagines-" ta description est assez confuse...
On peut facilement boucler sur une plage de cellules de tes deux colonnes (ici A et B de 1 à 50) pour lancer ou non des actions avec ce type de code :
Sub BoucleScan()
Dim Plage As Range, Cell As Range
Dim TheMessage As String
Set Plage = Sheets("tableau").Range("B1:B50")
For Each Cell In Plage
If Cell <> "" Then
If IsNumeric(Cell.Value) Then
TheMessage = TheMessage & Cell.Offset(0, -1) & " = " & Cell.Value & vbCrLf
End If
End If
Next
MsgBox "Voici les appareils et leur quantité respective :" & vbCrLf & TheMessage
End Sub
Si, admettons, chaque article listé en colonne "A", correspond à un onglet de feuilles comportant sa fiche technique, on peut facilement lancer un action pour cette feuille pendant ce genre de boucle... Par contre pour obtenir le même résultat avec des fiches techniques sous Word... ouh la la...
Bon Courage
@+Thierry