stephane.quinquis
XLDnaute Junior
Bonjour le forum,
Encore un problème à résoudre. J'ai deux feuilles : inventaire production et mise en carton.
Une personne lambda souhaite transférer des données de l'inventaire production vers la mise en carton.
Pour cela, elle sélectionne une ligne entière puis elle appuie sur le bouton macro.
Il n'y a pas de problème si je souhaite coller en colonne A dans mise en carton. Par contre, si je souhaite coller sur la colonne C comme dans mon exemple, il ya des problèmes de format de cellule.
Y a-t-il moyen de contourner cela??
Merci d'avance
Inventaire production exemple
Cijoint.fr - Service gratuit de dépôt de fichiers
Code macro:
Encore un problème à résoudre. J'ai deux feuilles : inventaire production et mise en carton.
Une personne lambda souhaite transférer des données de l'inventaire production vers la mise en carton.
Pour cela, elle sélectionne une ligne entière puis elle appuie sur le bouton macro.
Il n'y a pas de problème si je souhaite coller en colonne A dans mise en carton. Par contre, si je souhaite coller sur la colonne C comme dans mon exemple, il ya des problèmes de format de cellule.
Y a-t-il moyen de contourner cela??
Merci d'avance
Inventaire production exemple
Cijoint.fr - Service gratuit de dépôt de fichiers
Code macro:
Code:
Sub allerversmiseencarton()
'
' allerversmiseencarton Macro
' Macro enregistrée le 11/06/2010 par quinquis
'
ActiveSheet.Unprotect "293"
Sheets("Mise en carton").Unprotect "293"
With Selection
.Copy Destination:=Feuil2.Range("C65536").End(xlUp).Offset(1, 0)
.Delete
End With
Range("G7:G200").Select
Selection.Locked = False
ActiveSheet.Protect "293"
Sheets("Mise en carton").Protect "293"
End Sub