× 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
49,49 €Disque dur Toshiba P300 2 To à 49,49 € avec le code AFFAIRE10
Valable jusqu'au 29 Octobre

Cdiscount fait une promotion sur le disque dur Toshiba P300 2 To qui passe à 49,49 € grâce au code promo AFFAIRE10On le trouve ailleurs à partir de 65 €. Ce disque dur interne de 2 To est SATA 6 Gbps, possède 64Mo de cache et dispose d'une vitesse de rotation de 7200 tpm. 


> Voir l'offre
103,74 €Mini SSD externe WD My Passport Go 1 To à 103,74 €
Valable jusqu'au 27 Octobre

Amazon Allemagne propose actuellement le mini SSD externe WD My Passport Go 1 To à 99,13 € grâce à un coupon de réduction automatiquement appliqué au moment du paiement. Comptez 4,61 € pour la livraison en France soit un total de 103,74 € livré. On le trouve ailleurs à partir de 165 €. Il offre des vitesses allant jusqu'à 400 Mo/s grâce à son connecteur USB 3.0 intégré. Sa taille mini vous permettra de l'emporter partout avec vous de même que sa résistance aux chocs et aux chutes (jusqu'à 2 mètres). Il intègre un logiciel de sauvegarde automatique ainsi qu'un outil de chiffrement de données. 


> Voir l'offre
11,78 €Adaptateur USB 3.0 Ethernet Gigabit TP-Link UE300 à 11,78 €
Valable jusqu'au 29 Octobre

Amazon fait une promotion sur l'adaptateur USB 3.0 Ethernet Gigabit TP-Link UE300 qui passe à 11,78 € au lieu de 20 €. Cet adaptateur vous permettra de rajouter une prise Ethernet Gigabit à votre ordinateur portable (ou votre tablette via un adaptateur OTG) qui en est dépourvu.


> 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