utiliser une macro pour insérer une ligne à copier Fermé

Question

Bonjour,  
Je prépare une automatisation de cas de tests, 

Sur une ligne de référence je saisi des données, et je souhaiterai qu'à chaque nouveau cas à passer, je lance une macro qui copie / colle ma ligne de référence à la suite des premières déjà renseignées :  

Ci-après la macro qui fait le copier / coller et se positionne sur la ligne suivante, et je voudrais l'automatiser, quelqu'un pourrait m'aider ? 

A23, et la première ligne d'où doit commencer mon coller, et donc A24, la suivante (même si vous l'avez compris ce devrait être x+1) 


Sub Jouer_un_cas_de_test() 
' 
' Jouer_un_cas_de_test Macro 
' 

' 
    Rows("2:2").Select 
    Selection.Copy 
    Range("A23").Select 
    ActiveSheet.Paste 
    Range("A24").Select 
End Sub 



Encore merci !!!! 
Configuration: Windows 7 / Internet Explorer 9.0

eljojo_e · Answer

bonjour,

si j'ai compris, la ligne 2 doit etre copier sur la dernière :
 
Sub Jouer_un_cas_de_test() 
' 
' Jouer_un_cas_de_test Macro 
' 

' 
Rows("2:2").Select 
Selection.Copy 
for a = 1 to 1000

if range("a" & a).value = "" then
rows(a & ":" & a).select
ActiveSheet.Paste 
exit sub
end if

next

ens sub

ccm81 · Answer

Bonjour

Ta demande ne me semble pas très claire.
Peux tu envoyer une partie de ton fichier, éventuellement anonymisé, au format excel 2003 su cjoint.com et joindre le lien obtenu à ton prochain message
N'oublies pas d'y ajouter quelques explications,( ce que tu veux obtenir, quand, à partir de quoi) avec un ou deux exemples

bonne suite

Utiliser une macro pour insérer une ligne à copier

2 réponses

Discussions similaires