Résultats de la recherche

  1. dhiouf

    Nombre de jours après soustraction des trimestres

    Salut tout le monde, La liquidation de la pension de retraite est effectuée sur la base de la durée des services ; cette durée se subdivise en trimestres. Toute période égale ou supérieure à quarante cinq (45) jours est comptée pour un trimestre. Toute période inférieure à 45 jours n'est pas...
  2. dhiouf

    Optimisation code vba long

    Bonjour tous le monde; est-il possible de simplifier le code suivant? 'Calcul nombre de jours entre 2 dates. If .Range("B16") <> "" Then .Range("D16").Value = .Range("C16").Value - .Range("D12").Value Else .Range("D16").Value = "" End If If .Range("B17") <> "" Then .Range("D17").Value =...
  3. dhiouf

    fraction de cent au millier

    Bonjour à tous; Pour arrondir une fraction de cent au millier je tape : =arrondi.inf(A1;-2)+1000 exemple pour arrondir 15355 en 16300, je tape =arrondi.inf(A1;-2)+1000 le résultat = 16300 donc je suis obliger d'ajouter 1000 a la fin de formule. Existe-il une autre formule pour...
  4. dhiouf

    Planche à billets

    Salut tous le monde; J'ai 10 000 planches à billets, chaque planche contient 32 billets (4 colonnes x 8 lignes); Les billets sont revêtus d'un numéro d'ordre qui est composé de sept chiffres; Les sept chiffres varient de 0 000 000 à 0 319 999; Le numéro d'ordre du billet au même...
  5. dhiouf

    Dispense d'âge

    Bonjour à tous Dans A1 j'ai la date de naissance, A2 date de concours. Pour trouver l'âge du candidat j'utilise la formule =datedif(A1;A2;"y")&" ans "&datedif(A1;A2;"ym")&" mois "&datedif(A1;A2;"md")&" jours" comment faire une dispense d'âge d'une égale durée à celle effectuée dans les...
  6. dhiouf

    Optimisations code vba

    Salut tous le monde; le forum Je veux faire le code suivant pour lire un fichier ini et je n'arrive pas à le rendre plus simple car il faut taper 30 lignes dans l’éditeur vba. Pouvez-vous m'aider ? Merci d'avance. Private Sub cmdLire_click() Dim CheminFichierIni As String...
  7. dhiouf

    Enregistrer les modifications

    Bonjour à tous; Permettez-moi de poser une question en espérant trouver une réponse, même s'il est difficile. J’ai un classeur de 3 feuilles, est il possible d’enregistrer les modifications apportées a 2 feuilles (feuille2, feuilles3) seulement. Merci d’avance.
  8. dhiouf

    Fonction Max

    Bonjour à tous ; Dans les cellules $C$6:$C$370 j’ai des dates différentes Dans les cellules $D$6:$D$370 j’ai le solde débiteur pour chaque mois J’ai essayé avec la fonction =MAX(Si(MOIS($C$6:$C$370=1);$D$6:$D$370)) pour trouver le plus fort découvert pour chaque mois mais sans succès avec...
  9. dhiouf

    Valeur actuelle

    Bonjour à tous; Si pendant 21 jours avec un taux annuel de 7.69%, la valeur acquise (valeur future) s’élève à 3775905 Comment trouver la valeur actuelle (valeur de départ) ? Merci d'avance
  10. dhiouf

    Date valeur

    Bonjour tous le monde; J'ai la formule suivante qui marche bien pour afficher la date de valeur a partir de la date dans A1: A1 = le 24 de chaque mois Formule dans B1...
  11. dhiouf

    Lister fichier sans extension

    Salut tous le monde, Pour lister les fichiers dans un combobox j'ai le code suivant : Function FichierExiste(NomFichier As String) As Boolean FichierExiste = Dir(NomFichier) <> "" And NomFichier <> "" End Function Private Sub Workbook_Activate() Worksheets(1).ComboBox1.Clear...
  12. dhiouf

    Formules en VBA

    Salut à tous, J'ai un classeur pour le reclassement des ouvriers dans la grille de salaire de base, est il possible d’exécuté en VBA les formules qui se trouvent dans les cellules (D34,D35,D36,D37,D38,D39,D40,et D41) Voir fichier joint pour complété le code Merci d'avance
  13. dhiouf

    Formules en VBA

    Salut à tous, J'ai un classeur pour le reclassement des ouvriers dans la grille de salaire de base, et il possible d’exécuté en VBA les formules qui se trouvent dans les cellules (D34,D35,D36,D37,D38,D39,D40,et D41) Voir fichier joint pour complété le code Merci d'avance
  14. dhiouf

    RechercheV

    salut à tous, Avez-vous S.V.P une formule pour afficher la valeur dans l'intersection d'une colonne et une ligne Exemple dans le tableau du fichier joint N° de colonne dans A1 = 8; N° de ligne dans B1 = 6 Résultat dans l'intersection 8 - 6 = 148,250 Merci d'avance
  15. dhiouf

    Jouer des fichiers wav sans lecteurs (WMP ou MID)

    Bonjour à tous Le code suivant intègre un son wav sans utiliser Windows média player ou mdi. Private Const SND_ASYNC = &H1 ' play asynchronously Private Const SND_FILENAME = &H20000 ' name is a file name Private Const SND_LOOP = &H8 ' loop the sound until next...
  16. dhiouf

    Copier cellules

    Bonjour a tous, j'ai une mise en forme conditionnelle pour colorer les cellules (B1:K25) en rouge qui ont la même valeur. comment copier uniquement les cellules rouge dans (B28:K52) Merci d'avance.
  17. dhiouf

    affichage montant

    Bonjour à tous, J'ai dans la cellule A1 un montant variable, selon A1 je veux la cellule B1 n'affiche que soit 10, 20 , 30, 40.........300 etc.. ex: A1 = 308, B1 soit 30 A1 = 4005, B1 soit 400 avec la formule arrondi çà ne marche pas. Merci d'avance.
  18. dhiouf

    Formule sans datedif

    Bonjour à toute et à tous, J’ai 3 formules pour calculer le nombre en années, mois et jours exacte entre deux dates. Mon problème je n’arrive pas à les rendre en code VBA. Formule pour calculer les années : B1=ENT((datefin – datedébut +2)/365.25) Code VBA : Dim datefin As Date...
  19. dhiouf

    Nombre d'année bissextile

    Bonjour a tous! Y a t-il un code VBA qui permet de savoir combien d’année bissextile entre deux date ? Exemple Entre le 27/11/1993 et le 26/09/2011 il y a 4 année bissextile (1996,2000,2004,2008) Merci d’avance.
  20. dhiouf

    valeur supérieur ou égale

    J'ai un petit problème avec la formule recherche valeur supérieur ou égale =GRANDE.VALEUR(D3:D27;NB.SI(D3:D27;">="&F3)) Mon problème: il faut que la différence entre la valeur cherchée et la valeur trouvée ne soit pas inférieure à la valeur de la cellule D1.Si c'est le cas alors trouve la...