Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Problème référence à une cellule

Problème référence à une cellule

7 réponses
Avatar
Thierry
Bonjour,

j'ai un soucis avec VBA. Dans ma première feuille excel qui s'apelle
CRA j'ai ce code :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
temp = ""

For j = 1 To [Paramètres!E12]

temp = temp & [Paramètres!I(j)] & ","

Next j

Lorsque je l'execute j'ai un problème lorsqu'il rencontre
[Paramètres!I(j)] sachant que la colonne I est dans la feuille Paramètres et
que c'est un tableau (d'ou j) dont le nombre d'entrée peux varier en
fonction de ce qui est saisie dans la feuille paramètres.



Est il possible de l'ecrire autrement ?



Merci pour votre aide





---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000739-0, 09/05/2007
Analyse le : 09/05/2007 17:11:01
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com
Signaler un problème avec ce contenu

7 réponses

Supprimer
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
Avatar
isabelle
bonjour Thierry,

essai comme ça,

temp = temp & Sheets("Paramètres").Range("I" & j) & ","

et s'assurer que j soit un nombre entier entre 1 et 65536

isabelle


Bonjour,

j'ai un soucis avec VBA. Dans ma première feuille excel qui s'apelle
CRA j'ai ce code :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
temp = ""

For j = 1 To [Paramètres!E12]

temp = temp & [Paramètres!I(j)] & ","

Next j

Lorsque je l'execute j'ai un problème lorsqu'il rencontre
[Paramètres!I(j)] sachant que la colonne I est dans la feuille Paramètres et
que c'est un tableau (d'ou j) dont le nombre d'entrée peux varier en
fonction de ce qui est saisie dans la feuille paramètres.



Est il possible de l'ecrire autrement ?



Merci pour votre aide





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





Avatar
Jacky
Bonsoir,

En complément du code d'Isabelle que je salue au passage (prête pour la
grande traversée à la nage?) :-))

En fin de boucle
temp = Left(temp, Len(temp) - 1)
--
Salutations
JJ


"Thierry" a écrit dans le message de news:

Bonjour,

j'ai un soucis avec VBA. Dans ma première feuille excel qui s'apelle
CRA j'ai ce code :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
temp = ""

For j = 1 To [Paramètres!E12]

temp = temp & [Paramètres!I(j)] & ","

Next j

Lorsque je l'execute j'ai un problème lorsqu'il rencontre
[Paramètres!I(j)] sachant que la colonne I est dans la feuille Paramètres
et que c'est un tableau (d'ou j) dont le nombre d'entrée peux varier en
fonction de ce qui est saisie dans la feuille paramètres.



Est il possible de l'ecrire autrement ?



Merci pour votre aide





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





Avatar
Thierry
Bonjour Isabelle,

J'ai essayé mais rien ne se passe aucune erreur mais je ne recupère rien.
J'ai essayé en mettant [
], idem aucune erreur mais rien ne se passe.



"isabelle" a écrit dans le message de news:
%
bonjour Thierry,

essai comme ça,

temp = temp & Sheets("Paramètres").Range("I" & j) & ","

et s'assurer que j soit un nombre entier entre 1 et 65536

isabelle


Bonjour,

j'ai un soucis avec VBA. Dans ma première feuille excel qui
s'apelle CRA j'ai ce code :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
temp = ""

For j = 1 To [Paramètres!E12]

temp = temp & [Paramètres!I(j)] & ","

Next j

Lorsque je l'execute j'ai un problème lorsqu'il rencontre
[Paramètres!I(j)] sachant que la colonne I est dans la feuille Paramètres
et que c'est un tableau (d'ou j) dont le nombre d'entrée peux varier en
fonction de ce qui est saisie dans la feuille paramètres.



Est il possible de l'ecrire autrement ?



Merci pour votre aide





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






---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000739-0, 09/05/2007
Analyse le : 09/05/2007 18:06:16
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com








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


Avatar
Thierry
Bonjour Jacky,

Oui je l'ai ce code le voila :

temp = ""

