Vous avez probablement déjà reçu un classeur dans lequel d’autres classeurs étaient liés. Cependant, comme vous ne disposiez pas des classeurs liés, il était inutile de mettre à jour les liens. Si vous envoyez également des classeurs et que vous souhaitez les libérer des liens au préalable, insérez un nouveau classeur et transférez un tableau sans les liens qu’il contient. Vous pouvez également automatiser cette tâche avec une macro VBA.
Sub FeuilleTransfertSansValeurs () Cells.Copy Application.Workbooks.Add Range("A1").Select Selection.PasteSpecial Paste:=xlValues, _ Operation:=xlNone, SkipBlanks:=False, Transpose:=False Application.CutCopyMode = False End Sub
Commentaires
A l’aide de la propriété Cells et de la méthode Copy, vous pouvez copier toutes les cellules du tableau actif. Insérez ensuite un nouveau classeur à l’aide de l’instruction Workbooks.Add et placez le pointeur de la souris sur la cellule A1 du premier tableau. Maintenant, utilisez la méthode PasteSpecial, dans laquelle vous utilisez la constante XlValues dans l’argument Paste. Cette méthode insère les données du presse-papiers dans la plage spécifiée (Range (“A1”)). Définissez ensuite l’état de la propriété CutCopyMode sur False. Cela entraîne la suppression du rectangle de sélection de la zone copiée.