Sujet Précédent Sujet Suivant

Répéter une macro

FRV812 -  
eriiic Messages postés 25847 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,
Bonjour, j'ai une base de données de 4000 lignes sur EXCEL 2003, et je veux inséerer 2 lignes entre chaque lignes. Je veux créér une macro qui répète chaquez fois l'opération. Celle que j'ai enregistré me renvoie toujours à ma ligne de départ. Merci dem'aider.
A voir également:

1 réponse

Réponse 1 / 1
eriiic Messages postés 25847 Date d'inscription   Statut Contributeur Dernière intervention   7 282
 
Bonjour,

si ta colonne A te donne la dernière ligne à traiter (sinon tu remplaces le A de [A65536] par ta colonne ayant le plus de lignes) :
Sub insere2()
Dim r As Long
For r = [A65536].End(xlUp).Row To 1 Step -1
Rows(r).Insert Shift:=xlDown
Rows(r).Insert Shift:=xlDown
Next r
End Sub

eric
0

Discussions similaires

Transformer un chiffre en lettres dans excel sans macro
vincentphilippos -
tontong -

6 réponses
recup couleur de cellule sans macro
magouero -
JvDo -

7 réponses
EXCEL transformer chiffres en lettre -facture
roland -
JBB -

26 réponses
convertir des chiffres en lettres avec une unique formule
FOUAD_9000 -
Mike-31 -

34 réponses
Tableau dans Word
etache -
Nicole_de_Gatineau -

26 réponses