Discussion :

[parvi]

Bonjour à tous !!

Tout nouveau dans le forum et dans le langage VBA j'ai un problème ....

Je veux créer un code VBA qui me permet de lancer une macro quand je met une valeur sur une plage de donnée (répéter 3 lignes plus bas (avec une boucle)). Pour lancer cette macro la valeur doit être différente de "0", et la macro renvoie vers une autre feuille.

Mais une erreur persiste : erreur d'exécution "91" : variable objet ou variable de bloc With non définie

Voici mon code de VBA rattacher à la feuille :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
Private Sub Worksheet_Change(ByVal Target As Range)
 
For i = 0 To 22
Set maplage = Range("E" & 673 + 3 * i & ":P" & 673 + 3 * i)
 
If Not Application.Intersect(Target, Range("E" & 673 + 3 * i & ":P" & 673 + 3 * i)) <> 0 Then renvoie_fiche_details_renouvellement
 
Next i
End Sub

l'erreur se situe à la ligne 7

et voici le code du module :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Sub renvoie_fiche_details_renouvellement()
 
      With Sheets("renouvel életro details").Select
      End With
End Sub

Merci pour votre aide !!!
et si je n'ai pas été assez claire n'hésitez pas !!

[dylan.pascal]

Bonjour,

Je pense qu'il n'y a pas besoin du .Select a la fin de ton With

Cordialement,

[parvi]

En effet il ne sert à rien !!!!

[dylan.pascal]

Pense a cliquer sur le bouton "Résolu" si ton problème est corrigé, sinon dis nous ce qui vas pas

[parvi]

Oups oublié de préciser que enlever .Select n'as rien changer au problème ....

[dylan.pascal]

D'accord alors essaye de remplacer "With Sheets ..." par "With Worksheets", j'utilise comme ceci les With dans mes macros et je n'ai eu aucun problème

Cordialement,

Dylan

[SfJ5Rpw8]

bonjour,

sélectionne le mot with , appui ensuite sur la touche :F1: et demande toi à quoi sert cette instruction dans ton code ...