Excel, ouvrir une cellule en grand...

"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 ?

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.

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é

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

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

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

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

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.