Modification d'un code avec une textbox

[Zlopeck]

- - RÉSOLU - -

Bonjour à tous,

A partir d'un bouton placé sur un USF je lance, entre autre, la macro d'impression suivante (réalisée avec l'enregistreur) :

Private Sub CommandButton1_Click()
ExecuteExcel4Macro "PRINT(1,,,5,,,,,,,,2,,,TRUE,,FALSE)"
End Sub

où le 5 représente le nombre de copies à imprimer.

Ce que je cherche à faire et qui me pose un problème, c'est que cette donnée prenne la valeur contenue dans la textbox présente sur l'USF afin de choisir le nombre de copies.

Je joins un fichier pour éclaircir ma demande.
Merci de votre aide

 

[Pierrot93]

Re : Modification d'un code avec une textbox

Bonjour Zlopeck

essaye peut être le code ci dessous, ou "TextBox1" est le nom de ta textbox, pas testé...

ExecuteExcel4Macro "PRINT(1,,," & TextBox1.Value & " ,,,,,,,2,,,TRUE,,FALSE)"

bonne soirée
@+

 

[Zlopeck]

Re : Modification d'un code avec une textbox

Bonsoir Pierrot93
Je viens d'aessayer ton code mais malheureusement il ne fonctionne pas.
Merci quand même pour cet essai

J' ai aussi essayé de rajouter *1 après .Value au cas ou mais sans plus de succès...

 

[Pierrot93]

Re : Modification d'un code avec une textbox

Re

fait un essai comme suit, ce code fonctionne chez mo (Excel2003) :

Private Sub CommandButton1_Click()
ExecuteExcel4Macro "PRINT(1,,," & TextBox1.Value & " ,,,,,,,,,,,,)"
End Sub

sinon plus d'info sur le lien ci dessous :

Mise en page avec les macros XL4 - - Forum des développeurs

bonne soirée
@+

 

[Zlopeck]

Re : Modification d'un code avec une textbox

Un grand merci,
Ton code fonctionne même sous 2007.