[ VBA ] >> Insertion difficile d'une ligne à cause des fusions de cellules .....

[Tchupacabra]

[ VBA ] >> Insertion difficile d'une ligne à cause des fusions de cellules .....

Bonjour,

j'essaye tant bien que mal de faire une insertion de ligne en VBA.
Pour l'instant, j'ai ça :



Sheets(feuille).Rows(ligne).Select
Selection.Insert Shift:=xlDown

Le problème arrive lorsque que par exemple avec :

ligne = 10
et
les cellules ("I8:I15") sont fusionner.

Ma procédure sélectionne les lignes 8 à 15 et insére 8 lignes.....

Comment dois-je faire ?

Parce que manuellement, ça marche nickel......

merci

@+

 

[sousou]

Re: [ VBA ] >> Insertion difficile d'une ligne à cause des fusions de cellules .....

Bonjour,

c'est ton select qui te gène.
essaie ce code!
Sheets(feuille).Rows(ligne).EntireRow.Insert

 

[Tchupacabra]

Re: [ VBA ] >> Insertion difficile d'une ligne à cause des fusions de cellules .

Salut sousou,

merci beaucoup !!!

ça marche nickel

@+