J'ai un programme vba qui me permet de copier des valeurs sur un fichier
excel.
le probleme est que lorsque dans ma form je clique sur un bouton génerer
pour generer ma feuille exel, j'ai la boite de dialogue qui s'affiche pour
enregistrer le fichier.
et dans mon code j'ai commandegenerer.Filename=Textfo.text
mon probleme est que dans TextFo, j'ai le texte 5.**25-Reg**
et comme excel n'accepte pas **
je voulai savoir comment remplace les * par rien ou par un espace:
je pense qu'il faut changer ce code: commandegenerer.Filename=Textfo.text
mais comment , je voudrai au fait remplacer le ** par un espace ou rien.
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
Hervé
Salut Phil, Utilise la fonction Replace : Texte = Replace(TextFo.Text, "*", "") Hervé.
"PHIL" a écrit dans le message news:
Bonjour,
J'ai un programme vba qui me permet de copier des valeurs sur un fichier excel.
le probleme est que lorsque dans ma form je clique sur un bouton génerer pour generer ma feuille exel, j'ai la boite de dialogue qui s'affiche pour enregistrer le fichier.
et dans mon code j'ai commandegenerer.Filename=Textfo.text mon probleme est que dans TextFo, j'ai le texte 5.**25-Reg** et comme excel n'accepte pas **
je voulai savoir comment remplace les * par rien ou par un espace: je pense qu'il faut changer ce code: commandegenerer.Filename=Textfo.text
mais comment , je voudrai au fait remplacer le ** par un espace ou rien.
merci d'avance.
Salut Phil,
Utilise la fonction Replace :
Texte = Replace(TextFo.Text, "*", "")
Hervé.
"PHIL" <PHIL@discussions.microsoft.com> a écrit dans le message news:
4B3E626A-2F69-4555-9AA4-65811457E295@microsoft.com...
Bonjour,
J'ai un programme vba qui me permet de copier des valeurs sur un fichier
excel.
le probleme est que lorsque dans ma form je clique sur un bouton génerer
pour generer ma feuille exel, j'ai la boite de dialogue qui s'affiche pour
enregistrer le fichier.
et dans mon code j'ai commandegenerer.Filename=Textfo.text
mon probleme est que dans TextFo, j'ai le texte 5.**25-Reg**
et comme excel n'accepte pas **
je voulai savoir comment remplace les * par rien ou par un espace:
je pense qu'il faut changer ce code: commandegenerer.Filename=Textfo.text
mais comment , je voudrai au fait remplacer le ** par un espace ou rien.
Salut Phil, Utilise la fonction Replace : Texte = Replace(TextFo.Text, "*", "") Hervé.
"PHIL" a écrit dans le message news:
Bonjour,
J'ai un programme vba qui me permet de copier des valeurs sur un fichier excel.
le probleme est que lorsque dans ma form je clique sur un bouton génerer pour generer ma feuille exel, j'ai la boite de dialogue qui s'affiche pour enregistrer le fichier.
et dans mon code j'ai commandegenerer.Filename=Textfo.text mon probleme est que dans TextFo, j'ai le texte 5.**25-Reg** et comme excel n'accepte pas **
je voulai savoir comment remplace les * par rien ou par un espace: je pense qu'il faut changer ce code: commandegenerer.Filename=Textfo.text
mais comment , je voudrai au fait remplacer le ** par un espace ou rien.
merci d'avance.
Claude
Pour modifier le caractère "*" par "_" par exemple, utilise la fonction :
Textfo.Text = Replace(Textfo.Text, "*", "_")
Pour éviter de recevoir des messages de la part d'Excel tu peux initialiser l'attribut "Alerts" de ton objet Excel à "False". Or, Excel ne t'enverra plus de message du tout. Ce sera à toi de tout gérer.
Bon code ! Claude
"PHIL" wrote:
Bonjour,
J'ai un programme vba qui me permet de copier des valeurs sur un fichier excel.
le probleme est que lorsque dans ma form je clique sur un bouton génerer pour generer ma feuille exel, j'ai la boite de dialogue qui s'affiche pour enregistrer le fichier.
et dans mon code j'ai commandegenerer.Filename=Textfo.text mon probleme est que dans TextFo, j'ai le texte 5.**25-Reg** et comme excel n'accepte pas **
je voulai savoir comment remplace les * par rien ou par un espace: je pense qu'il faut changer ce code: commandegenerer.Filename=Textfo.text
mais comment , je voudrai au fait remplacer le ** par un espace ou rien.
merci d'avance.
Pour modifier le caractère "*" par "_" par exemple, utilise
la fonction :
Textfo.Text = Replace(Textfo.Text, "*", "_")
Pour éviter de recevoir des messages de la part d'Excel
tu peux initialiser l'attribut "Alerts" de ton objet
Excel à "False". Or, Excel ne t'enverra plus de message du tout. Ce sera à
toi de tout gérer.
Bon code !
Claude
"PHIL" wrote:
Bonjour,
J'ai un programme vba qui me permet de copier des valeurs sur un fichier
excel.
le probleme est que lorsque dans ma form je clique sur un bouton génerer
pour generer ma feuille exel, j'ai la boite de dialogue qui s'affiche pour
enregistrer le fichier.
et dans mon code j'ai commandegenerer.Filename=Textfo.text
mon probleme est que dans TextFo, j'ai le texte 5.**25-Reg**
et comme excel n'accepte pas **
je voulai savoir comment remplace les * par rien ou par un espace:
je pense qu'il faut changer ce code: commandegenerer.Filename=Textfo.text
mais comment , je voudrai au fait remplacer le ** par un espace ou rien.
Pour modifier le caractère "*" par "_" par exemple, utilise la fonction :
Textfo.Text = Replace(Textfo.Text, "*", "_")
Pour éviter de recevoir des messages de la part d'Excel tu peux initialiser l'attribut "Alerts" de ton objet Excel à "False". Or, Excel ne t'enverra plus de message du tout. Ce sera à toi de tout gérer.
Bon code ! Claude
"PHIL" wrote:
Bonjour,
J'ai un programme vba qui me permet de copier des valeurs sur un fichier excel.
le probleme est que lorsque dans ma form je clique sur un bouton génerer pour generer ma feuille exel, j'ai la boite de dialogue qui s'affiche pour enregistrer le fichier.
et dans mon code j'ai commandegenerer.Filename=Textfo.text mon probleme est que dans TextFo, j'ai le texte 5.**25-Reg** et comme excel n'accepte pas **
je voulai savoir comment remplace les * par rien ou par un espace: je pense qu'il faut changer ce code: commandegenerer.Filename=Textfo.text
mais comment , je voudrai au fait remplacer le ** par un espace ou rien.
merci d'avance.
PHIL
je peux donc ecrire cmgénerer.filename=Replace(Textfo.Text,"*"," ")
ca peut etre bon ca pour remplacer les * par espace.
merci d'avance
"Claude" a écrit :
Pour modifier le caractère "*" par "_" par exemple, utilise la fonction :
Textfo.Text = Replace(Textfo.Text, "*", "_")
Pour éviter de recevoir des messages de la part d'Excel tu peux initialiser l'attribut "Alerts" de ton objet Excel à "False". Or, Excel ne t'enverra plus de message du tout. Ce sera à toi de tout gérer.
Bon code ! Claude
"PHIL" wrote:
> Bonjour, > > J'ai un programme vba qui me permet de copier des valeurs sur un fichier > excel. > > le probleme est que lorsque dans ma form je clique sur un bouton génerer > pour generer ma feuille exel, j'ai la boite de dialogue qui s'affiche pour > enregistrer le fichier. > > et dans mon code j'ai commandegenerer.Filename=Textfo.text > mon probleme est que dans TextFo, j'ai le texte 5.**25-Reg** > et comme excel n'accepte pas ** > > je voulai savoir comment remplace les * par rien ou par un espace: > je pense qu'il faut changer ce code: commandegenerer.Filename=Textfo.text > > mais comment , je voudrai au fait remplacer le ** par un espace ou rien. > > merci d'avance. >
je peux donc ecrire cmgénerer.filename=Replace(Textfo.Text,"*"," ")
ca peut etre bon ca pour remplacer les * par espace.
merci d'avance
"Claude" a écrit :
Pour modifier le caractère "*" par "_" par exemple, utilise
la fonction :
Textfo.Text = Replace(Textfo.Text, "*", "_")
Pour éviter de recevoir des messages de la part d'Excel
tu peux initialiser l'attribut "Alerts" de ton objet
Excel à "False". Or, Excel ne t'enverra plus de message du tout. Ce sera à
toi de tout gérer.
Bon code !
Claude
"PHIL" wrote:
> Bonjour,
>
> J'ai un programme vba qui me permet de copier des valeurs sur un fichier
> excel.
>
> le probleme est que lorsque dans ma form je clique sur un bouton génerer
> pour generer ma feuille exel, j'ai la boite de dialogue qui s'affiche pour
> enregistrer le fichier.
>
> et dans mon code j'ai commandegenerer.Filename=Textfo.text
> mon probleme est que dans TextFo, j'ai le texte 5.**25-Reg**
> et comme excel n'accepte pas **
>
> je voulai savoir comment remplace les * par rien ou par un espace:
> je pense qu'il faut changer ce code: commandegenerer.Filename=Textfo.text
>
> mais comment , je voudrai au fait remplacer le ** par un espace ou rien.
>
> merci d'avance.
>
je peux donc ecrire cmgénerer.filename=Replace(Textfo.Text,"*"," ")
ca peut etre bon ca pour remplacer les * par espace.
merci d'avance
"Claude" a écrit :
Pour modifier le caractère "*" par "_" par exemple, utilise la fonction :
Textfo.Text = Replace(Textfo.Text, "*", "_")
Pour éviter de recevoir des messages de la part d'Excel tu peux initialiser l'attribut "Alerts" de ton objet Excel à "False". Or, Excel ne t'enverra plus de message du tout. Ce sera à toi de tout gérer.
Bon code ! Claude
"PHIL" wrote:
> Bonjour, > > J'ai un programme vba qui me permet de copier des valeurs sur un fichier > excel. > > le probleme est que lorsque dans ma form je clique sur un bouton génerer > pour generer ma feuille exel, j'ai la boite de dialogue qui s'affiche pour > enregistrer le fichier. > > et dans mon code j'ai commandegenerer.Filename=Textfo.text > mon probleme est que dans TextFo, j'ai le texte 5.**25-Reg** > et comme excel n'accepte pas ** > > je voulai savoir comment remplace les * par rien ou par un espace: > je pense qu'il faut changer ce code: commandegenerer.Filename=Textfo.text > > mais comment , je voudrai au fait remplacer le ** par un espace ou rien. > > merci d'avance. >
