largeur de cellules différentes

Bonjour Cédric, le forum

C'est impossible hors fusion de cellule et tu seras de toute façon limité à 256 cellules par ligne. Le seul moyen que je voie pour faire ce que tu veux est de passer par des objets dessinés.

Cordialement, A+

Bonjour Yeahou,
Je me doutais que ce serait difficile
Mais étant donné que cette ligne ne serait qu'indicative et qu'elle n'intervient pas dans les calculs du tableau comment pourrais je faire intervenir des objets dessinés?

Re bonjour

j'ai utilisé un système de ce genre il y a quelques années
voici un code qui crée une ligne, la place et la dimensionne en fonction de variables correspondant à sa durée et de valeurs correspondant à l'emplacement de cellules.
Set Dessin_En_Cours = ActiveSheet.Lines.Add(1, 1, 1, 1): Dessin_En_Cours.Border.Weight = xlThin: Dessin_En_Cours.Top = Range("A1").Offset(Compteur4, 0).Top + (Range("A1").Offset(Compteur4, 0).Height / 2): Dessin_En_Cours.Left = Val_Heure_Min + (((Hour(Heure_En_Cours) * 60) + Minute(Heure_En_Cours)) * 0.6)

le principe, c'est d'adopter une échelle de points correspondant à une échelle de durée. Cela te permet de créer et de placer des objets dessinés selon tes besoins en te repérant par rapport aux coordonnées et aux tailles de cellules. si tu as des opérations de taille à faire par la suite sur tes cellules, il ne faut pas oublier de définir tes objets comme n'étant pas dimensionnés avec les cellules avec un .Placement = xlFreeFloating.

Cordialement, A+