[VBA-E] Comment récupérer le texte de validation d'une cellule dans une autre ?

**Amaranthe** · 04/03/2007, 21h21

Bonsoir a tous,

J'ai une colonne ou toutes mes cellules ont un texte de validation... et je souhaiterai dans la colonne d'a coté, récupérer ce texte au format texte.

Est ce possible et si oui... comment ?

Merci d'avance pour votre aide.

Amaranthe.

**ouskel'n'or** · 05/03/2007, 01h15

Tu peux être plus explicite ?

**Amaranthe** · 05/03/2007, 10h57

Tout d'abord merci d'avoir pris la peine de te pencher sur mon problème, ensuite, Je vais essayer d'être plus explicite...

Dans ma colonne A... j'ai, des produits. Et pour chacun de ces produits, on a utilisé l'option de validation des données... Outils - Validation - Texte de Saisie... pour mettre le descriptif du produit.

Ce texte de validation est censé être une aide a la saisie... il a ici été détourné de son utilisation usuelle pour mettre le descriptif du produit.

Ce que je souhaiterai, c'est récupérer ce texte dans la colonne B... et ce, bien sur, de facon la plus automatique possible étant donné que j'ai près de 25.000 produits.

J'ai cherché dans les informations de cellule... sans succes... et je ne pense pas que cela soit possible sans passer par une fonction VB... une petite boucle avec un Range('Cellule').quelquechose ...

Est ce plus clair ?

**ouskel'n'or** · 05/03/2007, 11h01

Envoyé par Tu

Ce texte de validation est censé être une aide a la saisie... il a ici été détourné de son utilisation usuelle pour mettre le descriptif du produit.

C'est ce détournement qui me pose problème... Si tu pouvais mettre ton fichier (pas avec les 25000 produits, avec 4 ou 5, ça suffira

A+

**helios77** · 05/03/2007, 11h11

Voilà ce que tu peux faire popur récupérer tes infos, je te laisse ensuite mettre en palceta boucle

En supposant que tu veuille metrre le résultats de la cellule A1 vers B1

Code :

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

1
2
3
 
    Range("A1").Select
    Range("B1") = Selection.Validation.InputTitle & " - " & Selection.Validation.InputMessage

Un petit conseil, quand tu ne sais aps quelle propriété utiliser, passe apr le générateur de macro et exécute ton action pour voir comment il stocke tes données

**Amaranthe** · 05/03/2007, 11h15

Envoyé par helios77

Voilà ce que tu peux faire popur récupérer tes infos, je te laisse ensuite mettre en palceta boucle

En supposant que tu veuille metrre le résultats de la cellule A1 vers B1

Code :

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

1
2
3
 
    Range("A1").Select
    Range("B1") = Selection.Validation.InputTitle & " - " & Selection.Validation.InputMessage

Un petit conseil, quand tu ne sais aps quelle propriété utiliser, passe apr le générateur de macro et exécute ton action pour voir comment il stocke tes données

J'essaye ca de suite.

Quand au générateur de macro... j'y ai bien pensé... mais je savais déja pas le faire directement sous excel...

Merci beaucoup pour ton aide.