Merci pour vos r=E9ponses =E0 mon pr=E9c=E9dent message. J'ai=20
encore besoin de vous !
J'ai fais un bouton radio et quand on clique dessus cela=20
va mettre des valeurs dans des cellules d'une autre=20
feuille.
Pour faire le code, j'ai utilis=E9 l'enregistreur de macro.=20
Quand je fais tourner la macro cela fonctionne bien, mais=20
quand je fais un copier coller du code pour le mettre dans=20
celui du bouton radio, ensuite cela me fais une erreur.=20
Voil=E0 le code :
Private Sub Euro_Click()
Sheets("data").Select
Range("L11").Select (c'est ici qu'il me signale une erreur)
ActiveCell.FormulaR1C1 =3D "10"
Range("F60").Select
ActiveCell.FormulaR1C1 =3D "0.017"
Range("F68").Select
ActiveCell.FormulaR1C1 =3D "0.48"
Range("F69").Select
ActiveCell.FormulaR1C1 =3D "0.06"
Range("F70").Select
ActiveCell.FormulaR1C1 =3D "0.006"
Range("F71").Select
ActiveCell.FormulaR1C1 =3D "1.26"
Range("L58").Select
ActiveCell.FormulaR1C1 =3D "0.36"
Range("L59").Select
ActiveCell.FormulaR1C1 =3D "120"
Range("L60").Select
ActiveCell.FormulaR1C1 =3D "10"
Range("L62").Select
ActiveCell.FormulaR1C1 =3D "520"
Range("F76").Select
ActiveCell.FormulaR1C1 =3D "0.12"
Range("F77").Select
Sheets("main").Select
End Sub
C'est pourtant tout simple, je ne comprend pas pourquoi =E7a=20
ne marche pas.
Pffff pourquoi j'ai pas un outil en Java....
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
AV
Nul n'est besoin de sélectionner : Remplace tes lignes par : With Sheets("Data") .[L11] = 10 .[F60] = 0.017 'etc...... End With
AV
"Emeline" a écrit dans le message news: 095c01c366ef$bc7a89b0$ Merci pour vos réponses à mon précédent message. J'ai encore besoin de vous ! J'ai fais un bouton radio et quand on clique dessus cela va mettre des valeurs dans des cellules d'une autre feuille. Pour faire le code, j'ai utilisé l'enregistreur de macro. Quand je fais tourner la macro cela fonctionne bien, mais quand je fais un copier coller du code pour le mettre dans celui du bouton radio, ensuite cela me fais une erreur. Voilà le code : Private Sub Euro_Click() Sheets("data").Select Range("L11").Select (c'est ici qu'il me signale une erreur) ActiveCell.FormulaR1C1 = "10" Range("F60").Select ActiveCell.FormulaR1C1 = "0.017" Range("F68").Select ActiveCell.FormulaR1C1 = "0.48" Range("F69").Select ActiveCell.FormulaR1C1 = "0.06" Range("F70").Select ActiveCell.FormulaR1C1 = "0.006" Range("F71").Select ActiveCell.FormulaR1C1 = "1.26" Range("L58").Select ActiveCell.FormulaR1C1 = "0.36" Range("L59").Select ActiveCell.FormulaR1C1 = "120" Range("L60").Select ActiveCell.FormulaR1C1 = "10" Range("L62").Select ActiveCell.FormulaR1C1 = "520" Range("F76").Select ActiveCell.FormulaR1C1 = "0.12" Range("F77").Select Sheets("main").Select End Sub C'est pourtant tout simple, je ne comprend pas pourquoi ça ne marche pas. Pffff pourquoi j'ai pas un outil en Java....
Nul n'est besoin de sélectionner :
Remplace tes lignes par :
With Sheets("Data")
.[L11] = 10
.[F60] = 0.017
'etc......
End With
AV
"Emeline" <sam_carter44@hotmail.com> a écrit dans le message news:
095c01c366ef$bc7a89b0$a501280a@phx.gbl...
Merci pour vos réponses à mon précédent message. J'ai
encore besoin de vous !
J'ai fais un bouton radio et quand on clique dessus cela
va mettre des valeurs dans des cellules d'une autre
feuille.
Pour faire le code, j'ai utilisé l'enregistreur de macro.
Quand je fais tourner la macro cela fonctionne bien, mais
quand je fais un copier coller du code pour le mettre dans
celui du bouton radio, ensuite cela me fais une erreur.
Voilà le code :
Private Sub Euro_Click()
Sheets("data").Select
Range("L11").Select (c'est ici qu'il me signale une erreur)
ActiveCell.FormulaR1C1 = "10"
Range("F60").Select
ActiveCell.FormulaR1C1 = "0.017"
Range("F68").Select
ActiveCell.FormulaR1C1 = "0.48"
Range("F69").Select
ActiveCell.FormulaR1C1 = "0.06"
Range("F70").Select
ActiveCell.FormulaR1C1 = "0.006"
Range("F71").Select
ActiveCell.FormulaR1C1 = "1.26"
Range("L58").Select
ActiveCell.FormulaR1C1 = "0.36"
Range("L59").Select
ActiveCell.FormulaR1C1 = "120"
Range("L60").Select
ActiveCell.FormulaR1C1 = "10"
Range("L62").Select
ActiveCell.FormulaR1C1 = "520"
Range("F76").Select
ActiveCell.FormulaR1C1 = "0.12"
Range("F77").Select
Sheets("main").Select
End Sub
C'est pourtant tout simple, je ne comprend pas pourquoi ça
ne marche pas.
Pffff pourquoi j'ai pas un outil en Java....
Nul n'est besoin de sélectionner : Remplace tes lignes par : With Sheets("Data") .[L11] = 10 .[F60] = 0.017 'etc...... End With
AV
"Emeline" a écrit dans le message news: 095c01c366ef$bc7a89b0$ Merci pour vos réponses à mon précédent message. J'ai encore besoin de vous ! J'ai fais un bouton radio et quand on clique dessus cela va mettre des valeurs dans des cellules d'une autre feuille. Pour faire le code, j'ai utilisé l'enregistreur de macro. Quand je fais tourner la macro cela fonctionne bien, mais quand je fais un copier coller du code pour le mettre dans celui du bouton radio, ensuite cela me fais une erreur. Voilà le code : Private Sub Euro_Click() Sheets("data").Select Range("L11").Select (c'est ici qu'il me signale une erreur) ActiveCell.FormulaR1C1 = "10" Range("F60").Select ActiveCell.FormulaR1C1 = "0.017" Range("F68").Select ActiveCell.FormulaR1C1 = "0.48" Range("F69").Select ActiveCell.FormulaR1C1 = "0.06" Range("F70").Select ActiveCell.FormulaR1C1 = "0.006" Range("F71").Select ActiveCell.FormulaR1C1 = "1.26" Range("L58").Select ActiveCell.FormulaR1C1 = "0.36" Range("L59").Select ActiveCell.FormulaR1C1 = "120" Range("L60").Select ActiveCell.FormulaR1C1 = "10" Range("L62").Select ActiveCell.FormulaR1C1 = "520" Range("F76").Select ActiveCell.FormulaR1C1 = "0.12" Range("F77").Select Sheets("main").Select End Sub C'est pourtant tout simple, je ne comprend pas pourquoi ça ne marche pas. Pffff pourquoi j'ai pas un outil en Java....
