2009-08-25 08:54:21 +0000 2009-08-25 08:54:21 +0000
23
23

Comment puis-je faire en sorte qu'une cellule dans Excel s'adapte automatiquement à la hauteur du contenu du texte enveloppé ?

J'ai une cellule avec du contenu de texte enveloppé dans Excel et je veux formater la cellule de manière à ce que sa hauteur s'adapte au contenu qui peut s'étendre sur plusieurs lignes. Comment puis-je obtenir ce comportement ?

Réponses (8)

27
27
27
2012-08-07 04:27:05 +0000

Depuis http://support.microsoft.com/kb/149663

Pour ajuster la hauteur de la ligne afin de faire tenir tout le texte dans une cellule, suivez les étapes suivantes :

Sélectionnez la ligne.

Dans Microsoft Office Excel 2003 et dans les versions antérieures d'Excel, pointez sur Row dans le menu Format, puis cliquez sur AutoFit.

Dans Microsoft Office Excel 2007, cliquez sur l'onglet Accueil, cliquez sur Format dans le groupe Cellules, puis cliquez sur Ajustement automatique de la hauteur de la ligne.

Fonctionne également lorsque toutes les lignes sont sélectionnées

11
11
11
2009-08-25 09:02:18 +0000

Try

Select the column -> right-click column -> Format Cells -> Alignment tab -> Wrap text

4
4
4
2013-06-14 18:06:20 +0000

Notez que l'autofit ne fonctionne pas sur les cellules fusionnées. Vous devez le faire manuellement.

Voir cette réponse de Microsoft : Vous ne pouvez pas utiliser la fonction AutoFit pour les lignes ou les colonnes qui contiennent des cellules fusionnées dans Excel

2
2
2
2009-08-26 15:28:37 +0000

Si cela ne se fait pas automatiquement, placez votre curseur sur la petite ligne entre les numéros de ligne (ex : entre 1 et 2) et double-cliquez, cela redimensionnera la ligne (directement au-dessus de la petite ligne, dans l'exemple : 1) de sorte que tout soit visible (d'un aspect vertical).

0
0
0
2009-09-22 14:54:57 +0000

Connaissez-vous la macro ? Mettez le code suivant dans

Application.ActiveCell.WrapText = True

à l'intérieur de votre sous-routine Worksheet_SelectionChange.

0
0
0
2013-04-19 21:38:43 +0000

La seule façon de le faire fonctionner comme prévu est de surligner toute la feuille avec CTRL-A, de décliquer sur le bouton “Wrap Text” dans la barre d'outils, puis de la sélectionner à nouveau. Aucun autre paramètre ne change, mais chaque ligne est maintenant à la hauteur “appropriée” pour son contenu.

0
0
0
2009-10-28 18:13:08 +0000

Une solution VBA consiste à utiliser les éléments suivants :

Call Application.ActiveCell.AutoFit
0
0
0
2014-11-25 13:39:44 +0000

J'ai créé le code VB suivant pour redimensionner la ligne d'en-tête lorsqu'une cellule se trouve dans une plage (B2:B1500), car les valeurs de date supérieures au 28/12/2014 entraîneraient l'affichage dans l'en-tête d'un avertissement indiquant que ces dates, dans une feuille de temps, passeraient à la semaine 1 de 2015 :

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim KeyCells As Range

    ' The variable KeyCells contains the cells that will
    ' cause an Action when they are changed.
    Set KeyCells = Range("B2:B1500")

    If Not Application.Intersect(KeyCells, Range(Target.Address)) _
           Is Nothing Then

        ' Change the height of the header row when one of the defined cdlls is changed
        Rows("1:1").EntireRow.AutoFit

    End If
End Sub