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

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Debutant VB: un probleme de ligne a copier!!!

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Debutant VB: un probleme de ligne a copier!!!

n°1914441
aqua31
Posté le 12-08-2009 à 15:42:29  profilanswer
 

Bonjour a tous,
 
 
Je suis nouveau dans le monde du VBA et pour ainsi dire je n'y connais rien...
Je cherche a écrire un code pour réaliser ceci:
J'ai deux plages de données sur une même feuille de calcul. Chaque ligne de ma plage de données 1 (qui va de la ligne 1 a 2053) a une ligne qui lui correspond dans le plage de données 2 (lignes 2069 a 4441). Le point commun entre ces ligne est un numéro de client. Je cherche donc a coller a la suite de la ligne i de la plage 1 la ligne j de la plage 2 ayant le même numéro client. (je ne sais pas si c'est clair mais je peux préciser si vous voulez)
 
Voici le code que j'ai tape et qui ne marche pas:
 
 
Sub SupprimerLignes()
Const LigneDebut = 1 ' entre 1 et 65536 pour Excel 2003
Const LigneFin = 2053 ' entre 1 et 65536 pour Excel 2003
Const LigneDebut2 = 2069
Const LigneFin2 = 4441
Const ColonneEquiptype = 4 ' entre 1 et 255 pour Excel 2003
Const ColonneEquitype2 = 1
For i = LigneFin To LigneDebut Step -1
j = 4441
While Cells(i, ColonneEquitype) <> Cells(j, ColonneEquitype2)
j = j - 1
Wend: Range("j:j" ).Copy
Range("i,Ki:ABi" ).Paste
Next i
End Sub
 
 
Pouvez vous m'aider svp??
 
 
Merci beaucoup par avance


Message édité par aqua31 le 12-08-2009 à 16:02:52
mood
Publicité
Posté le 12-08-2009 à 15:42:29  profilanswer
 

n°1914603
Deamon
Posté le 13-08-2009 à 08:14:18  profilanswer
 

Range("i,Ki:ABi" )
 
Ca ne veut rien dire ça. Si le i est une variable il faut concaténer tes valeurs (par exemple si tu veux "A5" et que i = 5 alors tu écris "A" & i)

n°1914800
aqua31
Posté le 13-08-2009 à 14:26:34  profilanswer
 

ok!!  
 
Merci, est ce que quelqu'un peut juste m'expliquer rapidement la syntaxe des ranges, rows... Parce que je comprend pas ce qu'est &?
 
 
MErci

n°1914807
Deamon
Posté le 13-08-2009 à 14:47:09  profilanswer
 

tu sélectionnes ta fonction et F1 dans VBA pour l'aide de la fonction. :o

 

Le & c'est pour concaténer une chaine de caractère car si t'écris "ABi" il est pas censé savoir que i c'est une variable.

 

Mais aucun lien direct entre range et &.


Message édité par Deamon le 13-08-2009 à 14:47:29
n°1914813
_xme_
Posté le 13-08-2009 à 14:55:42  profilanswer
 

& est simplement le mot cle de concaténation en VBA (et en VBS d'ailleurs :wahoo: )
Pour ceux qui est de la synthaxe, un peu de google aurait pu te répondre  :sarcastic:  
Sauf erreur de ma part en gros tu as :
- Cells (i, j) qui permet de s'adresser à une cellule  
Tu lui donnes comme arguments les nombres qui désigne la cellule visée
 
- Range(s) qui permet de s'adresser à une selection de cellule
L'argument est cette fois-ci une chaîne de caratère. Du moment que la chaîne est valide tu peux avoir plein de résultat  
 
- ROW(), COLULN() / LIGNE(), COLONNE() qui sont des fonction prédéfini d'Excel qui te renvoye la ligne ou la colonne dans lauelle se situe le curseur.
L'inconvénient de ces fonctions c'est qu'elles dépendent de la langue utilisée sur Excel. Ainsi dans mon excel en français row() ne marche pas, alors que ligne() marche...  
 
Edit grilled, faut que j'arrète de faire 15 trucs à la fois tu avais répondu depuis déjà 8 min  :whistle:


Message édité par _xme_ le 13-08-2009 à 14:57:25

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

  Debutant VB: un probleme de ligne a copier!!!

 

Sujets relatifs
problème de recuperation des données[JSF & RichFaces] Problème de click sur ligne d'un datatable
( Prog C )Probleme Afficheur Lcd 2x16problème d'insertion
[VBA] Problème avec Workbooks.Open[VBA] problème dans une boucle
[VB.NET] Sauvegarde en fichier xmlproblème de loginmode avec sqlserver 2005
probleme session php - header tout ca. 
Plus de sujets relatifs à : Debutant VB: un probleme de ligne a copier!!!


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