Redimentionner automatiquement une cellule

Bonjour a tous

Auriez-vous une idée, SVP.

Sur un tableau ou j'ai une cellule (A2) qui me serre a faire une recherche "Liste".

Dans une autre cellule (A3) le retour par "recherche V".

Le contenu s'affiche (A3) mais suivant la quantité de mots la cellule ne s'ajuste pas automatiquement.

Comment puis-je faire pour afficher le contenu sans avoir a double cliquer sur l'inter ligne afin de lire la totalité de la cellule.

J'utilise Office 2016.

Merci a vous

Bonjour le forum,

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    Cells.EntireColumn.AutoFit
End Sub

Merci du coup de main

Bonjour a tous,

Je reviens sur cette demande dont je n arrive toujours pas a faire fonctionné.

J'ai essayé de rajouter un module dans le quel j'y est écris,

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Cells.EntireColumn.AutoFit

End Sub

Sans resultat

Une autre routine dans un nouveau module

Sub ajuster_lignes(()

Cells.Select

Cells.EntireRow.Autofit

End Sub

Sub ajuster_colonnes()

Sub ajuster

Cells.EntireClumn.Autofit

End Sub

Choux blanc, avez-vous un tuyau

Je suis sous W10 et office pro plus 2016.

Merci a vous, bon WE

Bonjour Ewoks, le fil,

Le code fourni par mbbp (que je salue ) est à coller dans le module de la feuille....

Alt + F11 pour ouvrir l'éditeur vba

Double-clic sur la feuille concernée et coller le code.

5classeur1.xlsm (16.59 Ko)

Cordialement,

Merci pour votre réponse et le fichier

Rechercher des sujets similaires à "redimentionner automatiquement"