Aide pour la creation d une macro specifique

vgendron

XLDnaute Barbatruc

• 10 Septembre 2013

• #2

Re : Aide pour la creation d une macro specifique

salut
un exemple en PJ

le principe; tu prends la partie entière de la valeur divisée par 100 (te supprimes les deux derniers chiffres)
et tu multiplies par 100.. pour obtenir deux zeros à la fin

 

Pièces jointes

• doublezero.xlsm

  13.4 KB · Affichages: 24

Vote positif 0 Vote négatif

N

Nicolas1987

Guest

• 10 Septembre 2013

• #3

Re : Aide pour la creation d une macro specifique

Merci pour ta réponse mais j'ai trouvé une formule SUBSTITUE qui fonctionne très bien cependant j'ai besoin d'une MACRO et non d'une formule.

 

Vote positif 0 Vote négatif

D

david84

XLDnaute Barbatruc

• 10 Septembre 2013

• #4

Re : Aide pour la creation d une macro specifique

Bonjour,
une possibilité brut de décoffrage à adapter et peaufiner de ton côté :

Code:

Sub a()
Dim Plage As Range, c As Range
Set Plage = Range("A1:A11")
For Each c In Plage
    c = Application.WorksheetFunction.Replace(c.Text, Len(c) - 1, 2, "00")
Next c
End Sub

 

Vote positif 0 Vote négatif

N

Nicolas1987

Guest

• 10 Septembre 2013

• #5

Re : Aide pour la creation d une macro specifique

Merci beaucoup, cependant quand je la colle dans visual basic, elle ne fonctionne pas. Et je ne suis pas assez compétent pour la peaufiner ^^. Ma colonne en question est la colonne C.

 

Vote positif 0 Vote négatif

D

david84

XLDnaute Barbatruc

• 10 Septembre 2013

• #6

Re : Aide pour la creation d une macro specifique

Re
modifie la partie Range("A1:A11") en remplaçant A1:A11 par la plage de cellule de tu veux traiter.
A+

 

Vote positif 0 Vote négatif

N

Nicolas1987

Guest

• 10 Septembre 2013

• #7

Re : Aide pour la creation d une macro specifique

erreur d'execution 1004 quan j integre ta macro

 

Vote positif 0 Vote négatif

D

david84

XLDnaute Barbatruc

• 10 Septembre 2013

• #8

Re : Aide pour la creation d une macro specifique

Re

erreur d'execution 1004 quan j integre ta macro

Cliquez pour agrandir...

Quelles sont les modifications apportées à la macro ? Place-là dans ton prochain message STP.
A+

 

Vote positif 0 Vote négatif

N

Nicolas1987

Guest

• 10 Septembre 2013

• #9

Re : Aide pour la creation d une macro specifique

Autant pour moi cela fonctionne ! mais je suis obliger de noter la ligne où le dernier chiffre de la colonne apparait sinon ca ne fonctionne pas. Par exemple ("A1:A47) si j ai 47 lignes sinon cela ne fonctionne pas.

 

Vote positif 0 Vote négatif

N

Nicolas1987

Guest

• 10 Septembre 2013

• #10

Re : Aide pour la creation d une macro specifique

Pourrais tu me dire quelles modifications dois je faire à ta macro pour quelle fonctionne peu importe le nombre de ligne rempli

 

Vote positif 0 Vote négatif

D

david84

XLDnaute Barbatruc

• 10 Septembre 2013

• #11

Re : Aide pour la creation d une macro specifique

Nicolas1987 à dit:

Autant pour moi cela fonctionne ! mais je suis obliger de noter la ligne où le dernier chiffre de la colonne apparait sinon ca ne fonctionne pas. Par exemple ("A1:A47) si j ai 47 lignes sinon cela ne fonctionne pas.

Cliquez pour agrandir...

Tu peux nommer ta plage de manière dynamique en utilisant la fonction DECALER

Code:

=DECALER(Feuil1!$C$1;;;NBVAL(Feuil1!$C:$C))

Nommer cette plage "Plage" et utiliser le nom défini dans ta macro (à la place de Range("A1:A11") placer Range("Plage").
Autre solution cette fois dans le code : définir la dernière ligne de ta plage avant la boucle For Each...Next :

Code:

Dim DerLigne As Long
DerLigne = Range("C" & Rows.Count).End(xlUp).Row
Set Plage = Range("C1:C" & DerLigne)

A+

 

Vote positif 0 Vote négatif

N

Nicolas1987

Guest

• 10 Septembre 2013

• #12

Re : Aide pour la creation d une macro specifique

Je ne comprend plus rien. Je ne suis pas assez compétent en macro. Envoi moi stp une macro globale qui fonctionne pour mon probleme.

 

Vote positif 0 Vote négatif

vgendron

XLDnaute Barbatruc

• 10 Septembre 2013

• #13

Re : Aide pour la creation d une macro specifique

euh.. ma macro ne te plaisait pas?
à priori. elle cherche directement le nombre de lignes que tu veux dans la colonne, et fait la modif..
c'est juste qu'elle travaille sur la colonne A, vu que sans fichier exemple de ta part. il faut bien en choisir une..

 

Vote positif 0 Vote négatif

N

Nicolas1987

Guest

• 10 Septembre 2013

• #14

Re : Aide pour la creation d une macro specifique

Autant pour moi, ta macro fonctionne bien pour la colonne A, pourrais tu m'envoyer cette macro pour la colonne C stp ! MERCI PAR AVANCE

 

Vote positif 0 Vote négatif

vgendron

XLDnaute Barbatruc

• 10 Septembre 2013

• #15

Re : Aide pour la creation d une macro specifique

allez. un petit effort de comprehension des macros quand meme...

cells(Lig, col)
col =1 pour colonne A
col = 2 pour colonne B
col=3 pour colonne C....

Code:

Sub doubleZero()

lastline = Cells(65536, 3).End(xlUp).Row
For i = 1 To lastline
    temp = Int(Cells(i, 3) / 100)
    Cells(i, 3) = temp * 100
Next i

End Sub

 

Vote positif 0 Vote négatif