XL 2010 VBA convertir fonction SI

Bonjour Staple,


Merci pour ces codes mais honnêtement ça ne me parle pas du tout.

Et comme évoqué dès mon post#1 je ne souhaite pas insérer de bouton de commande pour modifier les dates mais simplement laisser l’utilisateur cliquer sur la date qu’il souhaite modifier voilà tout.
Avec comme je l'avais imaginer une inputbox par exemple.

Restons le plus simple possible pour l’utilisateur.

J’en suis à mon xième fichier test. Pour simplifier le tout ne pouvons-nous pas travailler uniquement sur la base de fichier que je m’embête à systématiquement envoyer… merci.



La dernière base du code qui tu m’a envoyé m’allait très bien (présente Feuil1 du fichier en PJ, j'ai essayé d'adapter un peu le code mais sans succès ).
Je pense qu’avec tes connaissances, il doit être aisé de trouver réponse à mon problème sans forcément casser entièrement la logique de ce code. Sinon, avec cette dynamique on va atteindre les 100 #posts…



Rappel des deux besoins actuels :

1) Format de la date lors d’une saisie sur l’inputbox qui pour je ne sais quelle raison est depuis hier en mmjjdddd et non jjmmdddd. Je n’explique absolument pas cela…. A tester sur le fichier qui sera en PJ.

2) Si l’on sélectionne une des 6 cellules concernées par le code et que l’on annule l’inputbox via «annuler » ou la croix cela annule la dernière modification éventuellement réalisée sur la cellule d’à côté

Exemple :

Si en G24 je change la date du jour pour mette le 11/11/2020 et qu'ensuite par erreur je sélectionne E24 et clique sur annulé, G24 se remet aussitôt à jour avec la date prévue dans le code.



Comme toujours, le fichier en PJ.

Cette fois-ci, si tu pouvais directement travailler dessus et éventuellement le renvoyer pour faciliter l’échange ça nous ferais gagner du temps, ou ne pas en perdre suivant comment on prends la chose.


Merci d’avance et bon Dimanche !

PS : aucune animosité dans mon message bien entendu, mais j'ai toujours eu l'habitude ici ou ailleurs de travailler sur des fichiers que l'on s'échange, ça facilite grandement les choses les échanges.

Bonsoir le fil,

=>spike29
Si j'ai changé mon fusil d'épaule, c'est pour me faciliter les choses
(et après avoir cogiter un chouia)
(Et je l'ai testé sur ta PJ)
Si cela ne te parle pas, as-tu au moins testé?
(Car malgré le bouton, il y a toujours un InputBox)
Nb: Mon dernier code* ne rencontre pas les problèmes 1) et 2)
(message#58)

NB: Je ne joins plus de fichier Excel sur aucun forum depuis le 22 mai 1968, trois heures de l'après-midi.
Je ne poste que des formules, du VBA, des conseils, des liens et parfois des digressions, calembredaines et cie.
Ensuite le demandeur en fait ce qu'il veut.

Bonsoir le fil, Bonsoir Staple,

Oui, j'ai brièvement testé sur un classeur vierge comme conseillé mais sans grand succès (je m'y suis très certainement pris comme un manche, nulle doute... )

En cogitant un peu (oui ça m'arrive), j'ai trouvé plus simple avec quelques bouts de codes glanés ici et là.

Je partage dès que possible

Merci à toi et bonne soirée

Bonsoir le fil, spike29

=>spike29

Oui, j'ai brièvement testé sur un classeur vierge

Cliquez pour agrandir...

Contrairement à toi, j'ai simplement pris le temps de tester (et de faire en sorte que les 3 plages soient impactées par la modification)
(Et ce n'est qu'à la fin du test que j'ai poster le code VBA du message#58)

Je partage dès que possible

Cliquez pour agrandir...

Cela pourrait être déjà fait dans le message#63
(Il suffit d'un CTRL+C puis CTRL+V)

Mon post#63 méritait précision.

Quand je disais sans grand succès je m'explique :
Le command button fonction, la modification de date aussi, le format est le bon (ddmmyyyy).

Seule problématique, c'est la totalité des 6 cellules qui est modifié là ou moi je souhaite que l'utilisateur puisse indépendamment modifier en un clic un cellule sans venir impacter les autres #besoin Post1 puis précisé dans mes posts suivant.

Dans le fonctionnement de mon fichier l'utilisateur ne sera jamais amené à modifier les 6 cellules d'un coup avec des dates similaires.

L'utilisateur sélectionne une des 6 cellule déprotection < inputbox < modifie la date < reprotection de la cellule.

Re

Et quid de ceci?

En cogitant un peu (oui ça m'arrive), j'ai trouvé plus simple avec quelques bouts de codes glanés ici et là.

Cliquez pour agrandir...

Ton copier/coller ne fonctionne plus?
(cf message#64)

A force de copier coller des morceau de codes il doit fatiguer le pauvre

Re

Je partage dès que possible

Cliquez pour agrandir...

A chacun son interprétation du "dès que ce possible"
Sur ce, je vais me coucher
Et pour ta question, tu as largement de quoi faire dans ce fil pour mixer des morceaux de codes de ci de là pour arriver à tes fins.
(procédures événementielles, Inputbox, formulaLocal, formules nommées, CommandButton)

Bonjour Staple,

Réponse tardive, j'étais pris sur autres chose.

Ci-dessous le code que j'utilise :


Tel quel le code me va bien et en terme d'interface utilisateur il correspond à nos besoin.

Bonne soirée

Bonsoir le fil, spike29

Merci pour le feedback
Mais chez moi , j'obtiens un bug dans certains cas.

De rien et merci à toi pour l'échange et les différents éclairages que tu as pu m'apporter

Dans quels cas ?

Re

J'ai copié ce code (donc le code du message#69)
Puis je sélectionne E24, je sélectionne une plage de cellule
et je clique sur OK
=>Erreur Exécution 13
Incompatibilité de type

Bonsoir Staple,

Chez moi ça fonctionne dans mon fichier. Après il y a d'autres code en plus de celui là.

L'explication doit se trouver là.


En tout cas un grand merci pour ton aide et ta patience !


Spike

Re

Colle ton code sur une feuille vierge et tu verras qu'il plante.
(je parle de celui du message#72 qui est le copié/collé non modifié de ton code du message#69)
1) Tu sélectionnes E24
2) Tu sélectionnes à partir de l'InputBox D23:F25 par exemple
Et tu auras alors une Erreur d'exécution 13