Renvoyer à la cellule en bas

[achraf26]

Bonsoir,
Suite à une création d'une facture en Excel, j'ai mis en 1er colonne (A) n° article, (B) description, (C) Prix unité.
En colonne B j'ai mis une fonction de recherche V à partir de n° Article, la description de produit est affiché automatiquement, malheureusement le reste de la description reste masqué, car la colonne (C) est remplie par une fonction "Prix", et fusionner avec le cellule qui suit en bas ce n'est pas possible car y'a une fonction.
je voulais trouver une solution pour que le reste de la description du produit sera mis en 2éme ou même 3éme ligne ça dépend la longueur de la description du produit malgré les fonctions de recherche v
Merci

 

[grisan29]

Re : Renvoyer à la cellule en bas

bonjour achraph26

tu peux envoyer ton fichier anonyme pour voir , je te mets un bout de code pour que tu vois si tu peux l'adapter a ton cas

With .Range("D" & lig, "H" & lig)
        .Font.Size = 14
        .Font.Name = "arial"
        .MergeCells = False
        .WrapText = True  'retour du texte à la ligne
        .EntireRow.AutoFit  'mettre la ligne en ajustement auto de la hauteur
        MaHauteur = .RowHeight  'voir quelle est la hauteur de la ligne une fois cet autofit fait
        .MergeCells = True  'refusionner

        '.VerticalAlignment = xlCenter
        .RowHeight = IIf(MaHauteur > 15, MaHauteur, 15)  'si la hauteur une fois autofit fait est inferieur à 15 je laisse 15 en minimum sinon hauteur de l'autofit (perso c'est la hauteur mini que je voulais
      End With

tu devrai modifier le titre du post c'est retour a la ligne dans la cellule que tu demande
Pascal