insertion lignes avec condition

[pattie1505]

Merci pour vos conseils sur le format, ci joint le même fichier sous xls.

 

[Paritec]

Re : insertion lignes avec condition

re mexcellent le forum
a+
Papou 🙂

 

[ballmaster]

Re : insertion lignes avec condition

Slt paritec,

toute petite modification de ton code :

il souhaitait l'insertion sous le critère et non au -dessus

Option Explicit

Sub traiter()
    Dim i&, fin&
    fin = Feuil1.Range("A65536").End(xlUp).Row
    For i = fin To 2 Step -1
        If Cells(i, 3) = "PAR" Then Range(Cells([B]i + 1[/B], 1), Cells([B]i + 1[/B], 8)).Insert shift:=xlDown
    Next i
End Sub

a plouche

 

[ballmaster]

Re : insertion lignes avec condition

Paritec !, STP

Question de débutant,

je serais ainsi moins ignare ce soir que ce matin.

Pourquoi mettre le sigle & à la fin de chaque variable, quand tu les déclare ?? 😕

Merci

 

[Paritec]

Re : insertion lignes avec condition

Bonsoir ballmaster mexcellent
alors c'est tout simple je déclare mes variables en long
et au lieu d'écrire dim i as long dim i& veut dire la même chose
de même dim i as integer s'écrit aussi dim i%
en sachant que notre tableur chéri aujourd'hui ne considère plus les integer donc % et passe systématiquement en Long donc pour gagner du temps je passe tout de suite en long
de même dim i # = dim i as double dim i$ = dim i as string
bonne soirée
papou 🙂

PS: pour ballmaster , oui pour l'ajout de ligne au dessus ou au dessous moi je n'avais rien vu de précis à ce sujet enfin j'ai pas relu dix fois non plus!!

 

[pattie1505]

Re : insertion lignes avec condition

Bonjour Paritec,

Merci pour ta réponse mais je suis tellement nul que je n'arrive pas l'appliquer dans le fichier original d'une part et peut-on supprimer le bouton macro "traiter" pour passer par la fenêtre macro avec le bouton executer.

 

[Paritec]

Re : insertion lignes avec condition

Bonsoir mexcellent,
bon alors pas simple, car tu dis ne pas être capable d'utiliser la macro dans ton classeur et là ou j'ai automatisé, tu souhaites le rendre manuel!!!!
que te dire est-ce que l'on peut retirer le bouton, réponse OUI
est-ce que tu peux lancer la macro Traiter avec la fenêtre des macro exécuter réponse OUI
et j'ajoute que tu peux le faire même s'il y a encore le bouton
a+
papou 🙂