Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel vALIDATION

vALIDATION

7 réponses
Avatar
Pascal
Bonjour,
la question a due déjà être posée mais je ne trouve pas.
Comment fait-on pour étendre une zone de validation à chaque nouvelle
entrée?
Je m'explique une liste de Validation = toto1 est appliquée à la cel a1 de
la feuil 1, je voudrais que donnée validation s'étende à la cel b1 de la
feuille 1 lorsque je saisi une donnée en B1.

Merci
Pascal




---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000714-0, 15/02/2007
Analyse le : 16/02/2007 08:51:51
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
anonymousA
Bonjour,

Juste à titre pédagogique, fais une recherche par Google sur ce forum
en tapant les mots Validation et DECALER, et je suis certain que tu
auras des dizaines de réponses.

A+

On 16 fév, 08:51, "Pascal" wrote:
Bonjour,
la question a due déjà être posée mais je ne trouve pas.
Comment fait-on pour étendre une zone de validation à chaque nouvelle
entrée?
Je m'explique une liste de Validation = toto1 est appliquée à la ce l a1 de
la feuil 1, je voudrais que donnée validation s'étende à la cel b1 de la
feuille 1 lorsque je saisi une donnée en B1.

Merci
Pascal

---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000714-0, 15/02/2007
Analyse le : 16/02/2007 08:51:51
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com


Avatar
JB
Bonjour,

http://boisgontierj.free.fr/pages_site/decaler.htm

JB
On 16 fév, 08:51, "Pascal" wrote:
Bonjour,
la question a due déjà être posée mais je ne trouve pas.
Comment fait-on pour étendre une zone de validation à chaque nouvelle
entrée?
Je m'explique une liste de Validation = toto1 est appliquée à la ce l a1 de
la feuil 1, je voudrais que donnée validation s'étende à la cel b1 de la
feuille 1 lorsque je saisi une donnée en B1.

Merci
Pascal

---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000714-0, 15/02/2007
Analyse le : 16/02/2007 08:51:51
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com


Avatar
Pascal
Non c'est pas cela le décaler je l'utilise pour les données source. Ce que
je veux c'est
Par exemple dans ton classeur tu appliques cela à B2, moi je veux que cela
s'applique à B3 lorsque je saisie une donnée dans b3

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

Bonjour,

http://boisgontierj.free.fr/pages_site/decaler.htm

JB
On 16 fév, 08:51, "Pascal" wrote:
Bonjour,
la question a due déjà être posée mais je ne trouve pas.
Comment fait-on pour étendre une zone de validation à chaque nouvelle
entrée?
Je m'explique une liste de Validation = toto1 est appliquée à la cel a1 de
la feuil 1, je voudrais que donnée validation s'étende à la cel b1 de la
feuille 1 lorsque je saisi une donnée en B1.

Merci
Pascal

---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000714-0, 15/02/2007
Analyse le : 16/02/2007 08:51:51
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com





---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000714-0, 15/02/2007
Analyse le : 16/02/2007 09:07:30
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com






---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000714-0, 15/02/2007
Analyse le : 16/02/2007 09:13:22
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com

Avatar
JB
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 And Target.Count = 1 Then
Application.EnableEvents = False
Target.Copy
Target.Offset(1, 0).PasteSpecial Paste:=xlPasteValidation
Target.Offset(1, 0).PasteSpecial Paste:=xlFormats
Application.EnableEvents = True
End If
End Sub

http://cjoint.com/?cqkawUIaa5

JB


On 16 fév, 09:10, "Pascal" wrote:
Non c'est pas cela le décaler je l'utilise pour les données source. C e que
je veux c'est
Par exemple dans ton classeur tu appliques cela à B2, moi je veux que c ela
s'applique à B3 lorsque je saisie une donnée dans b3

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

Bonjour,

http://boisgontierj.free.fr/pages_site/decaler.htm

JB
On 16 fév, 08:51, "Pascal" wrote:





