Fichier fou

Bonjour,

Dans le cadre de mon job, je mets à jour un fichier excel avec un petit dév VBA mais rien de méchant.

(Je précise que mes cours de VBA datent et que je n'étais pas vraiment assidue).

Le souci est que mon fichier est fou, je m'explique :

Sans que ça soit dans la maccro, si je modifie une cellule dans un onglet, elle se recopie dans les autres, quelque soit la modification, cela écrase plein de données dans les autres sans aucune raison... Si quelqu'un peut m'expliquer d'où vient le problème...

Merci

Bonjour,

Il se peut qu'il y ai dans la module de la feuille la procédure événementielle Change() qui fait ça. Donc, Alt+F11 et double-clic sur le module de la feuille en question pour vérifier !

Merci de la réponse rapide!

Non, il n'y a pas cette fonction. Je poste la seule maccro du fichier :

Sub restore_Sommaire()

iSheet = 2

Do While Not Worksheets(iSheet).Name = "Tableau_de_suivi"

iSheet = iSheet + 1

Loop

For i = 1 To iSheet - 1

Cellule = "'" + Worksheets(i).Name + "'!$B$2"

Fichier = Chr(34) + "[" + ActiveWorkbook.Name + "]" + Cellule + Chr(34)

Onglet = Chr(34) + Worksheets(i).Name + Chr(34)

Cells(i + 16, 2).FormulaLocal = "=LIEN_HYPERTEXTE(" + Fichier + ";" + Onglet + ")"

Next i

For i = iSheet To 100

Cells(i + 16, 2) = ""

Next i

End Sub

Re,

Postes ton classeur pour voir !

Voilà, j'ai supprimé des onglets car le fichier ne passait pas.

7interfaces.xlsm (0.97 Mo)

Bonjour

N’étais-tu pas en groupe de travail (sélection multi onglet)?

Je ne vois rien de particulier...

Bonjour,

Je n'ai pas compris ton message...

Re

Si tu sélectionnes plusieurs onglets tu travailles alors en mode groupe de travail et toute action sur l'un se fait sur tous les sélectionnés...

C'est indiqué près du nom du classeur dans la ligne de titre...

Hmmm je ne pensais pas avoir fait une erreur aussi bête

Je regarde demain matin a l'aube. Merci

Rechercher des sujets similaires à "fichier fou"