Utiliser une fonction personnalisée pour supprimer des liens externes dans un cahier d’exercices

Comme la macro précédente, cette macro supprimera tous les liens externes ; cependant, ils seront supprimés dans l’ensemble du classeur, pas seulement dans la feuille de travail en cours. Cette macro recherchera toutes les feuilles de travail existantes d’un classeur et supprimera les liens externes, en les remplaçant par des valeurs.

Pour supprimer tous les liens externes dans un classeur :

  1. Appuyez sur <Alt+F11>.
  2. Dans le menu Insertion, cliquez sur Module.
  3. Tapez la macro suivante :

 

Sub DeleteExLinksWkb()

Dim rng As Range

Dim wks As Worksheet

For Each wks In ActiveWorkbook.Worksheets

 For Each rng In wks.UsedRange

   If InStr(rng.Formula, "[“) > 0 Then

         rng.Value = rng.Value

   End If

 Next rng

Next wks

End Sub

 

S’abonner
Notifier de
0 Commentaires
Inline Feedbacks
Voir tous les commentaires

Initiation à Excel

Fonctions Excel

Excel VBA

Macros VBA Utiles

Plus d'outils

Sur Facebook

Sur YouTube

0
Nous aimerions avoir votre avis, veuillez laisser un commentaire.x

Suivez - nous sur Facebook pour être parmi les premiers
à profiter de nos derniers articles et astuces...