Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel code vba

code vba

9 réponses
Avatar
croky23
bonjour a vous la forum
1) j'ai crée un userform dans ma feuille 1 avec un texbox
je veux que l'info de ma texbox soit mis en cellule A1 de ma feuille 2
quel code créer
2) je veux depuis mon userform pouvoir ordonner d'imprimer cette meme
feuille 2
merci à vous de m'aider
jl
Signaler un problème avec ce contenu

9 réponses

Supprimer
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
Avatar
jps
bonjour croky (à ne surtout pas concaténer avec de la gnole)

pour la 1), peut-être comme ceci, à adapter

Private Sub TextBox1_Change()
Sheets("feuil2").Range("A1") = Sheets("feuil1").TextBox1.Value
End Sub

HTH
jps

PS pour la 2), tu crées un bouton dans ton UF et tu mets dans son code ce
que l'enregistreur de macros te donnera en lançant l'impression de la
feuille 2

"croky23" a écrit dans le message de
news:
bonjour a vous la forum
1) j'ai crée un userform dans ma feuille 1 avec un texbox
je veux que l'info de ma texbox soit mis en cellule A1 de ma feuille 2
quel code créer
2) je veux depuis mon userform pouvoir ordonner d'imprimer cette meme
feuille 2
merci à vous de m'aider
jl


Avatar
JLuc
*Bonjour jps*,
Toujours sur la brèche, à ce que je vois lol

bonjour croky (à ne surtout pas concaténer avec de la gnole)


--
____
( O | O )
--
_oooO_ JLuc _Oooo_

O-O

Avatar
croky23

bonjour croky (à ne surtout pas concaténer avec de la gnole)

pour la 1), peut-être comme ceci, à adapter

Private Sub TextBox1_Change()
Sheets("feuil2").Range("A1") = Sheets("feuil1").TextBox1.Value
End Sub

HTH
jps

PS pour la 2), tu crées un bouton dans ton UF et tu mets dans son code ce
que l'enregistreur de macros te donnera en lançant l'impression de la
feuille 2

"croky23" a écrit dans le message de
news:
bonjour a vous la forum
1) j'ai crée un userform dans ma feuille 1 avec un texbox
je veux que l'info de ma texbox soit mis en cellule A1 de ma feuille 2
quel code créer
2) je veux depuis mon userform pouvoir ordonner d'imprimer cette meme
feuille 2
merci à vous de m'aider
jl




désolé mais cela ne fonctionne pas

jl




Avatar
JLuc
*Bonjour croky23*,
Essaie comme çà :

Private Sub TextBox1_Change()
Sheets("feuil2").Range("A1") = TextBox1
End Sub




bonjour croky (à ne surtout pas concaténer avec de la gnole)

pour la 1), peut-être comme ceci, à adapter

Private Sub TextBox1_Change()
Sheets("feuil2").Range("A1") = Sheets("feuil1").TextBox1.Value
End Sub

HTH
jps

PS pour la 2), tu crées un bouton dans ton UF et tu mets dans son code ce
que l'enregistreur de macros te donnera en lançant l'impression de la
feuille 2

"croky23" a écrit dans le message de
news:
bonjour a vous la forum
1) j'ai crée un userform dans ma feuille 1 avec un texbox
je veux que l'info de ma texbox soit mis en cellule A1 de ma feuille 2
quel code créer
2) je veux depuis mon userform pouvoir ordonner d'imprimer cette meme
feuille 2
merci à vous de m'aider
jl




désolé mais cela ne fonctionne pas

jl




--
____
( O | O )
--
_oooO_ JLuc _Oooo_

O-O



Avatar
croky23
merci cela fonctionne
mais si je peux abuser je voudrais quand je ferme mon userbox remettre à o
mon texbox
ci


*Bonjour croky23*,
Essaie comme çà :

Private Sub TextBox1_Change()
Sheets("feuil2").Range("A1") = TextBox1
End Sub




bonjour croky (à ne surtout pas concaténer avec de la gnole)

pour la 1), peut-être comme ceci, à adapter

Private Sub TextBox1_Change()
Sheets("feuil2").Range("A1") = Sheets("feuil1").TextBox1.Value
End Sub

HTH
jps

PS pour la 2), tu crées un bouton dans ton UF et tu mets dans son code ce
que l'enregistreur de macros te donnera en lançant l'impression de la
feuille 2

