Passer au contenu principal

Excel : comment réparer les liens brisés

Dans un classeur, vous pouvez parfois créer des liens vers d'autres classeurs pour faire référence à des informations pertinentes. Mais lorsque le classeur source est renommé ou déplacé vers un autre emplacement, ces liens supplémentaires seront rompus. Ici, ce didacticiel présente deux méthodes différentes pour réparer les liens rompus dans Excel.

Corrigez les liens brisés en appliquant Modifier les liens

Corrigez les liens brisés à l'aide du code VBA


Corrigez les liens brisés en appliquant Modifier les liens

Dans Excel, vous pouvez accéder à la boîte de dialogue Modifier les liens pour les corriger un par un.

1. Activez le classeur contenant les liens rompus, puis cliquez sur Données > Modifier les liens (en Requêtes et connexions groupe).
texte de remplissage de doc basé sur la couleur 1

2. dans le Modifier les liens dialogue, cliquez sur Vérifier l'état pour trouver quels liens sont rompus.
texte de remplissage de doc basé sur la couleur 1 texte de remplissage de doc basé sur la couleur 1

3. Cliquez ensuite sur les liens brisés, puis cliquez sur Changer de source bouton, dans le Changer de source fenêtre, choisissez le bon classeur source, puis cliquez sur OK.
texte de remplissage de doc basé sur la couleur 1

maintenant vous pouvez voir le statut changé de Erreur à OK, puis répétez l'étape 3 pour réparer d'autres liens rompus.
texte de remplissage de doc basé sur la couleur 1


Corrigez les liens brisés à l'aide du code VBA

Voici un code VBA qui peut vous aider.

1. Activez le classeur dont vous souhaitez réparer les liens rompus et appuyez sur autre + F11 clés.

2. Puis dans le popping Microsoft Visual Basic pour applications fenêtre, cliquez sur insérer > Module pour créer un nouveau module vierge.
texte de remplissage de doc basé sur la couleur 1

3. Copiez et collez le code ci-dessous dans le nouveau module.

VBA : Corriger les liens brisés

Sub ResetInvalidLinks()
'UpdatedbyExtendoffice20220701
Dim xWB As Workbook
Dim xLks As Variant
Dim xFNum, xStatus As Integer
Dim xStrLk, xLinAddress As String
Dim xF
Dim xLk
Set xWB = Application.ActiveWorkbook
xLks = xWB.LinkSources(xlExcelLinks)
If IsEmpty(xLks) Then
    MsgBox "Select updated source"
    Exit Sub
