Discussion :

[khame1]

Bonjour,

je copie une ligne d'une feuille d'un classeur vers une feuille d'un autre classeur.
jusque là pas de problème.
Mais quand je copie la même ligne sur une autre feuille dont les colonnes sont plus larges (autofit pour titre) le PASTE tombe en erreur.
Je redonne la largeur standard des colonnes sur la cible et le PASTE se déroule sans erreur.
Voilà mes commandes

Code :

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

1
2
3
4
5
6
7
Worksheets(StrshD).Rows(i).Copy                 '   take the line
....
...
..
Rows(Counter).Select                            '   select the row
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:= _
    False, Transpose:=False                     '   paste the line

Quelqu'un a -t-il une solution à me proposer pour éviter cette erreur ?
Merci d'avance...

[COCONUT2]

Avec les ordis, je ne suis pas du genre contrariant
Si ca passe avec la largeur standard, tu remets toutes les colonnes en standard, tu fais ta copie et tu les repasses toutes dans le format d'origine.

Il te suffit d'intégrer une boucle qui va stocker la largeur des colonnes dans une feuille qui ne te sert pas (qui pourra meme etre supprimée en fin de macro)
puis de refaire une boucle qui va te remettre les largeurs de colonne initiales.
Ca va te couter 2 secondes de temps de macro.
Christophe