For j = 1 To [Paramètres!E12]

temp = temp & [Sheets("Paramètres").Range("I" & j)] & ","

Next j

For j = Plig + 2 To Plig + 2 + [Paramètres!E12]
Cells(j, 4).Validation.Delete
Cells(j, 4).Validation.Add xlValidateList, Formula1:=Left(temp,
Len(temp) - 1)
Next j


"Jacky" a écrit dans le message de news:

Bonsoir,

En complément du code d'Isabelle que je salue au passage (prête pour la
grande traversée à la nage?) :-))

En fin de boucle
temp = Left(temp, Len(temp) - 1)
--
Salutations
JJ


"Thierry" a écrit dans le message de news:

Bonjour,

j'ai un soucis avec VBA. Dans ma première feuille excel qui s'apelle
CRA j'ai ce code :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
temp = ""

For j = 1 To [Paramètres!E12]

temp = temp & [Paramètres!I(j)] & ","

Next j

Lorsque je l'execute j'ai un problème lorsqu'il rencontre
[Paramètres!I(j)] sachant que la colonne I est dans la feuille Paramètres
et que c'est un tableau (d'ou j) dont le nombre d'entrée peux varier en
fonction de ce qui est saisie dans la feuille paramètres.



Est il possible de l'ecrire autrement ?



Merci pour votre aide





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








---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000739-0, 09/05/2007
Analyse le : 09/05/2007 18:13:10
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com








---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000739-0, 09/05/2007
Analyse le : 09/05/2007 18:15:35
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com


Avatar
Thierry
Desolé oui cela a marché c'etait ma condition de départ qui n'allait pas

Merci encore pour ce coup de Pouce et bonne nage Isabelle :)

"isabelle" a écrit dans le message de news:
%
bonjour Thierry,

essai comme ça,

temp = temp & Sheets("Paramètres").Range("I" & j) & ","

et s'assurer que j soit un nombre entier entre 1 et 65536

isabelle


Bonjour,

j'ai un soucis avec VBA. Dans ma première feuille excel qui
s'apelle CRA j'ai ce code :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
temp = ""

For j = 1 To [Paramètres!E12]

temp = temp & [Paramètres!I(j)] & ","

Next j

Lorsque je l'execute j'ai un problème lorsqu'il rencontre
[Paramètres!I(j)] sachant que la colonne I est dans la feuille Paramètres
et que c'est un tableau (d'ou j) dont le nombre d'entrée peux varier en
fonction de ce qui est saisie dans la feuille paramètres.



Est il possible de l'ecrire autrement ?



Merci pour votre aide





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






---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000739-0, 09/05/2007
Analyse le : 09/05/2007 18:06:16
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com








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


Avatar
Thierry
Desolé oui cela a marché c'etait ma condition de départ qui n'allait pas

Merci

"Jacky" a écrit dans le message de news:

Bonsoir,

En complément du code d'Isabelle que je salue au passage (prête pour la
grande traversée à la nage?) :-))

En fin de boucle
temp = Left(temp, Len(temp) - 1)
--
Salutations
JJ


"Thierry" a écrit dans le message de news:

Bonjour,

j'ai un soucis avec VBA. Dans ma première feuille excel qui s'apelle
CRA j'ai ce code :

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
temp = ""

For j = 1 To [Paramètres!E12]

temp = temp & [Paramètres!I(j)] & ","

Next j

Lorsque je l'execute j'ai un problème lorsqu'il rencontre
[Paramètres!I(j)] sachant que la colonne I est dans la feuille Paramètres
et que c'est un tableau (d'ou j) dont le nombre d'entrée peux varier en
fonction de ce qui est saisie dans la feuille paramètres.



Est il possible de l'ecrire autrement ?



Merci pour votre aide





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








---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000739-0, 09/05/2007
Analyse le : 09/05/2007 18:13:10
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com








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


Avatar
isabelle

En complément du code d'Isabelle que je salue au passage (prête pour la
grande traversée à la nage?) :-))


ho si peu ;-)

isabelle