boucle + evenement + incrementer [NOOB]

boucle + evenement + incrementer [NOOB] - VB/VBA/VBS - Programmation

Marsh Posté le 02-04-2007 à 18:01:00    

Bonjour à tous.
 
 
je veux faire un truc tout simple mais je n'y arrive pas.. je connais un peu vba, mais pas du tout les boucles.
je vous explique le très simple et apres je me demerde
 
soit une plage  
 

Code :
  1. B2:H3


 
que je veux recopier en  
 

Code :
  1. B5:H6


 
et ceci la premiere fois, apres je veux que selon le choix de l'utilisateur par msgbox on continu ou on arrete.
 
si on continue alors
 
je recopie

Code :
  1. B2:H3

mais sur

Code :
  1. B8:H9


 

Code :
  1. B5:H6

s'increment à chaque boucle pour ne jamais recopier au meme endroit
 
Merci d'avance de votre aide précieuse.
 
j'aimerais juste le code la boucle, pour reussir à avancer un peu.

Reply

Marsh Posté le 02-04-2007 à 18:01:00   

Reply

Marsh Posté le 03-04-2007 à 07:13:12    

Alors.. personne pour m'aider.. SVP..

Reply

Marsh Posté le 03-04-2007 à 09:47:47    

Quelque chose du genre, ça t'inspire ?

Sub TraitementPrincipal()
    ' il faut traiter ici le cas initial B2:H3

 

   While OnContinue()
        ' ici, le traitement incrémentiel de la plage de copie
   Wend
End Sub

 

Function OnContinue() As Boolean
    OnContinue = MsgBox("Voulez-vous continuer ?", vbYesNo) = vbYes
End Function


Message édité par tegu le 03-04-2007 à 09:48:42
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed