| ||||||||
Astucien | Bonjour, J'ai 2 macros : * la 1ière me permet de faire clignoter une cellule ou doit se passer la saisie : Sub versfeuille1() Sheets("Feuil1").Select Range("B3").Select Selection.ClearContents Do While IsEmpty([B3]) If [B3].Interior.Color = vbGreen Then [B3].Interior.Color = vbYellow Else [B3].Interior.Color = vbGreen End If DoEvents Loop [B3].Interior.Color = vbWhite End Sub Elle fonctionne parfaitement. * La seconde me permet d'accéder à la première cellule vide (En descendant) de la colonne B : Sub dernier() Range("B65536").End(xlUp).Offset(1, 0).Select End Sub Fonctionne parfaitement elle aussi. En feuille 2 j'active la macro 1 Je n'arrive pas à faire clignoter la cellule dans laquelle doit se faire la saisie. B3 de la première macro devient B4 puis B5... d'ou la nécessité de faire varier la cellule cible de la première macro. Je bloque sur une syntaxe certainement toute bête. Pouvez vous m'aider ? Fichier : https://www.cjoint.com/c/IHppRij7YQK Merci d'avance. EDIT : je viens de voir que sur les feuilles existantes et sur les nouvelles feuilles la cellule B3 clignote systématiquement. Euh ??? Je suis pourtant positionné en feuil1. En positionnant la macro dans feuil1 plus de pb. Un de réglé.
Modifié par Magnan le 15/08/2019 17:57 | |||||||
Publicité | ||||||||
Astucien | Re, Trouvé une mine d'info avec ce fichier : http://boisgontierj.free.fr/fichiers/jb-Curseur.xls Si cela peut en aider certains. A+
| |||||||
|