Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1233 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  end.(xldown) sur une seule ligne ...[..pardon]

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

end.(xldown) sur une seule ligne ...[..pardon]

n°1136073
cocal
Posté le 30-06-2005 à 15:45:39  profilanswer
 

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
mood
Publicité
Posté le 30-06-2005 à 15:45:39  profilanswer
 

n°1136137
EscartePhi​l
Posté le 30-06-2005 à 16:13:31  profilanswer
 

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.

n°1136317
cocal
Posté le 30-06-2005 à 18:21:24  profilanswer
 

... 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
 

n°1136332
cocal
Posté le 30-06-2005 à 18:46:57  profilanswer
 

la honte mais merci quand meme, passque l'air de rien j'y avais pas pensé....

n°1136439
AlainTech
Pas trouvé? Cherche encore!
Posté le 30-06-2005 à 21:05:07  profilanswer
 

Pour connaître la dernière ligne utilisée:
 
ActiveSheet.UsedRange.Row


---------------
Si on vous donne une info qui marche, DITES-LE!!!! ------ Si vous trouvez seul, AUSSI, votre solution peut servir à d'autres! ------ Je dois la majorité de mes connaissances à mes erreurs!
n°1136756
EscartePhi​l
Posté le 01-07-2005 à 08:47:09  profilanswer
 

Hello,
de rien bonhomme,
ça fait plaisir de pouvoir aider.
C la chaleur qui grille les neurones...
@+


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  end.(xldown) sur une seule ligne ...[..pardon]

 

Sujets relatifs
Test logique puis masquage de la ligne correspondante?Faire des membres d'une classe en "lecture seule"
changer la couleur d'une ligne d'un tableau avec les cssLire ligne précédente d'un fichier
ListBox ou ListView => chaîne trop longue, cmt passer à la lignemysql en ligne de commandes
formulaire : ajout d'une ligneProbleme d'affichage css (retour a la ligne)
Appliquer un style sur une seule colonne d'un tableau [résolu]alignement à droite, au milieu et à gauche sur la même ligne
Plus de sujets relatifs à : end.(xldown) sur une seule ligne ...[..pardon]


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR