Re ventilation de ligne
Bonjour,
Malgré tous mes efforts, je n'ai toujours pas pu régler mon problème, je me permet de vous relancer.
Le tableau sur lequel je travail est le suivant:
https://www.excel-pratique.com/~files/doc/zsroqClasseur1_Suivi_BC.xls
Comme vous pourrez le voir, il y a un code, permettant l'ajout de ligne avec une numérotation automatique dans la 1ere colonne, qui ne fonctionne pas correctement.(1er problème)
De plus, j'aimerai pouvoir ventiler mes lignes en fonction du fournisseur sur une autre feuille.(fichier exemple ci dessous, sauf que dans mon cas, il faudrait que la ligne soit supprimer de la feuille principale après la ventilation.)
https://www.excel-pratique.com/~files/doc/Copie_de_lollimac_v1.xls
le lien de mon sujet de base:
https://www.excel-pratique.com/forum/viewtopic.php?t=6449
Merci d'avance
Petu
hello
peux-tu effacer ton message et simplement relancer le topic qui existait ?
tout simplement en y ajoutant une réponse "relance"
ça évite les doublons
merci
Bonjour,
pour ton premier problème, essaie avec ce code :
Sub insere_ligne()
Dim DerLig As Long
Application.ScreenUpdating = False
DerLig = [A65000].End(xlUp).Row
Rows(DerLig & ":" & DerLig).Cut
Rows(DerLig & ":" & DerLig).Insert Shift:=xlDown
Rows(DerLig + 1 & ":" & DerLig + 1).ClearContents
Cells(DerLig + 1, 1).Value = Cells(DerLig, 1).Value + 1
End SubPar contre, pour le deuxième, maintenant que tu as redéfini ta base de données, selon quelles cellules, tu veux exporter la ligne, et ensuite, la supprimer?
Et la numérotation (colonne A) doit-elle être redéfinie?
re,
si je comprend bien, jmd, il faut que je supprime le sujet dans lequel on se trouve, pour retouner dans l'ancien?
si oui, explique moi comment faire pour le supprimer.
Felix,
le 1er problème est résolu.
Maintenant, je veux exporter mes lignes selon la colonne fournisseur (à l'aide d'un bouton formulaire), et les supprimer une fois qu'elles ont été exporté. (as tu regardé le fichier de Sylvain (
), on pourrait l'adapteren arrangeant un peu.
amicalement,
Petu
Re-,
disons que ma question n'était pas celle-là, mais en fonction de quel(s) critère(s), tu veux ventiler (colonne N ou O)?
re,
trop tard pour "supprimer" le topic, car felix a été super rapide et efficace sur ce coup
(rem : il ne s'agissait pas de supprimer, mais avec le bouton "éditer" ou "modifier" d'effacer le texte et de mettre un titre genre "message annulé)
tant pis, c'est pas grave.Penses-y pour la prochaine fois.
bonne continuation à vous sur ce topic.
Re,
En fait, c'est embêtant parce que les deux peuvent etre cochées donc...mais avec le bouton, on a vraiment besoin de critère? Car je pensais qu'il suffisait d'y affecter la macro et de cliquer quand on veut.
Explique moi comment tu vois cela.
Petu
Re-,
est-ce que les deux, sur la même ligne, peuvent être cochées (par exemple O8= "x" ET N8 = "x")?
Re,
Oui, cela est possible.
Re-
regarde le fichier
le code est commenté
Par contre, très IMPORTANT, supprimes tous les espaces dans
"CAA' 'Conseil Antilles Agencement" (n'en garde qu'un)
"CAA Conseil Antilles Agencement"
Sinon, Bug, on ne peut pas renommer un onglet avec autant de caractères (le max que j'ai pu, c'est 31)
https://www.excel-pratique.com/~files/doc/tw1ISpetula_v1.xls
Re,
ça marche bien chez toi?
Moi j'ai des petits soucis, en cliquant sur le bouton, il n'y a rien, il faut que je clic droit dessus, que je fasse affecter macro ventile, et la le transfert se fait.
Petu
Re-,
pas de soucis....?????
Sinon, cela fonctionne bien?
Re,
apparament le transfert est ok mais pas la suppression.
amicalement
Petu
Re-,
?????????
Que se passe-t-il?
A priori, rien, donc.....
Dans le code, mets un quote ( ' ) devant le dernier On Error Resume Next (en bas), et donne le code d'erreur (s'il y en a un)
Re,
je te joint mon fichier original, verifie stp.
https://www.excel-pratique.com/~files/doc/kUa5HSuivi_Bon_de_Commande_2008.xls
Petu
Re-,
j'ai rajouté une condition, sile nombre de lettres du nom du fournisseur est supérieur à 31, on tronque ce nom, pour n'en garder que les 31 premières lettres
https://www.excel-pratique.com/~files/doc/kUa5HSuivi_Bon_de_Commande_2008.zip
Re,
la c'est ok, tout fonctionne.
Je te remercie pour ton aide.
amicalement
Petu