Re : recuperer la valeur de 3 case sur plusieur feuil
merci pr les réponses Guillaume, j'ai fait une petite modif sur la macro est ça donne des bonnes resultats, c'est exactement ce que je cherché
-------------------------------------------------------------------------------
Sub jj()
Dim sh As Worksheet
Application.DisplayAlerts = False
On Error Resume Next
Sheets("Compilation").Delete
Application.DisplayAlerts = True
On Error GoTo 0
Sheets.Add
ActiveSheet.Name = "compilation"
For Each sh In ActiveWorkbook.Sheets
If sh.Name <> "resume" Then
derlig = ActiveSheet.UsedRange.SpecialCells(xlCellTypeLastCell).Row
sh.Range("C1").Copy Sheets("resume").Cells(derlig + 1, 1)
sh.Range("C2").Copy Sheets("compilation").Cells(derlig + 1, 2)
sh.Range("C3").Copy Sheets("compilation").Cells(derlig + 1, 3)
sh.Range("C4").Copy Sheets("compilation").Cells(derlig + 1, 4)
sh.Range("G84").Copy Sheets("compilation").Cells(derlig + 1, 5)
Sheets("compilation").Cells(1, Dercol + 1)
End If
Next
End Sub
-------------------------------------------------------------------------------
j'ai que un probleme de lecture pour une casse ou il y a une somme a faire, il me prend pas la valeur de la somme.
j'aimerai savoir si c'est possible que la macro cree un autre classeur excel ou elle met les valeur de ces casses?
merci d'avance