Inscription
18 avril 2018
Dernière intervention
24 mars 2020
Interventions
171

définir l’année en cours [Résolu]

bonjour pour avoir l’année en cours j'ai utilisé cette fonction, sauf' que il y a une erreur qui safiche a lexcution du code message d"erreur :erreur de compilation :argument non facultatif voici mon code Sub gg() Dim annee_en_cours As Integer annee_en_cours = year(Now) annee_suivante = annee_en_cours + 1 End Sub svp ... Lire la suite

recuperer tout les données de fichier xml dans une feuile excel

Bonjour, je souhaite recuperer des données a partir d'un xml et les stoker sur une feuile excel j'ai trouve ce code mais je ne sais pas comment ca marche Dim wks As Worksheet Private Sub BrowseChildNodes(root_node As IXMLDOMNode) Dim i As Long Dim c As Long Dim rng As Range For i = 0 To root_node.ChildNodes.Length... Lire la suite

recuperer des donnee dans ma base de données

Bonjour jai mis un code qui récupère des chifre a partir de bases de donnes (dans la cellule AO de chaque feuille) et apres les positionnent dans mon tableau de synthese (qui est sur la photo) et la je souhaiterais a partir de ma feuilles de synthese (celle qui apparaît sur la photo ) en double cliquant sur une cellule... Lire la suite

boucle pour reduire le programme

bonjour j'ai mis un code qui vas afficher un chiffre en fonction de couleurs, mais le programe est tres long je me suis dis peut etre je peux le faire par une boucle comme ca je vais gagner du temps mais surtout de la place , sacjant que je nai pas encore finit le principe : jai 4 indicateur Q P D C chaque indicateur doit pren... Lire la suite

recuperer les num de la ligne en fonction des nom prenom

Bonjour, je souhaite creer un programme qui me permettra d'effectuer les taches suivantes : -dans les cellules du cercle 5 je vais enregistrer manuellement des noms et prenoms qui peuvent etre change et remplacer a n'import quel moment (on va rajouter des nom prenom et on va aussi supprimer) -dans le cercle 4 on ... Lire la suite

incompréhension de code

Bonjour tout le monde quelqu’un peut m'expliquer ce code (ce qu'il fait exactement ?) Sub recup_conges() 'debut en s50 2017 'colonne S dans l'onglet perso 'ligne 13 pour la charge 'ceu2 comme debut dans l'onglet des conges 'remplissage du nouvel onglet pour ne pas prendre en compte les TAD ... Lire la suite

istext

Bonjour, il y a cette condition if not isnumeric(range("a1") then msgbox "veuillez introduire une valeur numerique " else 'il va exucuter le programme end if dans mon cas je voudrai mettre cette condition mais pas pour une valeur c'est pour un texte " coude arondi" if not is...........(range("a1")) then msgbox "veu... Lire la suite