Fusion en VBA

[eliot raymond]

Bonjour gens du forum,

Apres avoir fouiner sur le site je n'ai pas trouver mon bonheur, car je souhaiterai fusionner deux cellules et deux colonnes.

(1) Fusionner ces deux cellules C1 et D1
(2) Fusionner ces deux colonnes a partir de E2 et F2 jusqu'a E25 et F25
(3) Que je placerai en Private Sub Workbook_Open()

Si quelqu'un avait un petit bout de code a me fournir, vous m'en verrer ravi et ca serai super sympa SVP merci.

En attendant un bon appetit et une bonne journée a tous

Raymond

 

[jp14]

Re : Fusion en VBA

Bonjour


Pour avoir une réponse, ce serait mieux de joindre une fiche exemple.

Fichier .zip sans accent, ni espace ni caractère spécial dans le nom.

JP

 

[mromain]

Re : Fusion en VBA

bonjour,

voici un bout de code :
Range("C1😀1").MergeCells = True
Range("E2:E25").MergeCells = True
Range("F2:F25").MergeCells = True


a+

 

[eliot raymond]

Bonjour gens du forum,

Je repost comme demander avec un petit fichier fichier avec qui ca devrai etre plus facile

Je souhaiterai fusionner deux cellules et deux colonnes.

(1) Fusionner ces deux cellules C1 et D1
(2) Fusionner ces deux colonnes a partir de E2 et F2 jusqu'a E25 et F25
(3) Que je placerai en Private Sub Workbook_Open()

Si quelqu'un avait un petit bout de code a me fournir, vous m'en verrer ravi et ca serai super sympa SVP merci.

En attendant un bon appetit et une bonne journée a tous

Raymond

 

[jp14]

Re : Fusion en VBA

Bonjour

Ci dessous la macro à placer dans ThisWorkbook

Private Sub Workbook_Open()
With Sheets("Feuil1").Range("C1:D1")
        .HorizontalAlignment = xlCenter
        .VerticalAlignment = xlCenter
        .MergeCells = True
End With
With Sheets("Feuil1").Range("E2:F25")
        .HorizontalAlignment = xlCenter
        .VerticalAlignment = xlCenter
        .MergeCells = True
End With
End Sub

JP

 

[eliot raymond]

Re : Fusion en VBA

Bonjour JP14, forum

C'est bon ca marche, je te remercie, je ne savais pas pour .MergeCells = True et je suppose que .MergeCells = False annule l'effet precedent, puisqu'on est dans le sujet, il y a t'il une autre maniere de si prendre pour le meme resultat ca pourrait certainement me servir comme j'apprends alors je note tout.

Merci bien pour le code et la bonne apres midi

Raymond

 

[jp14]

Re : Fusion en VBA

Bonjour (re)

J'ai simplement adapté le code obtenu avec l'enregistreur de macro.

JP