Change By Val

C

Creepy

XLDnaute Accro

• 28 Décembre 2005

• #2

Bonsoir,

NO PJ !

@+

Creepy

 

Vote positif 0 Vote négatif

F

Fernandez67

Guest

• 28 Décembre 2005

• #3

Un plantage avec mon VIEUX pc portable.

 

Vote positif 0 Vote négatif

F

Fernandez67

Guest

• 28 Décembre 2005

• #4

Voici le fichier

 

Vote positif 0 Vote négatif

M

MichelXld

XLDnaute Barbatruc

• 29 Décembre 2005

• #5

bonjour Fernandez67 , bonjour Creepy

tu trouveras dans ce lien la procedure pour joindre un fichier

Lien supprimé


bonne journée
MichelXld

 

Vote positif 0 Vote négatif

F

Fernandez67

Guest

• 29 Décembre 2005

• #6

Merci pour l'info Michel [file name=matricecourrier.zip size=33988]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/matricecourrier.zip[/file]

 

Pièces jointes

• matricecourrier.zip

  33.2 KB · Affichages: 12
• matricecourrier.zip

  33.2 KB · Affichages: 13
• matricecourrier.zip

  33.2 KB · Affichages: 19

Vote positif 0 Vote négatif

M

MichelXld

XLDnaute Barbatruc

• 29 Décembre 2005

• #7

bonjour


supprime la procedure 'evenementielle'

Private Sub Worksheet_Change2(ByVal Target As Range)

et colle tout ce quelle contient à la suite dans la procedure Worksheet_Change (je n'ai pas testé le contenu)


tu procedure ne peut pas fonctionner car l'evenement Change2 n'existe pas


ci dessous la liste des evenements possibles dans la feuille

Activate
BeforeDoubleClick
BeforeRightClick
Calculate
FolowwHyperlink (en fonction des versions Excel)
Change
Deactivate
SelectionChange
PivotTableUpdate



bonne journée
MichelXld

 

Vote positif 0 Vote négatif

F

Fernandez67

Guest

• 2 Janvier 2006

• #8

Ok Merci Michel,

J'ai bien supprimé l'évenement.

Par contre le changement de zone en 'B33' n'est pris en compte et je ne comprend pas pourquoi...

 

Vote positif 0 Vote négatif

R

Re

Guest

• 2 Janvier 2006

• #9

Le fichier

 

Vote positif 0 Vote négatif

F

Fernandez67

Guest

• 2 Janvier 2006

• #10

Bon ben le fichier... [file name=matricecourrier_20060102134757.zip size=40517]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/matricecourrier_20060102134757.zip[/file]

 

Pièces jointes

• matricecourrier_20060102134757.zip

  39.6 KB · Affichages: 10

Vote positif 0 Vote négatif

M

MichelXld

XLDnaute Barbatruc

• 2 Janvier 2006

• #11

bonsoir

je n'ai pas optimisé ta procedure , mais tu peux deja tester cette adaptation


bonne soirée
MichelXld [file name=Matrice_Courrierbeta_V02.zip size=37604]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Matrice_Courrierbeta_V02.zip[/file]

 

Pièces jointes

• Matrice_Courrierbeta_V02.zip

  36.7 KB · Affichages: 17

Vote positif 0 Vote négatif

F

Fernandez67

Guest

• 2 Janvier 2006

• #12

Superbe !!!!

Par contre, pourrais tu me dire ce qui clochait ?

Ensuite est il possible de suivre un fil... Je m'explique, en ce qui me concerne pour pouvoir retrouver mon message, il faut que je passe pas par la case 'Rechercher'.

Dans tous les cas, je te remercie grandement. Vivement que cela soit aussi simple pour moi

Cordialement

 

Vote positif 0 Vote négatif

M

MichelXld

XLDnaute Barbatruc

• 3 Janvier 2006

• #13

bonjour

je ne me souviens plus tres bien des modifs mais tu peux toujours comparer la macro avec ton classeur d'origine :

entre autre , les lignes

Lig = Sheets('BaseAdresse').Range('A65536').End(xlUp).Row

et

Lig2 = Sheets('BaseTXT').Range('A65536').End(xlUp).Row

etaient mal positionnées dans la procedure


quand tu ecris un message , coches la case 'souscrire' pour recevoir des notifications de réponses.
tu recevras un mail contenant un lien vers le fil de discussion , à chaque reponse


bonne journée
MichelXld

 

Vote positif 0 Vote négatif