"croky23" a écrit dans le message de
news:
bonjour a vous la forum
1) j'ai crée un userform dans ma feuille 1 avec un texbox
je veux que l'info de ma texbox soit mis en cellule A1 de ma feuille 2
quel code créer
2) je veux depuis mon userform pouvoir ordonner d'imprimer cette meme
feuille 2
merci à vous de m'aider
jl




désolé mais cela ne fonctionne pas

jl




--
____
( O | O )
--
_oooO_ JLuc _Oooo_

O-O








Avatar
croky23
ou alors mettre la valeur 0 par defaut dans mon texbox


merci cela fonctionne
mais si je peux abuser je voudrais quand je ferme mon userbox remettre à o
mon texbox
ci


*Bonjour croky23*,
Essaie comme çà :

Private Sub TextBox1_Change()
Sheets("feuil2").Range("A1") = TextBox1
End Sub




bonjour croky (à ne surtout pas concaténer avec de la gnole)

pour la 1), peut-être comme ceci, à adapter

Private Sub TextBox1_Change()
Sheets("feuil2").Range("A1") = Sheets("feuil1").TextBox1.Value
End Sub

HTH
jps

PS pour la 2), tu crées un bouton dans ton UF et tu mets dans son code ce
que l'enregistreur de macros te donnera en lançant l'impression de la
feuille 2

"croky23" a écrit dans le message de
news:
bonjour a vous la forum
1) j'ai crée un userform dans ma feuille 1 avec un texbox
je veux que l'info de ma texbox soit mis en cellule A1 de ma feuille 2
quel code créer
2) je veux depuis mon userform pouvoir ordonner d'imprimer cette meme
feuille 2
merci à vous de m'aider
jl




désolé mais cela ne fonctionne pas

jl




--
____
( O | O )
--
_oooO_ JLuc _Oooo_

O-O










Avatar
jps
ouais, ouais, JLuc
jps

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

*Bonjour jps*,
Toujours sur la brèche, à ce que je vois lol

bonjour croky (à ne surtout pas concaténer avec de la gnole)


--
____
( O | O )
--
_oooO_ JLuc _Oooo_

O-O





Avatar
jps
bof, chez moi ça marchait bien car moi, je teste, môssieu, pas comme
certains éleveurs de canards du sud ouest et troqueurs de chemises à
repasser
jps

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



bonjour croky (à ne surtout pas concaténer avec de la gnole)

pour la 1), peut-être comme ceci, à adapter

Private Sub TextBox1_Change()
Sheets("feuil2").Range("A1") = Sheets("feuil1").TextBox1.Value
End Sub

HTH
jps

PS pour la 2), tu crées un bouton dans ton UF et tu mets dans son code ce
que l'enregistreur de macros te donnera en lançant l'impression de la
feuille 2

"croky23" a écrit dans le message de
news:
bonjour a vous la forum
1) j'ai crée un userform dans ma feuille 1 avec un texbox
je veux que l'info de ma texbox soit mis en cellule A1 de ma feuille 2
quel code créer
2) je veux depuis mon userform pouvoir ordonner d'imprimer cette meme
feuille 2
merci à vous de m'aider
jl




désolé mais cela ne fonctionne pas

jl






Avatar
FxM
Je ne vois pas du tout à quoi tu pourrais faire allusion ...

@+
FxM



bof, chez moi ça marchait bien car moi, je teste, môssieu, pas comme
certains éleveurs de canards du sud ouest et troqueurs de chemises à
repasser
jps

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


bonjour croky (à ne surtout pas concaténer avec de la gnole)

pour la 1), peut-être comme ceci, à adapter

Private Sub TextBox1_Change()
Sheets("feuil2").Range("A1") = Sheets("feuil1").TextBox1.Value
End Sub

HTH
jps

PS pour la 2), tu crées un bouton dans ton UF et tu mets dans son code ce
que l'enregistreur de macros te donnera en lançant l'impression de la
feuille 2

"croky23" a écrit dans le message de
news:
bonjour a vous la forum
1) j'ai crée un userform dans ma feuille 1 avec un texbox
je veux que l'info de ma texbox soit mis en cellule A1 de ma feuille 2
quel code créer
2) je veux depuis mon userform pouvoir ordonner d'imprimer cette meme
feuille 2
merci à vous de m'aider
jl
désolé mais cela ne fonctionne pas



jl