Index=FoundCell.row

Résolu/Fermé
BUDGETS Messages postés 1333 Date d'inscription samedi 19 juillet 2014 Statut Membre Dernière intervention 24 novembre 2023 - 19 mai 2021 à 10:52
ALS35 Messages postés 1033 Date d'inscription jeudi 18 juillet 2019 Statut Membre Dernière intervention 9 janvier 2024 - 20 mai 2021 à 17:28
Bonjour,

quand je créé un menu midi retraite, à la validation j'ai l'erreur suivante qui surgit : Variable objet ou variable de bloc with non définie. Qui aura la gentillesse de rectifier l'instruction afin de faire disparaître cette erreur ? D'avance merci.
Les deux fichiers joints semblent identiques et tous deux répètent la même erreur.
https://www.cjoint.com/c/KEtiZq6bGpo
https://www.cjoint.com/c/KEti0a1rCuo

5 réponses

ALS35 Messages postés 1033 Date d'inscription jeudi 18 juillet 2019 Statut Membre Dernière intervention 9 janvier 2024 139
20 mai 2021 à 10:35
Bonjour BUDGETS,

Je te connais suffisamment pour dire que ce programme de 2016 que tu ressors est trop compliqué pour toi.
Le problème que tu indiques ne vient pas du programme mais de toi. Depuis le temps que tu travailles sur ces menus tu devrais savoir qu'il faut saisir une date dans l'année de tes feuilles menus (dans le cas présent 2017).
Comme je te l'ai déjà dit, plutôt que d'essayer de faire fonctionner un programme que tu ne maîtrises pas, tu ferais mieux de repartir de zéro et de créer ton propre formulaire, très simple au début, pour enregistrer juste quelques informations. La complexité viendra plus tard.

Cordialement
1
BUDGETS Messages postés 1333 Date d'inscription samedi 19 juillet 2014 Statut Membre Dernière intervention 24 novembre 2023
Modifié le 20 mai 2021 à 11:37
Bonjour ALS35,

Très content de te retrouver. J'ai commencé à créer mon propre formulaire. Deux choses :
1) Quand on programme par formulaires, les modules ne sont pas nécessaires (ils sont utiles uniquement en cas de saisie par feuilles) : Oui ? Non ?
2) As-tu chez toi, dans ton excel, les objets DTPicker et, éventuellement, Calendar ? J'ai prévu deux fichiers : l'un avec DTPicker et l'autre sans cet objet. Je t'enverrai le fichier correspondant à ta réponse à ce 2).

Pour ce qui est de index=foundcell.row, même si je ne comprends pas tout, je sais m'en servir. Si je te comprends, il faut que je saisisse une date de l'année 2017 pour que cela marche ? Si oui, comment faire, pour une année différente ?
Je viens de faire quelques essais et cela fonctionne. Mais j'en dirais plus sur le forum concerné puisque celui-ci n'a rien à voir avec mon nouveau formulaire.
0
ALS35 Messages postés 1033 Date d'inscription jeudi 18 juillet 2019 Statut Membre Dernière intervention 9 janvier 2024 139 > BUDGETS Messages postés 1333 Date d'inscription samedi 19 juillet 2014 Statut Membre Dernière intervention 24 novembre 2023
20 mai 2021 à 17:28
Réponses à tes questions :

1) Non
2) Je t'ai déjà envoyé des fichiers avec ce contrôle DTPicker, et récemment je t'ai aidé à l'installer, alors d'après toi, je l'ai ou je ne l'ai pas ?
index = foundcell.row : non tu ne comprend pas le but de ces instructions sinon tu aurais compris l'erreur
Saisir une autre année : il faut faire le code adéquate (c'est bien la preuve que tu ne comprends pas le fonctionnement du programme)

Cordialement
0
Le Pingou Messages postés 12048 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 26 avril 2024 1 427
Modifié le 19 mai 2021 à 23:00
Bonjour,
On essai le code et voila:

Et en plus la ligne d'instruction n'existe pas
l
Se sera plus profitable si vous mettez une image du code ou se produit la faute...de la faute !

0
Le Pingou Messages postés 12048 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 26 avril 2024 1 427
20 mai 2021 à 15:58
Bonjour,
Est-il possible que vous répondiez à ce que j'ai demandé...
Se sera plus profitable si vous mettez une image du code ou se produit la faute...de la faute !
0
BUDGETS Messages postés 1333 Date d'inscription samedi 19 juillet 2014 Statut Membre Dernière intervention 24 novembre 2023
20 mai 2021 à 16:35
Je vous l'ai envoyée hier soir (voir message 3)
0
Le Pingou Messages postés 12048 Date d'inscription mercredi 11 août 2004 Statut Contributeur Dernière intervention 26 avril 2024 1 427
Modifié le 20 mai 2021 à 17:22
Bonjour,
Merci, j'ai relu le poste 3 (voir message 3) et je rejoins ALS35.
Je me retire car DTPicker n'est pas compatible avec ma version Excel MSO 365.
Désolé
Lot de consolation, pour le calendrier sur Excel un plus par ici:https://www.mdf-xlpages.com/modules/publisher/item.php?itemid=28


0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
BUDGETS Messages postés 1333 Date d'inscription samedi 19 juillet 2014 Statut Membre Dernière intervention 24 novembre 2023
19 mai 2021 à 23:33
1) Identifier l'indice de la ligne d'insertion du Menu dans la feuille Menus midi retraite
WHAT_TO_FIND = DTPicker1.Value
Set FoundCell = Worksheets("Menus midi retraite").Range("A:A").Find(what:=WHAT_TO_FIND, lookat:=xlWhole)
index = FoundCell.Row

Si tu n'as pas DTPicker et calendars, tu as vas avoir du mal à résoudre le problème, hélas.
-1