Re : Macro copier coller
Non cela ne marche pas
j'ai un débogage à la ligne verte
ne faut-il pas rajouter le genre de meme formule dans toutes les lignes ?
ne m'enguelez pas j'essai de comprendre lol
Sheets("livre de mission").Select 'copy Etablissement
Range("etablissement").Select
Selection.Copy
Sheets("data").Select
With ActiveSheet
derlig = .Cells.Find(What:="*", _
LookIn:=xlFormulas, _
SearchOrder:=xlByRows, _
SearchDirection:=xlPrevious).Row + 1
End With
Cells(derlig, 1).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Sheets("livre de mission").Select 'Numéro du livre de mission
Range("nlm").Select
Selection.Copy
Sheets("data").Select
colonne = Range("A65536").End(xlUp).Row + 1
Cells(ligne, 2).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False