OVH Cloud OVH Cloud

User form

13 réponses
Avatar
Rex
Bonjour àtoutes et tous

Je viens à peine de dire à Daniel que je commençais à me débrouiller pas mal

Et vlan

Voilà que je coince sur un truc dont on a déjà parler pas mal ici


Il y a quelques jours on m'a créé cette petite macro
qui fonctionne impeccablement
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
Sub Remove()
[a4:a550].Replace What:=[A1], Replacement:="", LookAt:=xlPart
End Sub
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx

Je voudrais pouvoir faire la même chose mais via un user-form


Dans une boîte je mettrais le mot à rechercher
Dans une autre je metterais par quoi il faut le remplacer
Et dans une dernière boîte la plage dans laquelle il faut effectuer le
changement

La plage peut être une colonne ou étendu (B/B) ou (B10:F23)


Quelqu'un pourrait-il me refiler quelques pistes


En attendant vos réponses je retourne vers mes cours VBA

A bientôt

Rex

3 réponses

1 2
Avatar
JB
Le Userform est est non modal.
Il suffit de sélectionner le champ dans le tableur.

JB
On 10 juin, 18:32, "Rex" wrote:
Bonsoir et merci

Sois je ne vois pas ce que je cherche, soit je ne cherche pas ou il faut

Dans ton userform il y a une Label "Selection la plage"

Mais rien qui permette de la faire

Ou alors il faut sélectionner la plage avant d'utiliser le userform

Cela fonctionne

MAIS

Je sais que je suis difficile, mais je voudrais avoir un petit textbox ou
j'indiquerais la plage

D'avance merci

Et surtout merci pour ce qe tu as déjà fait

A bientôt

Rex

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

Selection.Replace What:=Me.TextBox1, Replacement:=Me.TextBox2,
LookAt:=xlPart

http://cjoint.com/?gkrtTihWMl

JB

On 10 juin, 16:53, "Rex" wrote:



Bonjour et merci

J'ai créé mon userform
J'y ai mis les textbox
Et un action button pour activerle remplacement

ET CA FONCTIONNE

Bon

MAIS je voudrais ajouter un Textbox pour donner la plage
Donc je créée une boite que j'appelle Plage

Mais dans ta macro je dois remplacer [B:B] par quoi ????

MErci et à très bientôt

Rex

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

Bonjour,

Private Sub B_ok_Click()
[B:B].Replace What:=Me.TextBox1, Replacement:=Me.TextBox2,
LookAt:=xlPart
End Sub

JB

On 10 juin, 15:51, "Rex" wrote:

Bonjour àtoutes et tous

Je viens à peine de dire à Daniel que je commençais à me dé brouiller pas
mal


Et vlan

Voilà que je coince sur un truc dont on a déjà parler pas mal i ci

Il y a quelques jours on m'a créé cette petite macro
qui fonctionne impeccablement
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
Sub Remove()
[a4:a550].Replace What:=[A1], Replacement:="", LookAt:=xlPa rt
End Sub
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx

Je voudrais pouvoir faire la même chose mais via un user-form

Dans une boîte je mettrais le mot à rechercher
Dans une autre je metterais par quoi il faut le remplacer
Et dans une dernière boîte la plage dans laquelle il faut effectu er le
changement

La plage peut être une colonne ou étendu (B/B) ou (B10:F23)

Quelqu'un pourrait-il me refiler quelques pistes

En attendant vos réponses je retourne vers mes cours VBA

A bientôt

Rex- Masquer le texte des messages précédents -


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


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




Avatar
JB
http://cjoint.com/?gktfeAOR3i

JB

On 10 juin, 18:32, "Rex" wrote:
Bonsoir et merci

Sois je ne vois pas ce que je cherche, soit je ne cherche pas ou il faut

Dans ton userform il y a une Label "Selection la plage"

Mais rien qui permette de la faire

Ou alors il faut sélectionner la plage avant d'utiliser le userform

Cela fonctionne

MAIS

Je sais que je suis difficile, mais je voudrais avoir un petit textbox ou
j'indiquerais la plage

D'avance merci

Et surtout merci pour ce qe tu as déjà fait

A bientôt

Rex

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

Selection.Replace What:=Me.TextBox1, Replacement:=Me.TextBox2,
LookAt:=xlPart

http://cjoint.com/?gkrtTihWMl

JB

On 10 juin, 16:53, "Rex" wrote:



