XL 2019 ma macro fonctionne et au bout de quelques ligne il buggue

miamidos · 20 Mars 2020

bonjour j'ai un souci avec la macro j arrive pas a trouver l erreur il fonctionne jusqu' a une certaine ligne puis il me mais la fenêtre de débogage des fois il Bugue a la ligne 35 mais après la ligne 54 la cet tout le temps pouvait vous m aider a trouver l erreur merci d avance que doit je faire ? et ici le fichier pour télécharger car il fait 2 Mo et trop volumineux pour le joindre en fichier je sait pas si je me suis bien expliquer j espère que oui merci a tous

patricktoulon · 22 Mars 2020

et dire que des débutants suivent aveuglement ces tutos video merdiques sur youtube
on s’étonne après de les voir débarquer et poser des question qui ont la réponse en elle même

tu ajoute une ligne a ton TS le row c'est le row de la listrow.range.row un point c'est tout

VB:

Sub addArticle()
With Sheets("bd").ListObjects(1).ListRows.Add
.Range.Resize(, 5) = Array(Now(), , article, nombre, prix)
msgbox "c'est la ligne " & .Range.Row
End With
End Sub

MAIS meme le contexte de ligne tu n'en a pas besoins
il te suffit de faire un resizer du ".range" au nombre de colonne voulue et de lui balancer un array
a part le msgbox vois tu un seul mot dans le code qui parlerait de ligne NIET!!!

les TS te simplifie la vie en terme d'utilisation...

patricktoulon · 22 Mars 2020

RE RE RE LOL
tu peux enlever la ligne msgbox..... c'etait juste pour te montrer

miamidos · 22 Mars 2020

ok bravo vous m avait bien aider et aussi pierre jean qui lui aussi c etait pencher sur mon souci
je pense que cet résolu mais je sait pas comment on mais que cet résolue ca éviterai que d autre chercher pour rien merci a tous je vais pouvoir faire reposer mes neurone qui me reste

patricktoulon · 22 Mars 2020

pour pointer résolu
a ben t'a trouvé tout seul c'est bien
bonne route

pierrejean · 22 Mars 2020

Re
@ patricktoulon
Puis je te demander d’éclairer ma pauvre lanterne ? :
Je n'ai toujours pas saisi comment les mots reçu et Envoi atterrissent dans la colonne G
Merci d'avance

miamidos · 22 Mars 2020

voila d ou vient envoi et recu capture lien

patricktoulon · 22 Mars 2020

bonjour pierrejean je n'ai plus le fichier sous la main mais

VB:

with sheets(1).listobject("montableau")
   with .listrowsadd
   msgbox .range.address 'le range de la nouvelle ligne est identifiable
.range.resize(,4)=array("toto","titi","riri","fifi")'les 4 premières cellules de la ligne  reçoivent l'array
end with
end with

pour le reste c'est pareil que si j'utilisait range en fait
.value=la variable tableau

pierrejean · 22 Mars 2020

Re
OK
J'ai été piégé par les 2 Feuil3
1) Feuil3(cb)
2)Feuil6(Feuil3) Celle ci n’étant pas visible
Je me coucherais un peu plus serein ce soir
Merci

miamidos · 22 Mars 2020

et encore merci a vous d avoir utiliser vos neurone pour mon probleme

XL 2019 ma macro fonctionne et au bout de quelques ligne il buggue

miamidos

XLDnaute Nouveau

patricktoulon

patricktoulon

XLDnaute Barbatruc

miamidos

XLDnaute Nouveau

patricktoulon

XLDnaute Barbatruc

pierrejean

XLDnaute Barbatruc

miamidos

XLDnaute Nouveau

patricktoulon

XLDnaute Barbatruc

pierrejean

XLDnaute Barbatruc

miamidos

XLDnaute Nouveau

Discussions similaires