problème avec sheets

Bonjour,

J'utilise occasionnellement la macro VBA, j'ai une vieille fonction qui fonctionnais pendant longtemps et là depuis quelques semaines, elle me met l'erreur suivante:

Pièce jointe 645330Pièce jointe 645331

C'est une forme soleil et en bas un éclair ou j'ai mis une macro qui est lié avec les commandes pris sur un vieux documents et que j'utilise personnellement depuis des années et là finish.

J'ai du louper quelque chose que j'ai pas fait gaffe, étant pas très doué avec le codage, je me suis débrouille comme avec le HTML 5 et CSS 3 mais bon.

C'est un tableur pour un défi de kilomètres contre le harcélèment scolaire. je recopie ce que je fait avec l'apple watch, les kilomètres et les pas. au fil de l'année je déplace l'éclair de bas en bas. il me permet de monter en haut et l'autre de redescendre.

Merci de votre aide, preneur de me mettre à niveau.

RoyAnéTyk alias Lyroy

bonjour
si tu veux simplement aller à la dernière ligne non vide de la colonne G tu peux faire simplement avec

Code:

---

Sheets("2023").Range("G" & Rows.Count).End(xlUp).Select

---

au lieu de

Code:

---

1 2	Sheets("2023").Select Range("G305").select

---

qui te ramène toujours à G305
Si non :
1 : évite au maximum la fusion des cellules ou bien faire ton recherche dans une colonne sans fusion
2 : as tu changer de version excel ?? y a t'il d"autre codage car cette partie ne doit pas donner ce message d'erreur

Citation:

---

Envoyé par BENNASR

bonjour
si tu veux simplement aller à la dernière ligne non vide de la colonne G tu peux faire simplement avec

Code:

---

Sheets("2023").Range("G" & Rows.Count).End(xlUp).Select

---

au lieu de

Code:

---

1 2	Sheets("2023").Select Range("G305").select

---

qui te ramène toujours à G305
Si non évite au maximum la fusion des cellules ou bien faire ton recherche dans une colonne sans fusion

---

Bonjour merci de la réponse, juste je dois modifier la cellule G au fil de l'année quand je descend dans les mois ça fonctionne en automatique, j'essaie de suite.