Contenu récent par camarchepas

Bienvenue sur ce site formidable qu'est Excel Downloads .......

Bonjour , je vois que l'anti-rouille fonctionne, respect et bravo

Bonjour Mimi, si j'ai compris le besoin, voici la formule à modifier dans total : =SI(J17<>"";J17+K17+L17+M17+N17;"") Excellement votre, Nono

Bonjour ChTi, Raphy @ Chti : Bien vu en effet , je pense que ce sont des bouts de codes récupérés au hasard du web , ou d'une appli détournée. @Raphy : Et oui, tu utilises une procédure événementielle dans un module standard et ça ne peut pas fonctionner . Bon y'aura du 5s à faire ...

C'est normal, Tu ne peux générer qu'un nouveau onglet par jour.( Si tu veux autre chose précises ) Pour le reste, tu n'as pas précisé quels champs il faut remettre à zéro. Le but étant bien sur de ne pas tout t'écrire, mais surtout que tu comprennes car un jour ou l'autre, il y aura un minimum...

Bonjour Ivan, A mettre dans un module standard. Puis exécuter Option Explicit Sub Consolide() 'Consolidation des onglets Jours dans la base BD selon le traitement conditionnel prévu 'Camarchepas pour Ivan le 25/04/2019 Dim Tourne As Long, Fin_Ligne As Long, Ligne_Cible As Long, Colonne As...

Merci Job, et oui des fois, y'a des périodes où le temps passe trop vite. J'ai réussi effectivement à revenir, j'espère plus souvent, car c'est toujours un vrai plaisir de venir sur ce site et d'apprendre en apprenant.

Un petit bonjour en passant

Une possibilité, a améliorer surement

Bonjour, Voici pour la sauvegarde, j'ai même permis de sauvegarder plusieurs fois dans la même journée en gardant la trace. J'ai également utilisé des variables pour que le code soit plus digeste Sub Macrosauvemcintegrale() Dim Titre As String Dim Chemin As String Titre = "Main-courante...

Loic, Sans un fichier pour tester, pour ma part , je n'irai pas plus loin. Bon courage

Bonjour , Sans fichier toujours difficile de valider la solution , mais selon moi, il faut juste avoir une colonne toujours pleine lorsqu'une ligne est valide ( supposont la colonne B:) dim LigneFin as long , LigneFin2 as long LigneFin = Range("B" & rows.count).end(xlup).row ' Ligne de fin du...

Bonjour et bienvenue sur XLD, L'on a forcement le nombre de chambres totales, mettons 4 pour l'exemple Les chambres sont symbolisées par les cellules F6 , G5 , H6 et I5 En soustrayant NBVAL du nombre de chambres totales =4-NBVAL(F6;G5;H6;I5) l'on obtient le nombre de chambre vide Ce serait...

Bon , Je viens de tester ton fichier sur Excel 2016 et il fonctionne très bien. Le problème doit venir de l'Excel ( Véroler ou config en anglais ?) ou du poste de ton Ami ( Il tourne bien sur Pc , pas sur Apple ?) Enfin, pour ma part cela est superbe , j'ai testé une dizaine de parcours et...

Bonjour, As-tu essayé : thisworkbook.activate worksheets("Menu").activate