End If
On Error Resume Next
For xFNum = LBound(xLks) To UBound(xLks)
    xStrLk = xLks(xFNum)
    xStrLk = Right(xStrLk, Len(xStrLk) - InStrRev(xStrLk, "\"))
    xStatus = ActiveWorkbook.LinkInfo(xStrLk, xlLinkInfoStatus)
    If xStatus <> 0 And xStatus <> 3 Then
        MsgBox xStrLk & " the link is broken, please select new source"
        xF = Application.GetOpenFilename()
        If xF <> "" Then
            For Each xLk In ActiveSheet.UsedRange.Hyperlinks
                xLinAddress = Right(xLk.Address, Len(xLk.Address) - InStrRev(xLk.Address, "\"))
                    If InStr(xStrLk, GetAddress) <> 0 Then
                        ActiveSheet.Hyperlinks.Add Anchor:=xLk.Range, Address:=xF
                    End If
            Next
            ActiveWorkbook.ChangeLink xLks(xFNum), xF, xlLinkTypeExcelLinks
        End If
        End If
    Next
End Sub

4. presse F5 clé ou Courir bouton (dans la fenêtre de contrôle qui apparaît maintenant) doc courir pour activer le code. Maintenant, il recherche s'il y a des liens brisés. Si tel est le cas, une boîte de dialogue apparaît pour vous indiquer quel lien est rompu, veuillez sélectionner une nouvelle source. Cliquez sur OK continuer.
texte de remplissage de doc basé sur la couleur 1

5. dans le Ouvert fenêtre, choisissez la source mise à jour, cliquez sur OK.
texte de remplissage de doc basé sur la couleur 1

S'il existe toujours un lien rompu dans le classeur, les boîtes de dialogue ci-dessus réapparaissent jusqu'à ce que tous les liens rompus soient corrigés.

Remarque : s'il n'y a pas de lien rompu dans le classeur, le VBA s'arrêtera après l'exécution.

Conseil  : si vous souhaitez afficher tous les liens supplémentaires et casser les liens rompus, Kutools for Excel's Rechercher et rompre les liens rompus fonctionnalité sera une bonne aide.
texte de remplissage de doc basé sur la couleur 1

Pour plus de détails sur cette fonctionnalité, veuillez cliquer sur ici.

Pour un essai gratuit de 30 jours, veuillez télécharger depuis ici.


Autres opérations (articles)

Comment réparer/verrouiller la couleur d'arrière-plan dans une feuille
Parfois, lorsque vous partagez une feuille avec d'autres pour la modifier, vous souhaiterez peut-être verrouiller la couleur d'arrière-plan dans une plage de cellules et empêcher leur modification.

Comment réduire la taille du fichier Excel ?
Parfois, l'ouverture ou l'enregistrement prendra quelques minutes si le fichier Excel est trop volumineux. Pour résoudre ce problème, ici dans ce tutoriel, il vous indique comment réduire la taille du fichier Excel en supprimant le contenu ou les formats inutiles ou jamais utilisés.

Excel : comment créer ou insérer un signet
Avez-vous déjà imaginé créer ou insérer un signet pour accéder rapidement à une plage de données spécifique alors qu'il y a beaucoup de données dans une feuille de calcul ou un classeur ?

Comment appliquer un ombrage aux lignes / colonnes impaires ou paires (alternatives) dans Excel?
Lors de la conception d'une feuille de calcul, de nombreuses personnes ont tendance à appliquer un ombrage aux lignes ou colonnes impaires ou paires (alternatives) afin de rendre la feuille de calcul plus visuelle. Cet article vous montrera deux méthodes pour appliquer un ombrage aux lignes / colonnes impaires ou paires dans Excel.

 


  • Barre Super Formula (modifiez facilement plusieurs lignes de texte et de formule); Disposition de lecture (lire et modifier facilement un grand nombre de cellules); Coller dans la plage filtrée
  • Fusionner les cellules / lignes / colonnes et conservation des données; Contenu des cellules divisées; Combiner les lignes en double et la somme / moyenne... Empêcher les cellules en double; Comparer les gammes
  • Sélectionnez Dupliquer ou Unique Lignes; Sélectionnez les lignes vides (toutes les cellules sont vides); Super Find et Fuzzy Find dans de nombreux classeurs; Sélection aléatoire ...
  • Copie exacte Plusieurs cellules sans changer la référence de formule; Créer automatiquement des références à plusieurs feuilles; Insérer des puces, Cases à cocher et plus encore ...
  • Formules favorites et insérer rapidement, Plages, graphiques et images; Crypter les cellules avec mot de passe; Créer une liste de diffusion et envoyer des e-mails ...
  • Extrait du texte, Ajouter du texte, Supprimer par position, Supprimer l'espace; Créer et imprimer des sous-totaux de pagination; Conversion entre le contenu et les commentaires des cellules
  • Super filtre (enregistrer et appliquer des schémas de filtrage à d'autres feuilles); Tri avancé par mois / semaine / jour, fréquence et plus; Filtre spécial par gras, italique ...
  • Combiner des classeurs et des feuilles de travail; Fusionner les tableaux en fonction des colonnes clés; Diviser les données en plusieurs feuilles; Conversion par lots xls, xlsx et PDF
  • Regroupement du tableau croisé dynamique par numéro de semaine, jour de la semaine et plus encore ... Afficher les cellules déverrouillées et verrouillées par différentes couleurs; Mettre en évidence les cellules qui ont une formule / un nom
onglet kte 201905
  • Activer l'édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
  • Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
  • Augmente votre productivité de 50% et réduit des centaines de clics de souris chaque jour!
bas de cabine

 

Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations