demande de formule svp

V

vtt60

Guest
je voudrai incerer quelques cellules bien defini par une macro qui copirait ces cellules juste sous la derniere cellule remplie d une colonne bien defini en esperant avoir ete suffisament claire
 

andré

XLDnaute Barbatruc
Salut Tibo,

Même longueur d'onde, même combat !

Je viens de voir tes deux messages (inverser les lettres et chiffres romains).
Tellement bien, que j'ai d'abord pris soin de les enregistrer, de peur qu'ils ne disparaissent !

C'est du beau travail, je m'incline.

Bon dimanche.
Â+
 

Hervé

XLDnaute Barbatruc
Bonjour vtt, tibo, andré, le forum

Vtt, je suis pas sur d'avoir compris ta question, mais si tu veux trouver la premiere celllule vide d'une colonne en VBA, utilises ceci :

range('a65536').end(xlup).row + 1

ceci va te donner le numéro de la première ligne vide de la colonne A.

A ce numéro tu joins une lettre de colonne :

Code:
range('a' [color=#FF0000]&[/color]  range('a65536').end(xlup).row + 1)

Ainsi tu auras trouvé la cellule de la colonne A qui est vide.

Pour copier, tu as ce type de code :

Code:
Range('b1').Copy
Range('a' & Range('a65536').End(xlUp).Row + 1).Select
ActiveSheet.Paste

qui copie la cellule b1 sur la première cellule vide de la colonne A. ce code peut etre avantageusement remplacé par :

Code:
Range('a' & Range('a65536').End(xlUp).Row + 1)=Range('b1')

Voilà, je suis vraiment pas sur que ma réponse trouvera ton suffrage, mais eu regard de tes explications, j'ai pas trouvé mieux.

sinon joins-nous un classeur en expliquant précisément ton souci.

d'ailleurs accompagne ce classeur d'un bonjour toujours agréable à lire :)

salut
 

Discussions similaires

Réponses
6
Affichages
260