walyddu59
Messages postés53Date d'inscriptionjeudi 29 mars 2012StatutMembreDernière intervention 9 juin 2012
-
26 avril 2012 à 14:41
walyddu59
Messages postés53Date d'inscriptionjeudi 29 mars 2012StatutMembreDernière intervention 9 juin 2012
-
2 mai 2012 à 17:14
Bonjour ,
Je suis dans la réalisation d'un fichier de vente et je bloque , j'aurais voulu une petite aide car je ne vois pas comment faire , j'ai réaliser la première partie mais je sais pu quoi faire après voici mon résultat , jai un article vendu a une date précise et je calcule le temps de service après l'avoir vendu donc je fait aujourd’hui - la date vendu , la formule et ok mais le problème viens quand j'ai plusieurs article vendu par date je dois ajouter a chaque fois une ligne par article vendu , je bloque sur cette partie , Exemple : le 23/04/2012 a aujourd’hui donc 3 jours et je dispose de 5 article vendu ,je voudrais que pour le résultat il m'ajoute 5 lignes avec le résultat 3 , 3 correspond au nombre de jours et 5 au nombre d'article vendu tout cela dans une colonne et a chaque fois réaliser cela pour les lignes suivantes , je joint mon code qui fonctionne et calcule les jours entre deux dates, j'espere avoir etait bien précis dans mon explication .
Sub Macro2()
If IsDate(Range("D2")) = True Then
Range("l2").Formula = "=IF(ISERROR(DATEDIF(RC[-8],TODAY(),""d"")),"""",(DATEDIF(RC[-8],TODAY(),""d"")))"
Range("l2").AutoFill Destination:=Range("l2:l65535")
Else
Range("l2").Formula = "=IF(ISERROR(DATEDIF(RC[-7],TODAY(),""d"")),"""",(DATEDIF(RC[-7],TODAY(),""d"")))"
Range("l2").AutoFill Destination:=Range("l2:l65535")
End If
End Sub
NHenry
Messages postés15112Date d'inscriptionvendredi 14 mars 2003StatutModérateurDernière intervention13 avril 2024159 26 avril 2012 à 18:58
Bonjour,
Regardes le .Cells(..., ...)
Et une boucle Do/Loop pour trouver la première ligne vide, et c'est bon.
---------------------------------------------------------------------
[list=ordered][*]Pour poser correctement une question et optimiser vos chances d'obtenir des réponses, pensez à lire le règlement CS, celui-ci pour bien poser votre question ou encore celui-ci pour les PFE et autres exercices[*]Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : )
[*]En VB.NET pensez à activer Option Explicit et Option Strict (propriété du projet) et à retirer l'import automatique de l'espace de nom Microsoft.VisualVasic (onglet Références dans les propriétés du projet).
[*]Si votre problème est résolu (et uniquement si c'est le cas), pensez à mettre "Réponse acceptée" sur le ou les messages qui vous ont aidés./list ---
Mon site