Discussion :

[MélanieJ]

Bonjour,

J' ai un formulaire sur excel qui affiche selon le code client que l'on sélectionne les informations concernant ce client grâce à une base de donnée et la formule recherche v.

Je souhaiterais que les cellules, qui sont fusionnées horizontalement, s'ajustent automatique selon la taille du texte appelé par la fonction.

J'espère que j'ai été à peu près claire!!

Merci pour votre aide.

[Daniel.C]

Bonjour,

Ça dépend de la disposition de tes données. Mets en pièce jointe un petit classeur exemple (sans données confidentielles).

[fring]

Bonjour,

Les cellules fusionnées sont une plaie et il n'y a pas la possibilité d'ajuster automatiquement leur largeur en fonction du texte.

Mais via un petit bricolage sur une feuille temporaire (elle peut éventuellement être masquée) il y a moyen de s'en sortir.

Le principe est le suivant :

• copie du texte des cellules fusionnées dans une cellule normale d'une feuille tampon
• ajustement automatique de cette cellule et récupération de la largeur de cette cellule
• relevé du nombre de colonnes fusionnées
• application, à chaque colonne de la cellule fusionnée, de la largeur de la cellule tampon divisée par le nombre de colonnes

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
Sub test()
Dim X As Single
With Sheets(2).Range("A1") '<-- feuille tampon à adapter
    .Value = Sheets(1).Range("A3") '<-- feuille et adresse de la cellule fusionnée à adapter
    .Columns.AutoFit
    X = .ColumnWidth
    .EntireColumn.Delete
End With
Debug.Print X
X = X / Sheets(1).Range("A3").MergeArea.Columns.Count '<-- feuille et adresse de la cellule fusionnée à adapter
Sheets(1).Range("A3").MergeArea.ColumnWidth = X '<-- feuille et adresse de la cellule fusionnée à adapter
End Sub

[MélanieJ]

Voici un exemple simplifié.

Ce fichier est enregistré en modèle de doc, les personnes séléctionnent l'UE qui les intéresse et doivent ensuite remplir le tableau en bas, imprimer et enregistrer.

Toutes les cellules sont protégées sauf celles qui dovent être remplies.
Les informations issues de recherchev doivent donc apparaître automatiquement et entierement.

J'ai essayé au départ avec - centrer sur plusieurs lignes - mais je ne veux pas que ce soit centré!

Merci

[MélanieJ]

Bonjour,

Reponse pour fring : Les colonnes de mon formulaire sont de tailles différentes!!! du coup ça me parait compliqué.

Par contre j'ai une autre idée mais je ne sait pas si c'est possible
Si je centre sur plusieurs colonne dans un premier temps, avec une macro :

- Ajustement automatique hauteur cellule
- Recupération hauteur
- Fusionner - Aligner à droite.

Est ce qu'un code pourrait me donner cette action?

Merci

[fring]

Reponse pour fring : Les colonnes de mon formulaire sont de tailles différentes!!! du coup ça me parait compliqué.

Oui ok mais je te rappelle que tu voulais ajuster la taille des cellules fusionnées horizontalement, donc il faut bien ajuster la taille d'une ou de plusieurs colonnes. Éventuellement on peut jouer sur la largeur d'une seule colonne et les autres restent fixes