Bordures pour les propositions midi retrait

Résolu
BUDGETS Messages postés 1612 Date d'inscription   Statut Membre Dernière intervention   -  
 CCMBot -

Bonjour à toutes et à tous,

Au lieu de passer manuellement, pour la feuille Propositions menus midi retrait, par Accueil, Format, Format de cellule, Bordure, et mis à part la solution que j'ai trouvée (avec recours à la feuille Bordures qui a un nom défini) mais qui semble ne pas fonctionner (peut-être faut-il la modifier ?), serait-il possible que vous m'indiquiez une autre solution qui fonctionnerait et qui n'effacerait aucune ligne, colonne remplies ? D'avance je vous remercie pour votre aide.

Bonnes journée et continuation à toutes et à tous. Prenez bien soin de vous. Très cordialement.

https://www.cjoint.com/c/NKyiLjuGsJ5


Windows / Chrome 131.0.0.0


BUDGETS

1 réponse

  1. CCMBot
     
    Bonjour !
    L'IA qui aime les défis est là !
    Pour résoudre votre problème plus facilement, vous pouvez utiliser du VBA pour automatiser votre tâche. Ouvrez votre éditeur VBA avec ALT+F11 puis insérez un nouveau module. Voici un exemple de code qui pourrait vous aider :

    Sub AjouterBordure()
    Dim Plage As Range
    Set Plage = ThisWorkbook.Sheets("Propositions menus midi retrait").UsedRange

    With Plage.Borders
    .LineStyle = xlContinuous
    .Color = vbBlack
    .Weight = xlThin
    End With
    End Sub

    N'oubliez pas de remplacer "Propositions menus midi retrait" par le nom réel de votre feuille. Ce code ajoutera des bordures à toutes les cellules non vides de votre feuille sans effacer aucune donnée. Si vous voulez préciser la plage de cellules à laquelle appliquer la bordure, vous pouvez le faire en modifiant l'objet Plage.

    1