compter ligne copier puis coller si place

[codothlo]

Bonjour,
Mon problèmes est le suivant :
J'ai dans une feuille une liste variable (en nombre de lignes) de valeurs a copier et à coller dans une autre feuille.
Jusque là pas de problèmes. Le trac est que je veux la copier à la suite d'une autre liste. Seulement le code que je ne trouves pas est celui qui consisterais à lui dire : "si tu n'as pas assez de place pour coller (nb de lignes vides restantes > nb de ligne copiées), vas coller dans une autre colonne".

Je sais selectionner les lignes, aller à la dernièere occupée, mais je ne sais pas faire la comparaison entre lignes copiée et la place libre.
merci de votra aide

 

[Guest]

Re : compter ligne copier puis coller si place

Bonjour,

Avec un exemple se serait plus facile.

Mais avec quelque chose du genre:

If Derligne + PlageCopiee.Rows.Count > Rows.Count Then
  ' coller dans autre colonne
else
  ' coller à la suite
end if

Où DerLigne et le numéro de la dernière ligne occupée de la colonne
PlageCopier.Rows.count =Nombre de ligne copiées
Rows.Count (tout seul) renvoie le nombre de ligne de la feuilles

A+

 

[codothlo]

Re : compter ligne copier puis coller si place

Merci pour la réponse.
L'exemple est le suivant :
feuil1 ligne14 à n (n=9000) lignes à copier
feuil2 dernier ligne occupée = ligne 60 000
Sachant que la feuille compte 65536 ligne, je n'ai pas la place.
merci beaucoup

 

[codothlo]

Re : compter ligne copier puis coller si place

re
Si j'ai bien compris le code, ça devrait marcher.
Encore un grand merci, cela fait maintenant 2 jour que je cherche sur tous les forums ce bout de code.
Vraiement sympas de ma dépanner
Merci