Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

VBA: Textbox Inhalt in Zelle schreiben

687 views
Skip to first unread message

Marcel Tylinski

unread,
Oct 15, 2001, 2:40:12 AM10/15/01
to
Hallo, ich möchte einen Textbox Inhalt in eine Zelle schreiben. Ich nutze im
Moment Zelle=Textbox. Das funktioniert auch soweit ganz gut, bloß wird beim
Wechsel mit der Eingabetaste in eine neue Zeile der Textbox in der Zelle der
entsprechenden Zeile ein Kästen [] :-(

Das allerdings kann da auf keinen Fall stehen bleiben, da das Dokument in
gedruckter Form an Kunden herausgeht...

Wie kann ich auf andere Art den Inhalt übertragen, ohne dass dieser "Fehler"
auftritt?

Vielen Dank für eure Mühen

MfG

Marcel


Marcel Tylinski

unread,
Oct 15, 2001, 4:25:40 AM10/15/01
to
also wenn in der textbox steht:

Vielen Dank für Ihre Nachfrage,

anbei sende ich Ihnen...


Dann sieht das Ergebnis in der Zelle so aus:

Vielen Dank für Ihre Nachfrage,[]
[]
anbei send ich Ihnen...


"Marcel Tylinski" <marcel....@keytech.de> schrieb im Newsbeitrag
news:eN69wQUVBHA.1504@tkmsftngp05...

Ullrich Schwarz

unread,
Oct 15, 2001, 3:24:38 PM10/15/01
to
Hallo Marcel!
Range("a1").Value = Application.WorksheetFunction.Substitute(TextBox1.Text,
Chr(13), "")
MfG Ullrich
(Excel97)

"Marcel Tylinski" <marcel....@keytech.de> schrieb im Newsbeitrag
news:eN69wQUVBHA.1504@tkmsftngp05...

Marcel Tylinski

unread,
Oct 16, 2001, 2:22:39 AM10/16/01
to
Hallo, ich habe deinen Befehl meiner durchzuführenden Aktionen angepasst:

Workbooks(dateiname2).Range("A25").Value =
Application.WorksheetFunction.Substitute(Workbooks("Angebots-Erstellung.xls"
).Worksheets("Optionen").TextBox1.Text, Chr(13), "")

Leider unterstützt irgendein Objekt eine Eigenschaft nicht. Woran könnte das
liegen?

"Ullrich Schwarz" <Ullrich...@gmx.de> schrieb im Newsbeitrag
news:9qfe0b$o275c$1...@ID-7341.news.dfncis.de...

Ullrich Schwarz

unread,
Oct 16, 2001, 12:41:03 PM10/16/01
to
Hallo Marcel,
zwischen Worbooks und Range mußt Du IMHO ein Sheet einfügen.
MfG Ullrich

"Marcel Tylinski" <marcel....@keytech.de> schrieb im Newsbeitrag

news:eq2aprgVBHA.2076@tkmsftngp05...

0 new messages