Bonjour et merci

J'ai créé mon userform
J'y ai mis les textbox
Et un action button pour activerle remplacement

ET CA FONCTIONNE

Bon

MAIS je voudrais ajouter un Textbox pour donner la plage
Donc je créée une boite que j'appelle Plage

Mais dans ta macro je dois remplacer [B:B] par quoi ????

MErci et à très bientôt

Rex

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

Bonjour,

Private Sub B_ok_Click()
[B:B].Replace What:=Me.TextBox1, Replacement:=Me.TextBox2,
LookAt:=xlPart
End Sub

JB

On 10 juin, 15:51, "Rex" wrote:

Bonjour àtoutes et tous

Je viens à peine de dire à Daniel que je commençais à me dé brouiller pas
mal


Et vlan

Voilà que je coince sur un truc dont on a déjà parler pas mal i ci

Il y a quelques jours on m'a créé cette petite macro
qui fonctionne impeccablement
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
Sub Remove()
[a4:a550].Replace What:=[A1], Replacement:="", LookAt:=xlPa rt
End Sub
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx

Je voudrais pouvoir faire la même chose mais via un user-form

Dans une boîte je mettrais le mot à rechercher
Dans une autre je metterais par quoi il faut le remplacer
Et dans une dernière boîte la plage dans laquelle il faut effectu er le
changement

La plage peut être une colonne ou étendu (B/B) ou (B10:F23)

Quelqu'un pourrait-il me refiler quelques pistes

En attendant vos réponses je retourne vers mes cours VBA

A bientôt

Rex- Masquer le texte des messages précédents -


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


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




Avatar
Rex
MERCI

MERCI


MERCI


Bonsoir

Il ne me reste plus maintenant qu'à comprendre (ce qui risque de durer un
certain temps)

MAIS ça fonctionne exactement comme je le veux

Un grand merci à toi et à AV pour votre patience et votre gentillesse

A bientôt pour d'autres EXCELentes aventures

Rex





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


http://cjoint.com/?gktfeAOR3i

JB

On 10 juin, 18:32, "Rex" wrote:
Bonsoir et merci

Sois je ne vois pas ce que je cherche, soit je ne cherche pas ou il faut

Dans ton userform il y a une Label "Selection la plage"

Mais rien qui permette de la faire

Ou alors il faut sélectionner la plage avant d'utiliser le userform

Cela fonctionne

MAIS

Je sais que je suis difficile, mais je voudrais avoir un petit textbox ou
j'indiquerais la plage

D'avance merci

Et surtout merci pour ce qe tu as déjà fait

A bientôt

Rex

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

Selection.Replace What:=Me.TextBox1, Replacement:=Me.TextBox2,
LookAt:=xlPart

http://cjoint.com/?gkrtTihWMl

JB

On 10 juin, 16:53, "Rex" wrote:



Bonjour et merci

J'ai créé mon userform
J'y ai mis les textbox
Et un action button pour activerle remplacement

ET CA FONCTIONNE

Bon

MAIS je voudrais ajouter un Textbox pour donner la plage
Donc je créée une boite que j'appelle Plage

Mais dans ta macro je dois remplacer [B:B] par quoi ????

MErci et à très bientôt

Rex

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

Bonjour,

Private Sub B_ok_Click()
[B:B].Replace What:=Me.TextBox1, Replacement:=Me.TextBox2,
LookAt:=xlPart
End Sub

JB

On 10 juin, 15:51, "Rex" wrote:

Bonjour àtoutes et tous

Je viens à peine de dire à Daniel que je commençais à me débrouiller
pas



mal

Et vlan

Voilà que je coince sur un truc dont on a déjà parler pas mal ici

Il y a quelques jours on m'a créé cette petite macro
qui fonctionne impeccablement
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
Sub Remove()
[a4:a550].Replace What:=[A1], Replacement:="", LookAt:=xlPart
End Sub
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxx

Je voudrais pouvoir faire la même chose mais via un user-form

Dans une boîte je mettrais le mot à rechercher
Dans une autre je metterais par quoi il faut le remplacer
Et dans une dernière boîte la plage dans laquelle il faut effectuer le
changement

La plage peut être une colonne ou étendu (B/B) ou (B10:F23)

Quelqu'un pourrait-il me refiler quelques pistes

En attendant vos réponses je retourne vers mes cours VBA

A bientôt

Rex- Masquer le texte des messages précédents -


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



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




1 2