Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2016 ajuster ligne et colonne

snoopy1

XLDnaute Nouveau
bonjour
je voudrai qu'en cliquant sur C7, liste déroulante( voir fichier joint: onglet recher),et après avoir fait un choix ,qu'en fonction de la (les) réponse(s) , les cellules se remplissent et elles s'ajustent au texte .
Cela est-il possible.J'ai été sur des forums et bidouillé un code (développeur :visualiser le code)
je mets le code que j ai crée et qui ne fonctionne pas :

Sub ajustement_ligne_colonne()

Target.address "c7" quand je clique dans "c7"qui est une liste déroulante,
Range("d6:x35").Select les réponses apparaissent dans cette plage et je voudrais
Cells.EntireRow.autofit que les cellules où s'affichent ces réponses soient à la dimension du mot
Cells.EntireColumn.autofit qui peut compter 3 lettres ou 10 lettres.

End Sub

merci de votre aide
 

Pièces jointes

  • klondike.xlsm
    82.3 KB · Affichages: 4
C

Compte Supprimé 979

Guest
Encore du crossposting

Tu auras peut-être la réponse ici

Ou là

Tu en as fait beaucoup comme ça
 

snoopy1

XLDnaute Nouveau
 

snoopy1

XLDnaute Nouveau
merci bruno45
certes c est du "crossposting" mais n'ayant pas eu de réponse satisfaisante sur developpez.com, alors que + de 100 personne ont vu mon post, j ai essayé sur 2 autres forums exel pensant avoir plus de chance.
désolé si cela ne t as pas plu!
j'ai une reponse :
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range) 'ajustement_ligne_colonne
If Not Intersect(Target, Range("C7")) Is Nothing Then
Cells.EntireRow.autofit
Cells.EntireColumn.autofit
End If
End Sub
merci
 

Discussions similaires

Réponses
7
Affichages
680
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…