macro pour du copier/coller

I

Infratunes

XLDnaute Nouveau

• 10 Février 2006

• #2

le fichier

j'ai du réduire sa taille !

merci

[file name=Classeur1_20060210122804.zip size=48434]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Classeur1_20060210122804.zip[/file]

 

Pièces jointes

• Classeur1_20060210122804.zip

  47.3 KB · Affichages: 33

Vote positif 0 Vote négatif

Jeannot45

XLDnaute Occasionnel

• 10 Février 2006

• #3

salut infratunes

Ci dessous une petite macro qui drevrait résoudre ton problème

Code:

Sub CopierCell()
Dim Cell As Range
Dim VarContenu As Variant

Range('A1').Select
Range(Selection, ActiveCell.SpecialCells(xlLastCell)).Select

For Each Cell In Selection
    If Cell EST DIFFERENT DE '' Then
        VarContenu = Cell
    Else
        Cell = VarContenu
    End If
Next

End Sub

Bonne continuation

Jeannot

 

Vote positif 0 Vote négatif

Jeannot45

XLDnaute Occasionnel

• 10 Février 2006

• #4

Re,

Petite info complémentaire:
pour pouvoir poster le message j'ai du écrire EST DIFFERENT DE en toutes lettres dans le code.

Il te faudra mettre les symboles habituels pour que la macro fonctionne

Jeannot

 

Vote positif 0 Vote négatif

I

Infratunes

XLDnaute Nouveau

• 10 Février 2006

• #5

Merci Jeannot !

pourrais tu me coller la macro dans le classeur xls car je ne sais pas par quoi il faut remplacer le EST DIFFERENT DE.

Merci bien !

 

Vote positif 0 Vote négatif

Jeannot45

XLDnaute Occasionnel

• 10 Février 2006

• #6

re,

tu remplaces Est different de par les symboles de comparaison habituels juxtaposés

Plus petit que ... et Plus grand que ...

a+

Jeannot

 

Vote positif 0 Vote négatif

I

Infratunes

XLDnaute Nouveau

• 10 Février 2006

• #7

Dans quelle partie de VB dois-je copier le code ? General, worksheet...

J'ai une message d'erreur qui m'indique : impossible d'exécuter le code en mode arrêt.

:huh:

comment puis-je régler cela?

Merci !

 

Vote positif 0 Vote négatif

Jeannot45

XLDnaute Occasionnel

• 10 Février 2006

• #8

Re,

Je te joins ton fichier avec la macro.

Bonne réception

Jeannot

 

Vote positif 0 Vote négatif

I

Infratunes

XLDnaute Nouveau

• 10 Février 2006

• #9

ah, le fichier n'a pas été joint :ermm:

 

Vote positif 0 Vote négatif

Jeannot45

XLDnaute Occasionnel

• 10 Février 2006

• #10

re,

Excuse moi .... Je Croyais ...
Enfin il est Vendredi

Jeannot

 

Vote positif 0 Vote négatif

Jeannot45

XLDnaute Occasionnel

• 10 Février 2006

• #11

Re,

Des difficultés à Joindre le fichier

Je recommence parce qu'il etait un peu trop lourd (Max 50Ko)

Jeannot [file name=CopierColler_20060210142817.zip size=6179]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/CopierColler_20060210142817.zip[/file]

 

Pièces jointes

• CopierColler_20060210142817.zip

  6 KB · Affichages: 34

Vote positif 0 Vote négatif

I

Infratunes

XLDnaute Nouveau

• 10 Février 2006

• #12

il est peut être trop lourd meme en zip,

sinon tu peux l'envoyer la :
erreur404_arobase_gmail_point_com

Merci

 

Vote positif 0 Vote négatif

I

Infratunes

XLDnaute Nouveau

• 10 Février 2006

• #13

ah je pense que tu as fait un peu trop de menage ! la macro a disparu lol

sinon envoye la moi par mail

merci bcp !

 

Vote positif 0 Vote négatif

Jeannot45

XLDnaute Occasionnel

• 10 Février 2006

• #14

re,

Non, la macro est toujours dans le fichier
tu peux la voir en faisaint ALT F11

puis tu ouvres le module1

jeannot

 

Vote positif 0 Vote négatif

I

Infratunes

XLDnaute Nouveau

• 10 Février 2006

• #15

B)
Merci ca marche super

 

Vote positif 0 Vote négatif