c cognet
Messages postés1Date d'inscriptionjeudi 1 juin 2006StatutMembreDernière intervention22 juillet 2008
-
22 juil. 2008 à 09:52
PCPT
Messages postés13272Date d'inscriptionlundi 13 décembre 2004StatutMembreDernière intervention 3 février 2018
-
22 juil. 2008 à 11:06
Bonjour,
J'ai une feuille contenant des données, je sélectionne la ligne désirée je la coupe ensuite je recherche la première cellule vide de ma colonne A où j'aimerais coller la ligne précédemment couper. Lors de l'exécution il me met une erreur 438. Voici un bout de mon code
AdrCell = ActiveCell.Address
ActiveCell.EntireRow.Cut
Range("A1").End(xlDown).Offset(1, 0).Select
Selection.Paste
Range(AdrCell).EntireRow.Delete
c'est du VBA Excel
Merci