Lien Worksheet- Module

Le
Thierry
Bonsoir,

j'ai du code VBA dans un feuille (remplissage d'une liste déroulante à
partir des données d'une colonne) qui passe très bien sous ms office 2007.
Ce même code ne passe pas dans Ms office 2003. Alors que j'ai ce type de
code dans un moule et qui ne me pose aucun problème sous 2007 ou 2003.

je voudrais passer ce code de la feuille3 dans un module, mais je voudrais
qu'il s'execute depuis la feuille 3 avec un selection change comment faire ?

Merci.





Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000739-3, 11/05/2007
Analyse le : 13/05/2007 19:00:09
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
hasco
Le #4513281
Mettre dans un module le code en question par exemple

Public Sub RemplitMaListe()
.....placer le code ici
End Sub

Et l'appeler depuis le gestionnaire d'évènement SelectionChange de la feuille3
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
' C'est un exemple
If Target.Range("A1").Address="$G$1" then RemplitMaListe
End Sub



Bonsoir,

j'ai du code VBA dans un feuille (remplissage d'une liste déroulante à
partir des données d'une colonne) qui passe très bien sous ms office 2007.
Ce même code ne passe pas dans Ms office 2003. Alors que j'ai ce type de
code dans un moule et qui ne me pose aucun problème sous 2007 ou 2003.

je voudrais passer ce code de la feuille3 dans un module, mais je voudrais
qu'il s'execute depuis la feuille 3 avec un selection change comment faire ?

Merci.




---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000739-3, 11/05/2007
Analyse le : 13/05/2007 19:00:09
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com






Thierry
Le #4513111
Quand j'écris cela il me fait erreur de compilation variable ou procédure
attendu et non un module

que faire ?

"hasco"
Mettre dans un module le code en question par exemple

Public Sub RemplitMaListe()
.....placer le code ici
End Sub

Et l'appeler depuis le gestionnaire d'évènement SelectionChange de la
feuille3
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
' C'est un exemple
If Target.Range("A1").Address="$G$1" then RemplitMaListe
End Sub



Bonsoir,

j'ai du code VBA dans un feuille (remplissage d'une liste déroulante à
partir des données d'une colonne) qui passe très bien sous ms office
2007.
Ce même code ne passe pas dans Ms office 2003. Alors que j'ai ce type de
code dans un moule et qui ne me pose aucun problème sous 2007 ou 2003.

je voudrais passer ce code de la feuille3 dans un module, mais je
voudrais
qu'il s'execute depuis la feuille 3 avec un selection change comment
faire ?

Merci.




---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000739-3, 11/05/2007
Analyse le : 13/05/2007 19:00:09
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com







---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000740-0, 13/05/2007
Analyse le : 14/05/2007 07:34:20
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com








---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000740-0, 13/05/2007
Analyse le : 14/05/2007 07:56:33
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com


Thierry
Le #4513091
J'ai mal lu ta reponse qu'appelle tu le gestionnaire d'événement ?

Moi je l'ai mis dans le worksheet de la feuille

"hasco"
Mettre dans un module le code en question par exemple

Public Sub RemplitMaListe()
.....placer le code ici
End Sub

Et l'appeler depuis le gestionnaire d'évènement SelectionChange de la
feuille3
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
' C'est un exemple
If Target.Range("A1").Address="$G$1" then RemplitMaListe
End Sub



Bonsoir,

j'ai du code VBA dans un feuille (remplissage d'une liste déroulante à
partir des données d'une colonne) qui passe très bien sous ms office
2007.
Ce même code ne passe pas dans Ms office 2003. Alors que j'ai ce type de
code dans un moule et qui ne me pose aucun problème sous 2007 ou 2003.

je voudrais passer ce code de la feuille3 dans un module, mais je
voudrais
qu'il s'execute depuis la feuille 3 avec un selection change comment
faire ?

Merci.




---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000739-3, 11/05/2007
Analyse le : 13/05/2007 19:00:09
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com







---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000740-0, 13/05/2007
Analyse le : 14/05/2007 07:34:20
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com








---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000740-0, 13/05/2007
Analyse le : 14/05/2007 08:42:42
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com


hasco
Le #4512911
Dans la ligne:

If Target.Range("A1").Address="$G$1" then RemplitMaListe

RemplitMaListe n'est pas le nom du module mais celui de la procédure qui
remplit la liste.

Un gestionnaire d'évènement est une procédure qui répond à un évènement
particulier.
Dans notre exemple, chaque changement de sélection dans la feuille3

Tu peux mettre l'appel de la procédure " RemplitMaListe " dans la procédure
qui gère cet évènement qui se trouve dans le module Worksheet de la feuille3

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
' ICI, Module1 est le nom du module qui contient la procédure
If Target.Range("A1").Address="$G$1" then Call
Module1.RemplitMaListe
End Sub
Publicité
Poster une réponse
Anonyme