Excel, ouvrir une cellule en grand... Fermé

Question

Bonjour, 

Je travaille sur vista et ai utilisé Excel pour mon fichier client. J'ai une cellule qui comporte de nombreuses phrases et donc qui grossit toutes mes lignes si je veux que tout soit lisibles à une taille standard. Je voudrai savoir s'il existe une formule pour que les cellules concernées uniquement s'ouvrent en plus grand quand je cliques dessus. 

J'espère être assez claire dans ma demande !...

Pauline

chaoticaaalil · Answer

Huh   Normalement c'est la fusion des cellules, mais tu peus faire clique droit, mettre une information sur la case (ca te fais une bulle quand tu cliques sur le coin) 

sinon je vois pas.

pépé35530 · Answer

Bonjour,

Plusieurs solutions possibles :

Utiliser le renvoi à la ligne automatique dans format de cellule : la largeur de la colonne ne change pas, la hauteur de la ligne oui en fonction du texte.

Utiliser l'option "Ajuster" dans format de cellule : le texte apparaîtra en tous petits caractères mais sans modification de la taille de la cellule. Pour visionner son contenu, cliquer dessus puis sur l'onglet "affichage" et sur le bouton "zoom de la sélection". Pour revenir à la taille normal cliquer sur le bouton "Normal" tout à gauche.
On peut aussi créer un lien hyper-texte vers une cellule contenant les infos.

A+

pépé

Raymond PENTIER · Answer

"Je voudrai savoir s'il existe une formule pour que les cellules concernées uniquement s'ouvrent en plus grand quand je cliques dessus" : Non ! 
C'est bien, la retraite ! Surtout aux Antilles ... :-) 
? Raymond ?

eriiic · Answer

Bonsoir,

Une proposition en vba.
Sur le format de cellule de la colonne décocher 'renvoyer à la ligne automatiquement' et remettre une hauteur de ligne normale. Seul le début du texte apparaitra.
Un clic sur cette cellule fera apparaitre tout le texte en commentaire.

https://www.cjoint.com/?AKsxt2FbExu

eric

Mike-31 · Answer

Salut,

Une autre approche en supposant que tes lignes à augmenter sont colonne A et reprennent leurs hauteurs initiales, clic droit sur l'onglet de feuille concerné/Visualiser le code/colle le code ci-dessous dans la feuille blanche qui s'ouvre 

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
    If Target.Rows > 1 Then
    ActiveCell.Rows.AutoFit
    Else
    Rows.RowHeight = 15
    End If
End Sub


Tant que nous y sommes, pour élargir la colonne A

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error Resume Next
    If Target.Column = 1 Then
    Columns("A:A").EntireColumn.AutoFit
    Else
    Columns("A:A").ColumnWidth = 10.71
    End If
End Sub

pinine · Answer

Bonjour, 

Merci à tous pour vos réponses !! 

Je vais regarder tout cela, mais je crois que l'effet attendu n'existe pas...tant pis, je vais fonctionner autrement.

Merci

Mike-31 · Answer

Re,

Excel est capable de tout faire, ou presque tout il suffit de savoir lui demander.

Si j'ai bien compris ta demande, tu souhaites que les cellules par exemple colonne A qui contiennent plusieurs lignes se surdimensionnent pour voir la totalité du contenu.
Dans mon exemple ci-dessous si tu actives une cellule contenant des données de la colonne A, elle s'ouvriera pour afficher la totalité de son contenu

https://www.cjoint.com/?AKxkDGYMbSo

Mike-31 · Answer

Re,  

plus technique, le code pourrait s'écrire  

Option Explicit 
Private Sub Worksheet_SelectionChange(ByVal Target As Range) 
On Error Resume Next 
    Dim c As Variant 
    If Not Intersect(Selection, Range("A2:A100")) Is Nothing Then 
    Application.ScreenUpdating = False 
    For Each c In Sheets("Feuil1").Range("A2:A100") 
    Rows.RowHeight = 15 
    Next 
    Application.ScreenUpdating = True 
    Target.Rows.AutoFit 
    Target.WrapText = True 
    Else 
    Rows.RowHeight = 15 
    End If 
End Sub 

A+  
Mike-31  

Une période d'échec est un moment rêvé pour semer les graines du savoir.

Excel, ouvrir une cellule en grand...

8 réponses

Discussions similaires