Connexion fantôme | ||
---|---|---|
Inscription: 20/02/2018
De Suisse
Messages:
14
Système d'exploitation: PC Version Excel utilisée: 2007 |
Posté le : 07-10-2019 10h46
Bonjour,
J'ai un problème sur un fichier Excel avec des connexions "fantômes". J'ai renommer des fichiers sources et j'ai un problème avec l'un d'entre eux. J'ai supprimer une connexcion (celle avec le fichier 121 swissmade) mais celui-ci revient lorsque j'actualise mon fichier. J'ai essayé avec CTRL+F de trouver une formule faisant référence à ce document : Rien J'ai contrôlé tout mes TCD et aucun n'a de lien externe avec ce fichier...
Dans mes connexions externe (cf xls) celui-ci ne s'affiche pas...
Merci d'avance pour vos réponses..
François |
|
|
Re: Différentes police dans une même cellule | ||
---|---|---|
Inscription: 20/02/2018
De Suisse
Messages:
14
Système d'exploitation: PC Version Excel utilisée: 2007 |
Posté le : 25-04-2018 10h11
Salut,
Alors j'ai magouillé mes formules pour que celles-ci correspondent à l'infrastructure que tu m'avais fait sur le premier code. Je l'ai ensuite adapté pour mes autres tableaux et ça marche nickel... J'ai aussi passé chez un pote informaticien qui m'a expliqué deux trois trucs et m'a montré l'élément ESSENTIEL si veux comprendre où est ton erreur : la fenêtre VARIABLE LOCAL ! L'infrastructure (espace etc) et la rigueur sont effectivement primordial dans ces tableaux
Maintenant tous est OK... Merci de ton dévouement ;)
Bonne journée à tous...
PS: voici mon code si cela peut intéresser quelqu'un....
Option Explicit Public val_cel As Boolean
Private Sub Worksheet_Change(ByVal Target As Range)
Sub lance()
Dim t0 As String, t1 As String, t2 As String, t3 As String, t4 As String
' dechet bleu
'Coût NC par semaine
If IsError(Range("AD153")) Then val_cel = True: Range("AD153").Value = "": Exit Sub
val_cel = True
ActiveSheet.Shapes("Rectangle 17").Select ' rectangle où se situera les couleurs
'Nbr de composant par semaine
If IsError(Range("AD106")) Then val_cel = True: Range("AD106").Value = "": Exit Sub
val_cel = True
ActiveSheet.Shapes("Rectangle 13").Select ' rectangle où se situera les couleurs
'Pourcentage de remplacement
If IsError(Range("AD99")) Then val_cel = True: Range("AD99").Value = "": Exit Sub
val_cel = True
ActiveSheet.Shapes("Rectangle 8").Select ' rectangle où se situera les couleurs
val_cel = False
Range("N10").Select |
|
|
Re: Différentes police dans une même cellule | ||
---|---|---|
Inscription: 20/02/2018
De Suisse
Messages:
14
Système d'exploitation: PC Version Excel utilisée: 2007 |
Posté le : 24-04-2018 13h55
Maintenant que tout fonctionne je vais essayer de mettre ça sur mon vrai fichier...
Je veux utiliser ton code (en modifiant la cellule AD153 où il y a le calcul) pour avoir des couleurs sur mes autres tableau...
J'ai collé deux fois le code mais celui panique à cause du Sub Worksheet_Change(ByVal Target As Range) qui revient plusieurs fois...
Je vais essayer de magouiller quelques chose pour éviter tous cela... |
|
|
Re: Différentes police dans une même cellule | ||
---|---|---|
Inscription: 20/02/2018
De Suisse
Messages:
14
Système d'exploitation: PC Version Excel utilisée: 2007 |
Posté le : 24-04-2018 08h33
Alors j'ouvre ton fichier
Je fais actualiser et je touche un peu le TCD et tout va bien...
J'ouvre mon fichier
-Je colle ton code (je fait "play" et là j'ai de nouveau l'erreur 9 blablabla) -J'essaye d'actualiser j'ai de nouveau l'erreur 9 blablabla -J'enlève la formule dans le rectangle (je n'ai pas de couleurs) -J'actualise j'ai de nouveau l'erreur 9 blablabla -Je touche mon TCD.. et là tous plante...
Dernière chance.. Je copie colle la formule en AD153 de ton fichier dans le mien et la miracle ça marche.... :):):):):):):):):)
Il avait des " " dans la formule de mon fichier (je pense que tu les as supprimé).... Sur cette base je vais pouvoir avancer....
Merci beaucoup pour ta patience et tout le reste....
Bonne journée à toi...
François
|
|
|
Re: Différentes police dans une même cellule | ||
---|---|---|
Inscription: 20/02/2018
De Suisse
Messages:
14
Système d'exploitation: PC Version Excel utilisée: 2007 |
Posté le : 23-04-2018 09h03
Salut,
ma réponse dans le fichier word qui est zippé....
Tiens moi au courant lorsque tu abandonneras ;)
Bonne journée Pièce jointe:
Suivi étapes assemblagetest.xlsm [ Taille: 76.06 Ko - Téléchargements: 478 ] image.zip [ Taille: 27.94 Ko - Téléchargements: 392 ] |
|
|
Re: Différentes police dans une même cellule | ||
---|---|---|
Inscription: 20/02/2018
De Suisse
Messages:
14
Système d'exploitation: PC Version Excel utilisée: 2007 |
Posté le : 19-04-2018 09h24
Salut Eric,
Je te remercie pour le temps passé sur mon problème...
J'ai regardé mais cela ne fonctionne pas ! J'ai toujours mon problème de : Erreur d'exécution '9' : L'indice n'appartient pas à la sélection...
J'ai essayé de regarder les options d'Excel et celles-ci sont semblable donc je ne comprends pas où se situe l'erreur. Le code est le même, les emplacements de cellules aussi, les options pareils...
J'abandonne.... Dommage car cela rendait pas mal les couleurs sur le graphique...
J'ai remis à tout hasard les deux fichiers mais je ne vois pas où pourrais se situer le problème...
Bonne journée et encore merci chef !!! Pièce jointe:
Suivi étapes assemblagetest.xlsm [ Taille: 74.67 Ko - Téléchargements: 392 ] Suivi étapes assemblagetest_modif_F_01.xlsm [ Taille: 74.93 Ko - Téléchargements: 392 ] |
|
|
Re: Différentes police dans une même cellule | ||
---|---|---|
Inscription: 20/02/2018
De Suisse
Messages:
14
Système d'exploitation: PC Version Excel utilisée: 2007 |
Posté le : 13-04-2018 08h33
Salut Eric,
Effectivement après toute mes modifications et tentatives cette partie du code a disparu...
Concernant les "" il me semble que j'avais scrupuleseument coller le code en modifiant seulement les AD1 en AD153
J'ai réessayer : J'ai mis le premier code (private sub) transmis dans la 1ère partie, puis ton deuxième code pour avoir les couleurs sur le rectangle mais toujours cette même erreur n°9...
J'ai mis le fichier en annexe et oui la formule est bien celle de la cellule AD153
Je pense que là ça devrait être réglé. |
|
|
Re: Différentes police dans une même cellule | ||
---|---|---|
Inscription: 20/02/2018
De Suisse
Messages:
14
Système d'exploitation: PC Version Excel utilisée: 2007 |
Posté le : 12-04-2018 13h40
Salut Eric,
J'ai testé ton code et cela marche nickel. Cependant j'ai un problème lorsque je copie le code dans mon classeur avec mes autres données, celui-ci me mets une erreur 9 l'indice n'appartient pas à la sélection.
Après moulte recherche sur le Web je n'ai pas trouvé comment modifier ton code pour effacer cette erreur ! Je pense qu'il y a un problème avec les différentes feuilles qui n'étaient pas présentes dans mon premier exemple.
Je t'ai mis en annexe le fichier où je vais vraiment l'utiliser j'ai juste vidé les autres onglets de leur informations mais je l'ai laissé la structure telle quelle.
Peux-tu m'expliquer où se situe et l'erreur et comment la réparer?
Merci d'avance et bonne journée |
|
|
Re: Différentes police dans une même cellule | ||
---|---|---|
Inscription: 20/02/2018
De Suisse
Messages:
14
Système d'exploitation: PC Version Excel utilisée: 2007 |
Posté le : 09-04-2018 10h04
En faite moi j'aimerais les couleurs dans la zone de texte sur le graphique. Je t'ai mis en annexe le graphique avec mes annotations.
Si tu veux dans mon vrai fichier la cellule AD15 = AD153 car j'ai d'autres indicateurs avant celui-ci. C'est cette cellule où j'ai la formule qui est injecté dans zone de texte au dessus du graphique (que je souhaite en couleur)...
Voilà voilà je pense que c'est plus clair comme ça...
Merci d'avance pour ta solution
Bonne journée à tous |
|
|
Re: Différentes police dans une même cellule | ||
---|---|---|
Inscription: 20/02/2018
De Suisse
Messages:
14
Système d'exploitation: PC Version Excel utilisée: 2007 |
Posté le : 06-04-2018 08h58
Salut Eric
Je te remercie pour ton aide... ça marche nickel... Par contre je vais t'embêter encore un peu:
Sur mon graphique j'ai une zone de texte qui représente la cellule AD15. J'aimerais que cela soit celle-ci qui ai les couleurs (Graphique= indicateurs installé dans les ateliers)
PS: Où se trouve le bouton résolu pour la conversation? |
|
|