XL 2013 need help/Utilisation du countif

Re : need help/Utilisation du countif

Bonsoir.
Faites le comme ça :

Re : need help/Utilisation du countif

Merci beaucoup ca fonctionne...et maintenant j'ai capté comment utiliser ces colonnes relavtives et leur syntaxe...Top!!!

Re : need help/Utilisation du countif

J'en profite pour poursuivre sur la suite ou la encore....je bloque...
J'ai une macro qui me fait copier des cellules d'une page a une autre (ca ca marche), par contre je ne voudrais que les valeurs et non les formules...si vous pouvez m'aider là encore....

Sub test()



Sheets.Add After:=ActiveSheet
ActiveSheet.Select
ActiveSheet.Name = "Analyse"




Dim Ws As Worksheet
Dim DerniereLigne As Integer
Dim DernColonne As Integer


For Each Ws In ThisWorkbook.Worksheets
Ws.Select

If Ws.Name = "Extraction" Or Ws.Name = "Analyse" Then


Else

DerniereLigne = Ws.Range("B" & Rows.Count).End(xlUp).Row
DernColonne = Range("A4").End(xlToRight).Column

Ws.Range(Cells(5, DernColonne), Cells(DerniereLigne, DernColonne)).Copy Sheets("Analyse").Range("A65536").End(xlUp).Offset(1, 0)
Selection.PasteSpecial xlValues, xlNone, False, False C'est ici cela bloque

End If
Next Ws

End Sub

Re : need help/Utilisation du countif

À priori si j'ai bien compris l'intention, écrivez en une seule instruction :
Sheets("Analyse").Range("A65536").End(xlUp).Offset(1, 0).PasteSpecial xlValues, xlNone, False, False
Vous pouvez aussi quand c'est plus pratique faire :
CelCible.Resize(PlgSource.Rows.count, PlgSource.Columns.Count).value = PlgSource.Value