Alors, en premier, tu déclares une variable en tant qu'objet cellule (ou plage de cellules)
Code :
- Dim cellule As Range
|
Pour l'instant, ton objet est non alloué, donc null.
Donc, on dit que ton objet est égal à l'objet cellule active
Code :
- Set cellule = ActiveCell
|
En faisant ça, ce qui est intéressant, c'est que ton objet cellule récupère toutes les caractéristiques et méthodes d'une cellule normale.
Ensuite, tu remplace le code d'origine par l'objet :
Code :
- Worksheets("base de donnée" ).Range("A30:D32" ).Copy
Worksheets("proto 1" ).Range("A39" ) - Worksheets("base de donnée" ).Range("A30:D32" ).Copy cellule
|
Donc là, tu remarqueras que ton objet cellule est égal à une cellule très précise (onglet + adresse de la cellule).
Quand tu n'as plus besoin de manipuler ton objet, tu le détruis pour désallouer la mémoire :
Code :
- Set cellule = Nothing
|
Voilà, j'espère que c'est clair, sinon, tu peux demander, j'essaierai de répondre
---------------
Bel ours Vave, je me dois de l’admettre. -Skyl"win"- Mais toi tu es intelligent -Homerde- - Ce génie -SkylWINd- JDD S16M72 10:43:46 GMT-DTC +1