Bonjour,
la question a due déjà être posée mais je ne trouve pas.
Comment fait-on pour étendre une zone de validation à chaque nouvel le
entrée?
Je m'explique une liste de Validation = toto1 est appliquée à la cel a1 de
la feuil 1, je voudrais que donnée validation s'étende à la cel b 1 de la
feuille 1 lorsque je saisi une donnée en B1.

Merci
Pascal

---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000714-0, 15/02/2007
Analyse le : 16/02/2007 08:51:51
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com


---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000714-0, 15/02/2007
Analyse le : 16/02/2007 09:07:30
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com

---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000714-0, 15/02/2007
Analyse le : 16/02/2007 09:13:22
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com- Mas quer le texte des messages précédents -

- Afficher le texte des messages précédents -



Avatar
Pascal
Merci je le mets dans le code de la feuille?
Quelles sont les valeurs à changer pour un tableau de 6 colonnes?

Pascal

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

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 And Target.Count = 1 Then
Application.EnableEvents = False
Target.Copy
Target.Offset(1, 0).PasteSpecial Paste:=xlPasteValidation
Target.Offset(1, 0).PasteSpecial Paste:=xlFormats
Application.EnableEvents = True
End If
End Sub

http://cjoint.com/?cqkawUIaa5

JB


On 16 fév, 09:10, "Pascal" wrote:
Non c'est pas cela le décaler je l'utilise pour les données source. Ce que
je veux c'est
Par exemple dans ton classeur tu appliques cela à B2, moi je veux que cela
s'applique à B3 lorsque je saisie une donnée dans b3

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

Bonjour,

http://boisgontierj.free.fr/pages_site/decaler.htm

JB
On 16 fév, 08:51, "Pascal" wrote:





Bonjour,
la question a due déjà être posée mais je ne trouve pas.
Comment fait-on pour étendre une zone de validation à chaque nouvelle
entrée?
Je m'explique une liste de Validation = toto1 est appliquée à la cel a1
de
la feuil 1, je voudrais que donnée validation s'étende à la cel b1 de la
feuille 1 lorsque je saisi une donnée en B1.

Merci
Pascal

---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000714-0, 15/02/2007
Analyse le : 16/02/2007 08:51:51
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com


---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000714-0, 15/02/2007
Analyse le : 16/02/2007 09:07:30
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com

---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000714-0, 15/02/2007
Analyse le : 16/02/2007 09:13:22
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -

- Afficher le texte des messages précédents -





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






---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000714-0, 15/02/2007
Analyse le : 16/02/2007 10:38:00
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com


Avatar
JB
-Module de feuille: cli-droit onglet/visualider code-
-our les colonnes 1 à 6:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column >= 1 And Target.Column <= 6 And Target.Count = 1
Then
Application.EnableEvents = False
Target.Copy
Target.Offset(1, 0).PasteSpecial Paste:=xlPasteValidation
Target.Offset(1, 0).PasteSpecial Paste:=xlFormats
Application.EnableEvents = True
End If
End Sub

JB


On 16 fév, 10:37, "Pascal" wrote:
Merci je le mets dans le code de la feuille?
Quelles sont les valeurs à changer pour un tableau de 6 colonnes?

Pascal

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

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 And Target.Count = 1 Then
Application.EnableEvents = False
Target.Copy
Target.Offset(1, 0).PasteSpecial Paste:=xlPasteValidation
Target.Offset(1, 0).PasteSpecial Paste:=xlFormats
Application.EnableEvents = True
End If
End Sub

http://cjoint.com/?cqkawUIaa5

JB

On 16 fév, 09:10, "Pascal" wrote:





Non c'est pas cela le décaler je l'utilise pour les données source. Ce que
je veux c'est
Par exemple dans ton classeur tu appliques cela à B2, moi je veux que cela
s'applique à B3 lorsque je saisie une donnée dans b3

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

Bonjour,

http://boisgontierj.free.fr/pages_site/decaler.htm

JB
On 16 fév, 08:51, "Pascal" wrote:

Bonjour,
la question a due déjà être posée mais je ne trouve pas.
Comment fait-on pour étendre une zone de validation à chaque nouv elle
entrée?
Je m'explique une liste de Validation = toto1 est appliquée à l a cel a1
de
la feuil 1, je voudrais que donnée validation s'étende à la cel b1 de la
feuille 1 lorsque je saisi une donnée en B1.

Merci
Pascal

---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000714-0, 15/02/2007
Analyse le : 16/02/2007 08:51:51
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com


---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000714-0, 15/02/2007
Analyse le : 16/02/2007 09:07:30
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com

---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000714-0, 15/02/2007
Analyse le : 16/02/2007 09:13:22
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -

- Afficher le texte des messages précédents -


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

---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000714-0, 15/02/2007
Analyse le : 16/02/2007 10:38:00
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com- Mas quer le texte des messages précédents -

- Afficher le texte des messages précédents -




Avatar
Pascal
Merci Parfait cela simplifie grandement car sur 6 tableaux qui en 2006 a
dépassé les 5000 lignes, je me
voyais pas procéder de la manière habituelle

Pascal



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


-Module de feuille: cli-droit onglet/visualider code-
-our les colonnes 1 à 6:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column >= 1 And Target.Column <= 6 And Target.Count = 1
Then
Application.EnableEvents = False
Target.Copy
Target.Offset(1, 0).PasteSpecial Paste:=xlPasteValidation
Target.Offset(1, 0).PasteSpecial Paste:=xlFormats
Application.EnableEvents = True
End If
End Sub

JB


On 16 fév, 10:37, "Pascal" wrote:
Merci je le mets dans le code de la feuille?
Quelles sont les valeurs à changer pour un tableau de 6 colonnes?

Pascal

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

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 And Target.Count = 1 Then
Application.EnableEvents = False
Target.Copy
Target.Offset(1, 0).PasteSpecial Paste:=xlPasteValidation
Target.Offset(1, 0).PasteSpecial Paste:=xlFormats
Application.EnableEvents = True
End If
End Sub

http://cjoint.com/?cqkawUIaa5

JB

On 16 fév, 09:10, "Pascal" wrote:





Non c'est pas cela le décaler je l'utilise pour les données source. Ce
que
je veux c'est
Par exemple dans ton classeur tu appliques cela à B2, moi je veux que
cela
s'applique à B3 lorsque je saisie une donnée dans b3

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

Bonjour,

http://boisgontierj.free.fr/pages_site/decaler.htm

JB
On 16 fév, 08:51, "Pascal" wrote:

Bonjour,
la question a due déjà être posée mais je ne trouve pas.
Comment fait-on pour étendre une zone de validation à chaque nouvelle
entrée?
Je m'explique une liste de Validation = toto1 est appliquée à la cel
a1
de
la feuil 1, je voudrais que donnée validation s'étende à la cel b1 de
la
feuille 1 lorsque je saisi une donnée en B1.

Merci
Pascal

---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000714-0, 15/02/2007
Analyse le : 16/02/2007 08:51:51
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com


---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000714-0, 15/02/2007
Analyse le : 16/02/2007 09:07:30
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com

---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000714-0, 15/02/2007
Analyse le : 16/02/2007 09:13:22
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -

- Afficher le texte des messages précédents -


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

---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000714-0, 15/02/2007
Analyse le : 16/02/2007 10:38:00
avast! - copyright (c) 1988-2007 ALWIL Software.http://www.avast.com-
Masquer le texte des messages précédents -

- Afficher le texte des messages précédents -





---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000714-0, 15/02/2007
Analyse le : 16/02/2007 10:54:31
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com






---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000714-0, 15/02/2007
Analyse le : 16/02/2007 10:58:36
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com