Excel, ouvrir une cellule en grand...

pinine Messages postés 1 Statut Membre -  
Mike-31 Messages postés 19571 Date d'inscription   Statut Contributeur Dernière intervention   -
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
A voir également:

8 réponses

Raymond PENTIER Messages postés 71852 Date d'inscription   Statut Contributeur Dernière intervention   17 386
 
"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 ?
1
Raymond PENTIER Messages postés 71852 Date d'inscription   Statut Contributeur Dernière intervention   17 386
 
Comme on le constate, les solutions proposées ne sont pas des formules saisies dans des cellules, mais des macros en VBA.
0
chaoticaaalil Messages postés 35 Statut Membre 2
 
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.
0
pépé35530 Messages postés 3014 Statut Membre 1 390
 
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é
0
eriiic Messages postés 25847 Date d'inscription   Statut Contributeur Dernière intervention   7 282
 
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
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Mike-31 Messages postés 19571 Date d'inscription   Statut Contributeur Dernière intervention   5 139
 
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
0
pinine
 
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
0
Raymond PENTIER Messages postés 71852 Date d'inscription   Statut Contributeur Dernière intervention   17 386
 
Je crois que la suggestion #9 de Mike-31 (à 10:29) est celle qui peut le plus aisément répondre à ton attente.
0
Mike-31 Messages postés 19571 Date d'inscription   Statut Contributeur Dernière intervention   5 139
 
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
0
Mike-31 Messages postés 19571 Date d'inscription   Statut Contributeur Dernière intervention   5 139
 
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.
0