fonction REplace

@

@+Thierry

Guest

• 15 Avril 2003

• #2

Re Super-Tonic (décidément !)


Ultra vite fait (j'ai du taff là)

Essaie :
MyString = TextBox1
MyString = Application.WorkshhetFunction.Substitute(MyString, "$", "USD")

(J'ai mis USD mais tu peux mettre un espace " " ou ce que tu veux)

@+Thierry

 

Vote positif 0 Vote négatif

S

super-tonic60

Guest

• 16 Avril 2003

• #3

J'ai essayé, mais tout petit problème
Erreur 438: non gérée

Private Sub tbNOM_Change()

'Ancien code qui marche que sur du 98-2ed et NT et 2000
'tbNOM = Replace(tbNOM, "$", "*")

'Nouveau code
MyString = tbNOM.Value
MyString = Application.WorkshhetFunction.Substitute(MyString, "$", "*")

End Sub

 

Vote positif 0 Vote négatif

Z

Zon

Guest

• 16 Avril 2003

• #4

Bonjour à tous,

Thierry tu as du taff donc je me permets de répondre:

Il y a un faute de frappe il faut mettre

MyString = Application.WorksheetFunction.Substitute(MyString, "$", "*")


A+++

 

Vote positif 0 Vote négatif

@

@+Thierry

Guest

• 16 Avril 2003

• #5

Hello Super-Sonic

hi hi hi
MyString = Application.WorkshhetFunction.Substitute(MyString, "$", "*")


faute de frappe =>
MyString = Application.WorksheetFunction.Substitute(MyString, "$", "*")


J'étais assez à la bourre !! lol

@+Thierry

 

Vote positif 0 Vote négatif

@

@+Thierry

Guest

• 16 Avril 2003

• #6

Merci Zon !! et bonjour

Tu as l'oeil !! lol Sacrée WorkShit !! alors lol

Bonne fin de journée
@+Thierry

 

Vote positif 0 Vote négatif

S

super-tonic60

Guest

• 16 Avril 2003

• #7

Chui trop con , j'ai rien vu !!!

Merci Bcp

mdr

 

Vote positif 0 Vote négatif

L

Lex

Guest

• 16 Septembre 2004

• #8

vba erreur d'application

Salut tout le monde

Je voudrai gérer word depuis excel donc j'utilise :
Dim mem as object
Set mem = New Word.application
ensuite j'ouvre un document et je voudrai le copier dans un nouveau mais lorsque je veut le copier (ActiveDocument.paste) ça génére une erreur 438
des idées pour résoudre cette erreur Merci

 

Vote positif 0 Vote négatif