VBA problème dernière ligne copier/coller

[invite948b37db]

Oups, c'est :

Range("g21").Select
If(ActiveCell.Offset(1,0).value<>"" Then
       Range(ActiveCell, ActiveCell.End(xlDown)).Select
End If

-----

[invite9fb11ebe]

punaise on va pas y arriver ....
lorsqu'il y a une formule dans une cellule il considère qu'elle n'est pas vide ..... donc il la sélectionne et la colle aussi.....pfff
pourtant je suis en special paste.value ... c'est normal?

[invite948b37db]

Ces formules sont au milieu des données ou après les valeurs à copier ?
Les valeurs à copier sont des nombres ou du texte ou les deux ?

[invite9fb11ebe]

J'avais à copier/coller des colonnes. Exemple: "G41:G45"
Chaque cellule contient: =SI(E41="";"";MOYENNE(E41:F41) )
Donc si rien en colonne E, rien en colonne G.

Cependant, on ne voit rien, mais excel voit la formule. Du coup il copie la formule (qui ne contient aucune valeur). Il colle "rien" dans la cellule de destination. On ne voit rien dans la cellule de destination mais lui la voit non vide..... du coup quand on décide de coller sous la dernière cellule non vide, il y a un décalage visuel.


BREF, j'ai fait une formule pour calculer la moyenne dans une autre feuille, comme ça j'ai mon nombre de valeurs EXACTES, je n'importe que le strict nécessaire et ça fonctionne

Merci pour ton aide cherbe !!!!

[invite948b37db]

BREF, j'ai fait une formule pour calculer la moyenne dans une autre feuille, comme ça j'ai mon nombre de valeurs EXACTES, je n'importe que le strict nécessaire et ça fonctionne

Je t'avais posé la question de savoir si c'était des nombres car VBA peut les détecter avec la fonction IsNumeric. Il était donc possible de distinguer les valeurs à copier.