× Aidez la recherche contre le COVID-19 avec votre ordi ! Rejoignez l'équipe PC Astuces Folding@home
 > Tous les forums > Forum Bureautique
 Pourquoi, je n'arrive pas à avoir la même chose ?Sujet résolu
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
Saturnien
  Posté le 15/09/2010 @ 08:15 
Aller en bas de la page 
Astucien

Bonjour,

J'ai fait un copier-coller de la plage B1:B15 en D1:D15.

J'ai recopié aussi le module1 en module 2.

J'ai changé toutes les adresses de cellules.

Mais après plusieurs heures d'essais, ça ne foncionne pas, en plus se sont des codes très faciles.

Quelqu'un peut-il m'aider ?

Joint fichier : http://www.cijoint.fr/cjlink.php?file=cj201009/cijMImKiuV.xls

Merci de votre aide.

Guy



Modifié par Saturnien le 15/09/2010 08:16
Publicité
usularrakis
 Posté le 15/09/2010 à 08:32 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

salut

vu le script de tes macros (les "Private sub") il y a des apostrophes devant certaines lignes (celles qui apparaissent en vert) ce qui fait que la macro ne les prends pas en compte et donc ne fonctionne pas

il y a surement d'autres choses mais je n'ai pas le temps de regarder tout de suite



Modifié par usularrakis le 15/09/2010 08:41
Saturnien
 Posté le 15/09/2010 à 09:07 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

Bonjour,

Les lignes en vert, c'est normale.

La 1ère ligne verte ne sert à rien, car la mocro Copie est à supprimer

La 2ème ligne, c'est la même chose. Sinon, j'ai le message "Nom ambigu".

usularrakis
 Posté le 15/09/2010 à 10:51 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

Saturnien a écrit :

La 2ème ligne, c'est la même chose. Sinon, j'ai le message "Nom ambigu".

ben oui tu as 2 "private sub" qui portent le même non !

Saturnien
 Posté le 15/09/2010 à 10:54 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

Je suis d'accord, mais que dois-je faire pour éviter ça ?

il me semble que je ne peut pas changer le nom dans :

Private Sub Worksheet_Change(ByVal Target As Range).



Modifié par Saturnien le 15/09/2010 10:56
Saturnien
 Posté le 15/09/2010 à 12:51 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

j'ai trouvé.

Il suffisait de supprimer "Exit Sub".

Page : [1] 
Page 1 sur 1

Vous devez être connecté pour poster des messages. Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !


Les bons plans du moment PC Astuces

Tous les Bons Plans
19,99 €Fire TV Stick à partir de 19,99 €
Valable jusqu'au 02 Décembre

Amazon fait une promotion sur ses nouvelles clés HDMI Amazon Fire TV Stick. La version Lite passe à 19,99 € au lieu de 29,99 € tandis que la version normale passe à 29,99 € au lieu de 39,99 €. Cette clé HDMI à brancher sur votre TV possède un processeur quadricoeur, 1 Go de RAM et 8 Go d'espace de stockage, le WiFi et le bluetooth. Avec elle, vous allez pouvoir voir facilement Prime Video, Netflix, Disney+, YouTube, Spotify sur votre TV Full HD. Cette nouvelle version 2020 est compatible Alexa.

Une télécommande est fournie avec les deux versions. La différence est que la version normale possède une télécommande améliorée (avec plus de boutons pour contrôler également la TV).

Si vous avez une TV 4K, tournez-vous vers ce modèle dédié à 39,99 € au lieu de 59,99 €.


> Voir l'offre
49,99 €Casque audio sans fil Bluetooth Jabra Move Style Edition à 49,99 €
Valable jusqu'au 30 Novembre

Amazon fait une promotion sur le très bon casque audio sans fil Bluetooth Jabra Move Style Edition qui passe à 49,99 € alors qu'on le trouve ailleurs à plus de 70 €. La livraison est gratuite. Une bonne affaire pour un casque confortable et qui offre une bonne qualité sonore. Jusqu'à 14h d'autonomie. Un connecteur jack 3,5 mm est fourni pour utiliser le casque en filaire (dans l'avion par exemple).


> Voir l'offre
34,99 €Souris Logitech MX Anywhere 2 (Bluetooth, Unifying) à 34,99 €
Valable jusqu'au 02 Décembre

Amazon fait une promotion sur l'excellente souris sans fil Logitech MX Anywhere 2 qui passe à 34,99 € livrée gratuitement alors qu'on la trouve ailleurs à partir de 65 €. Cette souris que vous pourrez emporter partout avec votre PC ou Mac portable offre une double connectivité sans fil unify ou Bluetooth. Son capteur laser Dark field vous permettra de l'utiliser sur n'importe quelle surface. 


> Voir l'offre

Sujets relatifs
Word n'imprime pas la même chose qu'à l'écran!
Avoir même liste contacts sur plusieurs ordis/WLM?
avoir le même bandeau sur tous les slides
nb de liens dans une plage appartennant à la même ligne Horiz. ou verti...
HotShots, Je dois être nul, je n'y arrive pas!!!
Excel 2007 Copier/Coller d’une feuille à l’autre Dans un même classeur.
Je n'arrive plus à insérer une image dans Word 2007
Je n'arrive plus à cliquer mes mails ?
Pourquoi cette fenêtre dans Word 2007
2 formats texte sur un même pc
Plus de sujets relatifs à Pourquoi, je n''arrive pas à avoir la même chose ?
 > Tous les forums > Forum Bureautique