Collage special avec laison et mise en forme

Résolu
Lameche15
Messages postés
155
Date d'inscription
mardi 9 septembre 2008
Statut
Membre
Dernière intervention
29 décembre 2021
- 7 janv. 2021 à 17:57
Lameche15
Messages postés
155
Date d'inscription
mardi 9 septembre 2008
Statut
Membre
Dernière intervention
29 décembre 2021
- 12 janv. 2021 à 17:13
Bonjour,

J'aimerais savoir s'il est possible de réaliser un collage spécial d'une plage de données avec liaison tout en conservant la mise en forme vers une autre feuille du classeur.
De cette façon en cas de modification dans la plage copiée, cette modification serait effective dans la plage de cellule collée.
Et le top du top serait que la réciproque soit possible aussi à savoir modifier des cellules dans la plage collée au départ, alors la modification se ferait dans la plage copiée au départ.

J'espère être clair, et si quelqu'un a une piste de réflexion je l'en remercie par avance

Cordialement

--

4 réponses

cs_Le Pivert
Messages postés
7745
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
20 mai 2022
129
12 janv. 2021 à 11:33
Bonjour,

Ça n'a pas l'air de vous inspirer!!

non, vu le peu d'intérêt que tu portes aux réponses qui te sont faites!

https://codes-sources.commentcamarche.net/forum/affich-10103688-recuperation-debut-de-mois-en-fonction-du-mois

1
Lameche15
Messages postés
155
Date d'inscription
mardi 9 septembre 2008
Statut
Membre
Dernière intervention
29 décembre 2021

12 janv. 2021 à 11:08
Bonjour,

Ça n'a pas l'air de vous inspirer!!
Du coup je suis parti sur la solution d'utiliser l'outil appareil photo par macro qui au moins me donne la liaison dans un sens.


--
0
Lameche15
Messages postés
155
Date d'inscription
mardi 9 septembre 2008
Statut
Membre
Dernière intervention
29 décembre 2021

12 janv. 2021 à 11:31
Le problème désormais c'est que je souhaiterais pouvoir effacer l'image dans ma feuille "tampon".
J'écris:

Sheets("Sem Type").Pictures.Paste(Link:=True).Select
Du coup excel attribu un nom à l'image qui vient d'être créée, comment puis-je la renommer cette image?
--
0
cs_Le Pivert
Messages postés
7745
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
20 mai 2022
129
12 janv. 2021 à 11:45
re,

Si tu n'as qu'une image, il suffit de faire cela en te mettant sur la feuille concernée:

Dim s As Shape
For Each s In ActiveSheet.Shapes 'boucle sur les shapes
 s.Delete
   Next s


@+ Le Pivert
0
Lameche15
Messages postés
155
Date d'inscription
mardi 9 septembre 2008
Statut
Membre
Dernière intervention
29 décembre 2021
> cs_Le Pivert
Messages postés
7745
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
20 mai 2022

12 janv. 2021 à 12:07
Le problème est là, j'ai des boutons (controles activeX) dans ma feuille qui sont à priori considéré comme des images car si je fais ça, il m'efface aussi les boutons. Donc je cherche à nommer l'image que je crée pour que je puisse aller ensuite la chercher pour l'effacer. Si cela est possible...
0
cs_Le Pivert
Messages postés
7745
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
20 mai 2022
129 > Lameche15
Messages postés
155
Date d'inscription
mardi 9 septembre 2008
Statut
Membre
Dernière intervention
29 décembre 2021

12 janv. 2021 à 12:14
voir ceci effacer les shapes sauf les boutons

http://boisgontierjacques.free.fr/pages_site/lesimages.htm#Suppression

tu peux aussi parcourir ce site pour trouver d'autres réponses!

@+
0
Lameche15
Messages postés
155
Date d'inscription
mardi 9 septembre 2008
Statut
Membre
Dernière intervention
29 décembre 2021
> cs_Le Pivert
Messages postés
7745
Date d'inscription
jeudi 13 septembre 2007
Statut
Contributeur
Dernière intervention
20 mai 2022

12 janv. 2021 à 17:13
Merci beaucoup pour le lien.
Du coup j'ai réussi à nommer mon image grâce à la ligne de code suivante:
Selection.ShapeRange.Name = "test"

Et donc ensuite je peux aller la redimensionner dupliquer ma feuille type et supprimer l'image dans ma feuille type.
J'avoue que mon code n'est pas optimisé avec beaucoup de Select et autre activate (entre autres) mais tout fonctionne et vu mon niveau cela me satisfait à ce jour.
Et merci encore aux gens qui maitrisent de partager leur savoir afin de faire progresser les auto didacte débutants comme moi!

@+
0
Lameche15
Messages postés
155
Date d'inscription
mardi 9 septembre 2008
Statut
Membre
Dernière intervention
29 décembre 2021

12 janv. 2021 à 11:39
Je vous demande de m'excuser, il est vrai que je ne vous ai pas remercié ni clôturé la discussion.

Pardon

--
0