Re : Code VBA ! ajuster hauteur de ligne
Désolé, mais la commande "autofit" qui permet d'ajuster la largeur/hauteur de ligne ne permet pas de répondre à ton problème.
En voici la cause : Excel gère séparément l'option "aller à la ligne automatiquement" et "ajuster la cellule".
Si bien que tu dois choisir entre l'un et l'autre.
Maintenant si tu souhaites que la largeur de ta cellule soit fixée à "x" et que la hauteur de ligne soit ajustée automatiquement en fonction du nombre de lignes, une petite astuce pourrait ressembler à ça :
nb_lignes = len(contenucellule)/40 '40=le nombre maxi de caractères par lignes, à définir
Rows("12:12").RowHeight = 12.75*nb_lignes 'en police taille 10 (par défaut) 12.75 c'est la hauteur de ligne automatique)
Sinon, tu peux également faire ton propre code pour aller à la ligne automatiquement en utilisant la même forme et puis la commande "Chr(10)" qui permet d'aller à la ligne. Ensuite tu fixes une largeur de colonne.
ex : ce code permet d'aller à la ligne tous les n caractères (pour garder les mots en entier c'est à peine plus compliqué) puis d'ajuster la hauteur de ligne à ta case
For i = 0 to int(len(tontexte)/n)+1 'n=nombre de caractères maxi par ligne dans ta case
Cells(1,1).value = Cells(1,1).value & Mid(tontexte, n*i, n) & Chr(10)
Cells(1,1).RowHeight = 12.75*i
Next
J'espère avoir répondu à ta question