Limiter ou déterminer zone d'action d'une macro

Question

Petite demande afin d'élargir mes connaissances auprès de vous.... J'ai créer un journal d'activités. Avec un bouton VBA, un macro sélectionne la/les lignes entières sélectionnées avec mon curseur... Un UsF demande à l'utilisateur de confirmer la volonté d'effacer la selection... Jusque là, tout fonctionne. Ma demande : Est-il possible d'interdire une zone où l'on peut appeler la macro ? Tourner différemment, est-il possible d'empêcher d'effacer par erreur des lignes que l'on ne souhaite pas voir disparaître. Pas de dossier dispo pour l'heure. Mon fichier (structure également) contient des données professionnelles... D'avance merci !...

MFerrand · Answer

Mauvaise option ! VBA ne sélectionne pas pour être plus efficace ! De plus si la sélection est faite manuellement, elle n'a nul besoin de l'être 2 fois ! Activer une procédure pour intervenir sur une sélection est une méthode tout à fait acceptable, mais ensuite au code de traiter la sélection ou de définir la zone précise d'intervention à partir de la sélection, et la réaliser. Oui! Plus précisément la macro doit savoir les zones sur lesquelles elle ne doit pas opérer... Cordialement...

curulis57 · Answer

Bonjour le vacancier! en d'autres termes, soit : ces zones sont connues et intangibles et on peut les intégrer directement dans le code ; ces zones sont mouvantes : ° elles sont calculables en fonction de critères précis et la macro s'adapte elle-même ; ° elles ne sont pas calculables et tu dois alors te réserver une plage cachée dans l'océan de cellules de ta feuille pour y encoder tes zones interdites où la macro ira chercher ses infos de traitement. Tu peux aussi combiner ces solutions en fonction des données à traiter, elles aussi calculables ou mouvantes ou... ou... à encoder quelque part! A toi d'imaginer ton monde et à nous l'expliquer clairement! A+...

MFerrand · Answer

Magnifique formule... Salut Curulis ...

MFerrand · Answer

Pense à utiliser les balises Code... ! Private Sub Ja_Click() If Selection.Row &lt; 15 Then Exit Sub 'Tu peux éventuellement mettre un message ' Après demande de confirmation d'effacer la sélection, avec la réponse "oui" Selection.EntireRow.Delete 'et les lignes suivantes sont inutiles Unload Me Range("A1").Select 'l'intérêt de cette ligne est discutable End Sub Cordialement. NB- La condition sous cette forme simplifiée n'est valide que parce que l'interdiction couvre une zone de lignes continue partant de la 1.....