Per VBA erstellte Textbox ändern (Name, Größe)

16/10/2009 - 13:46 von das_chris | Report spam
Moin allerseits,

Ich habe ein kleines Problem beim Erstellen eines Formblatts.

Zum Aufbau:
In einer Tabelle (mehrere Zeilen und Spalten) sind in Zeile 1 zwei
"Option buttons". Ich möchte erreichen, dass wenn ein Optionbutton
geklickt wird, eine Zeile unterhalb eingefügt wird, in die erste Zelle
Text geschrieben wird und in die letzte zelle eine Textbox eingefügt
wird. Die Textbox möchte gleichzeitig noch in ihrer Größe àndern und
umbenennen.

Momentaner Stand:
Die ersten Schritte klappen gut (vielleicht kein Bilderbuch-VBA, aber
für mich genug). Die Zeile wird automatisch eingefügt, der Text in der
ersten Zelle wird eingetragen und auch die Textbox wird automatisch
eingefügt.

Problem:
Wie spreche ich die frisch eingefügte Textbox an? Ich weiß ja nicht,
welchen Namen sie bekommen hat.

Bisheriger Quellcode:

Private Sub kat_um_click
()
'[Klick auf einen der optionbuttons]
If kat_um.Value = True Then
Selection.InsertRowsBelow
1
'[Zeile darunter einfügen]
Selection.HomeKey
Unit:=wdLine
'[in erste zelle springen]
Selection.TypeText Text:="Vorrichtungsnummer (nur bei
Umbau)" '[Text einfügen]
Selection.MoveRight Unit:=wdCell,
Count:=3 '[drei Spalten weiter
springen]
Selection.InlineShapes.AddOLEControl ClassType:="Forms.TextBox.1"
'[Textbox einfügen]
End If
End Sub

ich wàre über in paar Vorschlàge sehr dankbar,
Grüße aus Hamburg,
Chris
 

Lesen sie die antworten

#1 Robert M. Franz [RMF]
20/10/2009 - 12:46 | Warnen spam
Hallo Chris

das_chris wrote:
[..]
Bisheriger Quellcode:


[..]

besser gleich in der .vba-Gruppe posten.

Gruss
Robert
/"\ ASCII Ribbon Campaign | MSFT |
\ / | MVP | Scientific Reports
X Against HTML | for | with Word?
/ \ in e-mail & news | Word | http://www.masteringword.eu/

Ähnliche fragen