Checkbox error

G

Guest

Guest

• 5 Novembre 2009

• #2

Re : Checkbox error

Bonjour,

L'erreur que je vois est celle-ci:

Code:

[D18] = [G8] + "." + [B8] + "@test.com"

Au lieu de

Code:

[D18] = [G8] &  "." &  [B8] &  "@test.com"

A+

 

Vote positif 0 Vote négatif

S

samkriss

Guest

• 5 Novembre 2009

• #3

Re : Checkbox error

Merci pour la correction.
Mais le message d'erreur est toujours le meme, il n'y avait donc opas que ca comme erreur.

A suivre...

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 5 Novembre 2009

• #4

Re : Checkbox error

Bonjour Sankriss, Hasco

le nom de l'objet diffère...

Code:

Sub [B][COLOR="Red"]CheckBox_Email[/COLOR][/B]()

If [COLOR="red"][B]CheckBox8[/B][/COLOR].Value = True Then

tu as 2 objets ? car les noms sont différents dans ton code... sinon peut être savoir où se trouve ta "checkbox", USF ou feuille de calcul, si feuille de calcul, si c'est un controle de la boite à outils controles ou de la barre d'outils formulaire...

bon après midi
@+

 

Vote positif 0 Vote négatif

S

samkriss

Guest

• 5 Novembre 2009

• #5

Re : Checkbox error

Merci Pierrot93,

desormais les noms sont identique, mais toujours une erreur, differente cette fois: Compile error: expected function or variable

Pour repondre a ta question il s'agit d'une checkbox sur une feuille de calcul et elle provient de la barre d'outil formulaire.

Sub CheckBox8()

If CheckBox8.Value = True Then
[D18] = [G8] & "." & [B8] & "@test.com"
Else
Exit Sub
End If
End Sub

 

Vote positif 0 Vote négatif

13GIBE59

XLDnaute Accro

• 5 Novembre 2009

• #6

Re : Checkbox error

Bonjour tout le monde.

Essaie de changer le nom de ta sub, qui reprend en partie le nom de ta checkbox. Parfois à cause de ça, ça coince.

PS : pour info : tu peux remplacer

Code:

CheckBox8.Value = True

par

Code:

CheckBox8

et

Code:

CheckBox8.Value = False

par

Code:

Not CheckBox8

 

Vote positif 0 Vote négatif

Dull

XLDnaute Barbatruc

• 5 Novembre 2009

• #7

Re : Checkbox error

Salut samkriss Ges🙂, Pierrot🙂 le Forum

As tu essayé cela

Code:

[B]Private Sub CheckBox8_Click()[/B]
If CheckBox8 = True Then
[D18] = [G8] & "." & [B8] & "@test.com"
Else
Exit Sub
End If
End Sub

Ou alors ça

Code:

Private Sub CheckBox8_Click()
[D18] = IIf(CheckBox8 = True, [G8] & "." & [B8] & "@test.com", "")
End Sub

A tester
EDITION: Salut JB
Bonne Journée

 

Vote positif 0 Vote négatif

S

samkriss

Guest

• 5 Novembre 2009

• #8

Re : Checkbox error

Salut Dull,

Oui j'ai deja teste, la je n'ai aucun message d'erreur, je peux cocher ou decocher la case comme je veux, mais ne s'ecrit dans la case D18.

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 5 Novembre 2009

• #9

Re : Checkbox error

Re, bonjour gibe, salut Dull🙂

Pour un controle de la barre d'outils formulaire :

Code:

If ActiveSheet.Shapes("Check Box 1").DrawingObject.Value = 1 Then

@+

 

Vote positif 0 Vote négatif

Dull

XLDnaute Barbatruc

• 5 Novembre 2009

• #10

Re : Checkbox error

Re le fil

Essaye ce fichier

Bonne Journée

 

Pièces jointes

• samkriss.zip

  9.6 KB · Affichages: 17

Vote positif 0 Vote négatif

S

samkriss

Guest

• 5 Novembre 2009

• #11

Re : Checkbox error

Et le vainqueur est : PIERROT93

Merci a toi et a vous tous pour le temps que vous y avait passe.

 

Vote positif 0 Vote négatif

Dull

XLDnaute Barbatruc

• 5 Novembre 2009

• #12

Re : Checkbox error

Re re Le fil

NomDeZeus...BoiteàOutilFormulaire... Je m'en donne 2 et je retient 1 ...Heureusement que Pierrot🙂 lit mieux que moi

Bonne Journée

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 5 Novembre 2009

• #13

Re : Checkbox error

Re, bonjour carcharodon-carcharias

@ carcharodon-carcharias
pas une question de logique, voir post n°5, j'avais demandé dans le 4....

Pour repondre a ta question il s'agit d'une checkbox sur une feuille de calcul et elle provient de la barre d'outil formulaire.

Cliquez pour agrandir...

bonne fin d'près midi
@+

 

Vote positif 0 Vote négatif