Je suis en train de sécher sur le problème suivant.
J'ai créé une base de données pour laquelle je saisie les données dans des
textbox. Dans la majorité des cas, les textbox ne sont pas multiligne sauf
un cas pour la désignation ou avec ctrl+entrée, je saisie plusieurs lignes.
Par ailleurs, je souhaite imprimer les données sur une feuille "
imp_demande" .
Pour la plupart des champs, je charge les données dans mes cellules avec
cette formule :
Sheets("imp_demande").Range("c10").Value = résultat.TextBox19.Value
Pour le contenu de ma textbox multiligne, je n'arrive pas à loger les lignes
sur une cellule en modifiant le format de la cellule (j'ai essayé de
fusionner plusieurs cellules, soit avec le renvoie automatique...). En plus
à l'impression le ctrl+entree me fait un carré !
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
JB
Bonjour,
Transfert form--> feuille
[A1] = Replace(Me.TextBox1, Chr(13), "")
JB
On 22 août, 14:49, "Michel" wrote:
Bonjour à tous,
Je suis en train de sécher sur le problème suivant.
J'ai créé une base de données pour laquelle je saisie les données dans des textbox. Dans la majorité des cas, les textbox ne sont pas multiligne s auf un cas pour la désignation ou avec ctrl+entrée, je saisie plusieurs l ignes. Par ailleurs, je souhaite imprimer les données sur une feuille " imp_demande" .
Pour la plupart des champs, je charge les données dans mes cellules avec cette formule : Sheets("imp_demande").Range("c10").Value = résultat.TextBox19.Value
Pour le contenu de ma textbox multiligne, je n'arrive pas à loger les l ignes sur une cellule en modifiant le format de la cellule (j'ai essayé de fusionner plusieurs cellules, soit avec le renvoie automatique...). En pl us à l'impression le ctrl+entree me fait un carré !
Comment faire svp ?
Michel
Bonjour,
Transfert form--> feuille
[A1] = Replace(Me.TextBox1, Chr(13), "")
JB
On 22 août, 14:49, "Michel" <mic...@lafrite.be> wrote:
Bonjour à tous,
Je suis en train de sécher sur le problème suivant.
J'ai créé une base de données pour laquelle je saisie les données dans des
textbox. Dans la majorité des cas, les textbox ne sont pas multiligne s auf
un cas pour la désignation ou avec ctrl+entrée, je saisie plusieurs l ignes.
Par ailleurs, je souhaite imprimer les données sur une feuille "
imp_demande" .
Pour la plupart des champs, je charge les données dans mes cellules avec
cette formule :
Sheets("imp_demande").Range("c10").Value = résultat.TextBox19.Value
Pour le contenu de ma textbox multiligne, je n'arrive pas à loger les l ignes
sur une cellule en modifiant le format de la cellule (j'ai essayé de
fusionner plusieurs cellules, soit avec le renvoie automatique...). En pl us
à l'impression le ctrl+entree me fait un carré !
Je suis en train de sécher sur le problème suivant.
J'ai créé une base de données pour laquelle je saisie les données dans des textbox. Dans la majorité des cas, les textbox ne sont pas multiligne s auf un cas pour la désignation ou avec ctrl+entrée, je saisie plusieurs l ignes. Par ailleurs, je souhaite imprimer les données sur une feuille " imp_demande" .
Pour la plupart des champs, je charge les données dans mes cellules avec cette formule : Sheets("imp_demande").Range("c10").Value = résultat.TextBox19.Value
Pour le contenu de ma textbox multiligne, je n'arrive pas à loger les l ignes sur une cellule en modifiant le format de la cellule (j'ai essayé de fusionner plusieurs cellules, soit avec le renvoie automatique...). En pl us à l'impression le ctrl+entree me fait un carré !
Comment faire svp ?
Michel
Michel
Merci JB,
J'ai remplacé le ctrl+entree de la textbox par un alt+entree de la cellule et ça marche !
Je suis en train de sécher sur le problème suivant.
J'ai créé une base de données pour laquelle je saisie les données dans des textbox. Dans la majorité des cas, les textbox ne sont pas multiligne sauf un cas pour la désignation ou avec ctrl+entrée, je saisie plusieurs lignes. Par ailleurs, je souhaite imprimer les données sur une feuille " imp_demande" .
Pour la plupart des champs, je charge les données dans mes cellules avec cette formule : Sheets("imp_demande").Range("c10").Value = résultat.TextBox19.Value
Pour le contenu de ma textbox multiligne, je n'arrive pas à loger les lignes sur une cellule en modifiant le format de la cellule (j'ai essayé de fusionner plusieurs cellules, soit avec le renvoie automatique...). En plus à l'impression le ctrl+entree me fait un carré !
Comment faire svp ?
Michel
Merci JB,
J'ai remplacé le ctrl+entree de la textbox par un alt+entree de la cellule
et ça marche !
"JB" <boisgontier@hotmail.com> a écrit dans le message de news:
1187794754.959320.89390@i13g2000prf.googlegroups.com...
Bonjour,
Transfert form--> feuille
[A1] = Replace(Me.TextBox1, Chr(13), "")
JB
On 22 août, 14:49, "Michel" <mic...@lafrite.be> wrote:
Bonjour à tous,
Je suis en train de sécher sur le problème suivant.
J'ai créé une base de données pour laquelle je saisie les données dans des
textbox. Dans la majorité des cas, les textbox ne sont pas multiligne sauf
un cas pour la désignation ou avec ctrl+entrée, je saisie plusieurs
lignes.
Par ailleurs, je souhaite imprimer les données sur une feuille "
imp_demande" .
Pour la plupart des champs, je charge les données dans mes cellules avec
cette formule :
Sheets("imp_demande").Range("c10").Value = résultat.TextBox19.Value
Pour le contenu de ma textbox multiligne, je n'arrive pas à loger les
lignes
sur une cellule en modifiant le format de la cellule (j'ai essayé de
fusionner plusieurs cellules, soit avec le renvoie automatique...). En
plus
à l'impression le ctrl+entree me fait un carré !
Je suis en train de sécher sur le problème suivant.
J'ai créé une base de données pour laquelle je saisie les données dans des textbox. Dans la majorité des cas, les textbox ne sont pas multiligne sauf un cas pour la désignation ou avec ctrl+entrée, je saisie plusieurs lignes. Par ailleurs, je souhaite imprimer les données sur une feuille " imp_demande" .
Pour la plupart des champs, je charge les données dans mes cellules avec cette formule : Sheets("imp_demande").Range("c10").Value = résultat.TextBox19.Value
Pour le contenu de ma textbox multiligne, je n'arrive pas à loger les lignes sur une cellule en modifiant le format de la cellule (j'ai essayé de fusionner plusieurs cellules, soit avec le renvoie automatique...). En plus à l'impression le ctrl+entree me fait un carré !