Ajustement des cellules en temps réel

Fermé
Nikoocyr Messages postés 4 Date d'inscription samedi 14 octobre 2017 Statut Membre Dernière intervention 15 octobre 2017 - Modifié le 14 oct. 2017 à 18:53
Nikoocyr Messages postés 4 Date d'inscription samedi 14 octobre 2017 Statut Membre Dernière intervention 15 octobre 2017 - 15 oct. 2017 à 15:10
Bonjour à tous,

Je travail actuellement sur un projet et je rencontre un petit souci. En effet je cherche à adapter le format d'une cellule à son texte en temps réel. Cette cellule contient une fonction recherchev et est donc amenée à changer très souvent. Du coup, je voudrais que cette cellule change en fonction du texte qu'elle contient sans avoir aucune manipulation à faire entre chaque changement de texte. Cela évitera d'avoir du texte coupé.





On peut voir que lorsque je passe de l'argument 1 au 2, le format de la cellule ne s’adapte pas au texte automatiquement: il faut que je double clic pour l'ajuster mais si je passe de l'argument 1 à l'argument 2 très souvent , ça n'est pas pratique: comment faire pour que la cellule s'ajuste toute seule comme une grande?

Merci à tous ;)

3 réponses

M-12 Messages postés 1333 Date d'inscription lundi 22 septembre 2008 Statut Membre Dernière intervention 8 avril 2023 299
14 oct. 2017 à 18:26
Bonjour,

Avec un p'tit classeur exemple se sera mieux
0
Nikoocyr Messages postés 4 Date d'inscription samedi 14 octobre 2017 Statut Membre Dernière intervention 15 octobre 2017
14 oct. 2017 à 18:54
Bonjour,

J'ai modifier mon message original, tu devrais y voir plus clair ^^.

Merci :)
0
Raymond PENTIER Messages postés 58396 Date d'inscription lundi 13 août 2007 Statut Contributeur Dernière intervention 25 avril 2024 17 094
14 oct. 2017 à 19:32
Cette fonctionnalité n'existe pas dans Excel
0
Nikoocyr Messages postés 4 Date d'inscription samedi 14 octobre 2017 Statut Membre Dernière intervention 15 octobre 2017
14 oct. 2017 à 19:52
Ok merci,

Quelqu'un aurait une solution pour contrer ce manque?
0
via55 Messages postés 14405 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 25 avril 2024 2 703
14 oct. 2017 à 23:19
Bonsoir

Oui la solution existe par macro :
ALt+F11 pour ouvrir editeur VBA
Double clic sur la feuille concernée dans l'arborescence à gauche
Copier-coller la macro suivante dans la page blanche et fermer l'éditeur
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("C6")) Is Nothing Then
 Columns("C:C").EntireColumn.AutoFit
 End If
End Sub


A toute modification de la cellule C6 la largeur de colonne s'adaptera

Cdlmnt
Via
0
Nikoocyr Messages postés 4 Date d'inscription samedi 14 octobre 2017 Statut Membre Dernière intervention 15 octobre 2017
15 oct. 2017 à 15:10
Bonjour,

Merci de ta réponse, j'ai essayé de l'adapter à mon classeur :

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("B3")) Is Nothing Then
Rows("12:12").EntireRow.AutoFit
End If
End Sub

Et ça fonctionne parfaitement !!

Je te remercie pour cette petite astuce qui me sera utile pour les prochaines fois :D

Bonne journée,

Nicolas.
0