Flux rss
Collection CommentCaMarche.net
Rechercher : dans
Par : Pertinence Date Nom d'utilisateur
Statut : Résolu

(Excel VB) macro erreur synthaxe

olive60, le mardi 11 septembre 2007 à 17:55:32
REbonjour,

J'ai essayé ta formule mais effectivement il ya une erreur de synthaxe...

Tu vois où??? voici mes deux checkbox:

Private Sub CheckBox1_Click()

If CheckBox2.IsSelected Then End Sub
Else

Range("C47").Select
ActiveCell.FormulaR1C1 = "0.48%"
Range("C56").Select
ActiveCell.FormulaR1C1 = "0.28%"
Range("C65").Select
ActiveCell.FormulaR1C1 = "0.43%"
Range("C66").Select
ActiveCell.FormulaR1C1 = "0.30%"
End Sub

Private Sub CheckBox2_Click()

If CheckBox1.IsSelected Then End Sub
Else

Range("C47").Select
ActiveCell.FormulaR1C1 = "0.60%"
Range("C56").Select
ActiveCell.FormulaR1C1 = "0.35%"
Range("C65").Select
ActiveCell.FormulaR1C1 = "0.54%"
Range("C66").Select
ActiveCell.FormulaR1C1 = "0.38%"
End Sub



Je suis novice en Visual basic dc j'ai pas bcp d'experience de formulations!!!

Merci si tu peux encore m'aider!!

Olive
Configuration: Windows 2000
Internet Explorer 5.01
Répondre à olive60  Signaler ce message aux modérateurs Aller au dernier message

1


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
ShaBoo, le mardi 11 septembre 2007 à 18:13:32
Private Sub CheckBox1_Click()

If CheckBox2.IsSelected Then


Exit


Else

Range("C47").Select
ActiveCell.FormulaR1C1 = "0.48%"
Range("C56").Select
ActiveCell.FormulaR1C1 = "0.28%"
Range("C65").Select
ActiveCell.FormulaR1C1 = "0.43%"
Range("C66").Select
ActiveCell.FormulaR1C1 = "0.30%"



EndiF

End Sub
Répondre à ShaBoo

2


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
olive60, le mardi 11 septembre 2007 à 18:19:56
Bonjour, merci pour ta réponse.

Il y a encore une erreur de synthaxe... apparemment ca bloque sur le Exit...

Merci si tu peux encore m'aider.

Olive
Répondre à olive60

3


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
ShaBoo, le mardi 11 septembre 2007 à 18:24:10
Private Sub CheckBox1_Click()

If CheckBox2.IsSelected Then


Exit Sub


Else

Range("C47").Select
ActiveCell.FormulaR1C1 = "0.48%"
Range("C56").Select
ActiveCell.FormulaR1C1 = "0.28%"
Range("C65").Select
ActiveCell.FormulaR1C1 = "0.43%"
Range("C66").Select
ActiveCell.FormulaR1C1 = "0.30%"



EndiF

End Sub


RTFM ;)))
Répondre à ShaBoo

4


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
olive60, le mardi 11 septembre 2007 à 18:28:12
ARRRGGHHH !!!

Désolé :

Ca donne "erreur d'execution "438" propriete ou méthode non gérée par cet objet"


Mais ou est cette erreur!!!!!

En tout cas merci de ton aide...
Répondre à olive60

5


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
olive60, le mardi 11 septembre 2007 à 18:52:00
Si qq un a une idée... sur la question, je suis preneur!!!

pour résumer si c'est pas clair : je voudrais que l'on ne puisse pas cocher la checkbox 1 si la checkbox 2 est deja cochée et vice et versa...


Merci d'avance pour votre aide !!

Olive
Répondre à olive60

6


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
zefoots, le mardi 11 septembre 2007 à 19:13:41
Salut

Private Sub CheckBox1_Click() 
    If CheckBox2.IsSelected Then 
        Exit Sub
    End If

    Range("C47").Select
    ActiveCell.FormulaR1C1 = "0.48%"
    Range("C56").Select
    ActiveCell.FormulaR1C1 = "0.28%"
    Range("C65").Select
    ActiveCell.FormulaR1C1 = "0.43%"
    Range("C66").Select
    ActiveCell.FormulaR1C1 = "0.30%"
End Sub


Pareil pour CheckBox2_Click()
Répondre à zefoots

7


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
eriiic, le mardi 11 septembre 2007 à 20:32:47
Bonjour,

remplace CheckBox2.IsSelected par CheckBox2.Value

et tu n'es pas obligé de selectionner une cellule pour la modifier, ex:
Range("C47").Value = "0.48%"

cdt
Répondre à eriiic

8


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
fifi08, le mardi 11 septembre 2007 à 20:42:17
comment dans une cellule introduire cette condition:

si le résultat de (2007-(autre cellule))=0 lerésulat affiché sera 1

merci d' avance
je débute dans excel
Répondre à fifi08

9


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
 olive60, le mardi 11 septembre 2007 à 23:10:33
OUIIIIIII

MErci a vous deux vous vous etes complété !!!

Enfin maintenant ca fonctionne plutot pas mal!!!

MERCI LES GARS !!

A+

Olive
Répondre à olive60

Résultats pour (Excel VB) macro erreur synthaxe

Excel VBA - Textbox à saisie conditionnée (Résolu) Bonjour, Après avoir longtemps suivi en visiteur, j'ai décidé de m'inscrire, pour faciliter les échanges. Une fois n'est pas coutume, je suis sur une petite programmation Excel VBA pour laquelle je rencontre quelques difficultés. Je... www.commentcamarche.net/forum/affich-3696419-excel-vba-textbox-a-saisie-conditionnee
Supprimer une feuille excel par vba (Résolu) Bonjour, Je souhaite avoir de l'aide pour supprimer une feuille excel par macro VBA. j'ai mis le code suivant: Sheets("Feuil2 (2)").Delete mais il ya la fenêtre qui me demande de valider la suppréssion. Y-a t-il un moyen de valider cette... www.commentcamarche.net/forum/affich-6995668-supprimer-une-feuille-excel-par-vba
[Excel VBA] Macro enregistrement automatique (Résolu) Bonjour à tous, Je débute en VB et je cherche un moyen pour intégrer un bouton d'enregistrement automatique dans une feuille Excel. Ce bouton permettrait d'enregistrer automatiquement une copie de la feuille active dans un répertoire donné... www.commentcamarche.net/forum/affich-3861950-excel-vba-macro-enregistrement-automatique

Résultats pour (Excel VB) macro erreur synthaxe

VB - Annuler une opération (Résolu)Bonjour, Je cherhce un code en visual basic (excel) qui permet d'annuler une opération en cours. En fait, lorsque je ferme le fichier excel, une macro contrôle des données et puis demande (s'il y a des erreurs) ce qu'on veut faire. Je... www.commentcamarche.net/forum/affich-7152211-vb-annuler-une-operation
Exercice vb (Résolu)Bonjour, je souhaiterais m'exercer à vb (macros excel), pourrais tu me guider vers des exercices pour débutant, merci une bonne journée à bientôt www.commentcamarche.net/forum/affich-5101560-exercice-vb
[excel] condition d'execution de macro (Résolu)Bonjour, j'ai dans un tableau Excel une macro affectée à un bouton, mais j'aimerais mettre une condition sur l'execution de cette macro, c'est a dire que lorsqu'un utilisateur clique sur le bouton auquel est affectée la macro,... www.commentcamarche.net/forum/affich-2254569-excel-condition-d-execution-de-macro