| Date | Auteur du sujet | Sujet | Extrait du message |
|---|
| 21/01/2019 à 11:39 | KOBD | Formule si/et/ou en VBA | Ca bloque a cette ligne... |
| 21/01/2019 à 11:27 | KOBD | Formule si/et/ou en VBA | Non ça ne fonctionne pas, il y une erreur de type 13... |
| 21/01/2019 à 10:47 | KOBD | Formule si/et/ou en VBA | Concernant les espaces vides dans les cellules "vides" dans la colonne Q, je pense qu'on pourrait rajouter dans la macro la fonction Trim.. mais je sais pas comment lui dire qu'il supprime que les espaces dans les cellules "vides"... |
| 21/01/2019 à 10:43 | KOBD | Formule si/et/ou en VBA | Exactement, il s'agissait bien depuis le début de la deuxième formule "Si" à respecter... |
| 21/01/2019 à 10:38 | KOBD | Formule si/et/ou en VBA | Oui effectivement, je vois très bien ce que tu veux dire ! Merci pour ton explication... |
| 21/01/2019 à 10:25 | KOBD | Formule si/et/ou en VBA | Je dis exactement la même chose que là, on a juste rectifier par Range..... |
| 21/01/2019 à 10:24 | KOBD | Formule si/et/ou en VBA | Pedro je te caches pas, je vois pas une grande différence avec mon codage à moi, peux-tu m'éclairer stp ..... |
| 21/01/2019 à 10:06 | KOBD | Formule si/et/ou en VBA | Après avoir rectifier le codage de la macro : La macro fonctionne mais à moitier car la colonne 17 donc la colonne" Q", "déconne" avec les espaces dans les cellules "vides"... |
| 18/01/2019 à 17:20 | KOBD | Formule si/et/ou en VBA | Tu ne souhaites plus m'aider donc ... |
| 18/01/2019 à 16:28 | KOBD | Formule si/et/ou en VBA | Ah ok autant pour moi je croyais que tu avais repris ton code de départ que tu avais fait ! Effectivement je nous fait perdre du temps. Désolé pour le dérangement Pedro... |
| 18/01/2019 à 16:16 | KOBD | Formule si/et/ou en VBA | Oui je suis d'accord je relativise et me dit que ta macro doit être bonne mais que cette colonne 17 nous bloque à cause des espaces dans les cellules vides... Il y a t-il une solution ??... |
| 18/01/2019 à 16:09 | KOBD | Formule si/et/ou en VBA | Non désolé pédro mais ta macro ne fonctionner pas ! Je ne savais pas que la mienne était fausse ... Autant pour moi Peux-tu m'aider pour supprimer les espaces vides dans les cellules vides de la colonne 17 stp... |
| 18/01/2019 à 16:01 | KOBD | Formule si/et/ou en VBA | Mais avec plaisir faisons les test avec ta macro. Ce qui m’embête, c'est nos 2 macro sont bonnes et que ça ne fonctionne pas... |
| 18/01/2019 à 15:59 | KOBD | Formule si/et/ou en VBA | Si pedro j'ai essayer la tienne mais elle ne fonctionne pas non plus, donc vu que les 2 sont bonne je comprends mieux l'écrire de celle qui est dans le fichier tout simplement. La tienne est très bien aussi mais ne fonctionne pas de même que la mienne ahah De plus, avec Case j'ai plus de mal ..... |
| 18/01/2019 à 15:44 | KOBD | Formule si/et/ou en VBA | Pedro je viens de m'apercevoir que de dans la fameuse colonne 17 où on a supprimé les espaces, il reste des cellules vide avec des espaces a l'intérieur... Peut être pour ca que la macro ne fonctionne pas... |
| 18/01/2019 à 15:27 | KOBD | Formule si/et/ou en VBA | Voila avec la macro... |
| 18/01/2019 à 14:58 | KOBD | Formule si/et/ou en VBA | C'est pas possible !! Dit moi si c'est le bon celui la ..... |
| 18/01/2019 à 14:27 | KOBD | Formule si/et/ou en VBA | Les 3 dernières lignes en orange sont bonnes, je suis désolé j'espère tu auras compris. Donc j'aurais pas du les surlignées en orange... |
| 18/01/2019 à 14:22 | KOBD | Formule si/et/ou en VBA | Ah oui désolé pour le fichier voici le bon : je t'ai mis en orange les ligne qui sont pas bonne et où en le commentaire aurait du être "Décompte à émettre" pour toute les lignes orange. Concernant les lignes non surligné, elles sont correcte ! MERCI A TOI... |
| 18/01/2019 à 14:03 | KOBD | Formule si/et/ou en VBA | Re Pedro, Concernant l'ancienne macro décompte, j'ai un soucis maintenant après rectification de la colonne 17, j'ai l'impression qu'il reconnait pas le <15000 pour la colonne S. Je te mets le fichier excel et il y a la macro dans VBA. En fait je veux que si la colonne M, N et Q sont vides et que... |
| 18/01/2019 à 12:18 | KOBD | Formule si/et/ou en VBA | Excellent, Vraiment t'es au top ! merci beaucoup pour tes explication et je te souhaite un bon week-end et à bientôt sur d'autre sujet de VBA ... |
| 18/01/2019 à 11:57 | KOBD | Formule si/et/ou en VBA | Super ca fonctionne t'es génial Pedro !!!! En revanche peut tu m'expliqué un peu cette ligne : If Not IsError(.Cells(i, 17)) Et cette ligne : .Cells(i, 17) = DateSerial(CInt(Right(Temp, 4)), CInt(Mid(Temp, 3, 2)), CInt(Left(Temp, 2))) Je ne comprends pas le Mid : le 3,2 j'arrive pas a me repérer sur... |
| 18/01/2019 à 11:47 | KOBD | Formule si/et/ou en VBA | Super ca fonctionne t'es génial Pedro !!!! En revanche peut tu m'expliqué un peu cette ligne : If Not IsError(.Cells(i, 17)) Et cette ligne : .Cells(i, 17) = DateSerial(CInt(Right(Temp, 4)), CInt(Mid(Temp, 3, 2)), CInt(Left(Temp, 2))) Je ne comprends pas le Mid : le 3,2 j'arrive pas a me repérer sur... |
| 18/01/2019 à 10:48 | KOBD | Formule si/et/ou en VBA | Merci c'est génial pour le 1er code il y a un blocage sur cette ligne qui affiche une érreur de type 13 : .Cells(i, 17) = DateSerial(CInt(Right(Temp, 4)), CInt(Mid(Temp, 3, 2)), CInt(Left(Temp, 2)))... |
| 18/01/2019 à 10:00 | KOBD | Formule si/et/ou en VBA | Ok merci beaucoup Pedro voici le fichier je t'ai mis juste la colonne 17 ... |
| 18/01/2019 à 09:29 | KOBD | Formule si/et/ou en VBA | Pedro tu as raison il y a un problème dans ma colonne 17 : dans certaine cellule qui sont vide il y a des espaces et dans d'autre cellule ou ya des dates il y a aussi des espaces... Donc, ma colonne 17 comporte de nombreux espaces ainsi que des caractères spéciaux.... et je suis obligé de corriger c... |
| 17/01/2019 à 14:34 | KOBD | Formule si/et/ou en VBA | La formule marche mais elle ne prends pas en compte la colonne 17 qui doit être = à rien.... Pourtant la formule l'indique bien.... Ensuite, lorsque que je lance la macro, elle veut pas aller jusqu'à la dernière ligne donc du coup j'indique qu'il faut qu'il prenne la ligne de 537 à 4000 par exemple... |
| 11/01/2019 à 13:21 | KOBD | Formule si/et/ou en VBA | La macro fonctionne sauf que les valeur ne sont pas les bonnes...... |
| 11/01/2019 à 12:19 | KOBD | Formule si/et/ou en VBA | Voici mon fichier ! Merci beaucoup de votre aide ... |
| 11/01/2019 à 12:05 | KOBD | Formule si/et/ou en VBA | Case Cells(j, "N") = "" And Cells(j, "M") = "" And Cells(j, "Q") = "" Or Cells(j, "R") <> "", Cells(j, "S") < 15000, Cells(j, "H").Value = 1121 Or Cells(j, "H").Value = 1170 Or Cells(j, "H").Value = 2160 Sur cette ligne que ca bloque aussi... |
| 11/01/2019 à 11:50 | KOBD | Formule si/et/ou en VBA | Il prend pas en compte une condition. Exemple : si en cellule Q c'est pas vide et que il y as bien en en colonne H l'une des 3 valeur et que en R <15000 alors pas de décompte sinon décompte à émettre. Je me réexplique : Il y a absolument 4 conditions obligatoire à respecter pour mettre le comment... |
| 11/01/2019 à 11:20 | KOBD | Formule si/et/ou en VBA | Ah désolé j'avais vu ta réponse ... Je viens de tester et ça ne fonctionne toujours pas... |
| 11/01/2019 à 11:02 | KOBD | Formule si/et/ou en VBA | Il y a absolument 3 conditions obligatoire à respecter pour chaque possibilité afin mettre le commentaire "Pas de décompte" : Si la cellule (j,13) est vide et que si la cellule (j,14) est vide et que (j,19)<15000 alors "pas de décompte" sinon "décompte à émettre" Deuxième possibilité : si la cell... |
| 09/01/2019 à 15:21 | KOBD | Formule si/et/ou en VBA | Voici ma variable Derligne = .Range("A" & Rows.Count).End(xlUp).Row Mais le problème c'est cette ligne qui fonctionne pas : If .Cells(j, "N") = "" And Cells(j, "Q") = "" And Abs(Cells(j, "R") < 15000) And (Cells(j, "H").Value = "002160" Or Cells(j, "H").Value = "001170" Or Cells(j, "H").Value = "... |
| 09/01/2019 à 14:20 | KOBD | Formule si/et/ou en VBA | Merci pour ta réponse mais il ne se passe toujours rien et aucun message d’erreur s'affiche ... Voici le code après modification : Sub MACROFinal () With Sheets("SUIVTRANS EN COURS") For j = 2 To Derligne If .Cells(j, "N") = "" And Cells(j, "Q") = "" And Abs(Cells(j, "R") < 15000) And (Cells(j, "... |
| 09/01/2019 à 14:05 | KOBD | Formule si/et/ou en VBA | Je ne comprends pas pourquoi ma formule ne fonctionne pas en VBA : Sub SuiteMACROSIAFinal() 'PAS DE DECOMPTE OU DECOMPTE A EMETTRE(6) '(Autre formule sans enregistrement mais fonctionne pas(6)) If .Cells(j,"N")= "" And Cells(j, "Q") = "" And Cells(j, "R") < 15000 And Cells(j, "H").Value = "002160... |