end.(xldown) sur une seule ligne ...[..pardon] - VB/VBA/VBS - Programmation
Marsh Posté le 30-06-2005 à 16:13:31
Hello!
tu n'as qu'à faire un truc tout con (si j'ai bien compris ta question): je connais pas trop le code (c'est du Visual Basic sur excel?) mais voilà la philosophie.
Tu regardes la deuxième entrée de ta base, si elle est vide, tu utilisa la méthode range sinon tu utilise ton xldown.
Marsh Posté le 30-06-2005 à 18:21:24
... et parfois la honte vous gagne ...
et je peux même plus dire que je suis un grand dévbutant sur VBA ...
bon je poste mon code; on sait jamais si un autre bloque la dessus un soir de grande fatigue :
If Range("A3" ) <> "" Then
Range("A2:AB2", Range("A2:AB2" ).End(xlDown)).Select
Selection.Copy
Else
Rows("2:2" ).Select
Selection.Copy
End If
Marsh Posté le 30-06-2005 à 18:46:57
la honte mais merci quand meme, passque l'air de rien j'y avais pas pensé....
Marsh Posté le 30-06-2005 à 21:05:07
Pour connaître la dernière ligne utilisée:
ActiveSheet.UsedRange.Row
Marsh Posté le 01-07-2005 à 08:47:09
Hello,
de rien bonhomme,
ça fait plaisir de pouvoir aider.
C la chaleur qui grille les neurones...
@+
Marsh Posté le 30-06-2005 à 15:45:39
ouala mon pitit probleme :
je dois régulièrement redéfinir une base avec le end.(xldown), base que ma macro copy et colle ailleurs.
Ca marche très bien sauf que si il n'y a qu'une seule entrée dans la base, mon xldown séléctionne toute la feuille (jusqu'à la ligne 65 000 et des poussières).
Je voudrais qu'elle ne sélectionne qu'une seule ligne s'il n'y en a qu'une ... Ca doit etre posible mais alors comment ???
merci à "Ceux Qui Savent"
Message édité par cocal le 30-06-2005 à 18:18:53